diff --git a/成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dof b/成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dof index 423a7f9..e040613 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dof +++ b/成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dof @@ -101,7 +101,7 @@ DebugSourceDirs= UsePackages=0 [Parameters] RunParams= -HostApplication=D:\\Ŀ\\Ʒֿ(FinishedClothWarehouse.dll)\testDll.exe +HostApplication=D:\ֿ\Ŀ\D7WMyunxiang\Ʒֿ(FinishedClothWarehouse.dll)\testDll.exe Launcher= UseLauncher=0 DebugCWD= diff --git a/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.bpg b/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.bpg index e6b2914..6f0ac19 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.bpg +++ b/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.bpg @@ -9,7 +9,7 @@ MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$** DCC = $(ROOT)\bin\dcc32.exe $** BRCC = $(ROOT)\bin\brcc32.exe $** #------------------------------------------------------------------------------ -PROJECTS = testDll.exe +PROJECTS = testDll.exe FinishedClothWarehouse.dll #------------------------------------------------------------------------------ default: $(PROJECTS) #------------------------------------------------------------------------------ @@ -17,4 +17,7 @@ default: $(PROJECTS) testDll.exe: testDll.dpr $(DCC) +FinishedClothWarehouse.dll: FinishedClothWarehouse.dpr + $(DCC) + diff --git a/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.~bpg b/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.~bpg index 7c050f6..e6b2914 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.~bpg +++ b/成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.~bpg @@ -9,7 +9,7 @@ MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$** DCC = $(ROOT)\bin\dcc32.exe $** BRCC = $(ROOT)\bin\brcc32.exe $** #------------------------------------------------------------------------------ -PROJECTS = testDll.exe ProductPrice.dll +PROJECTS = testDll.exe #------------------------------------------------------------------------------ default: $(PROJECTS) #------------------------------------------------------------------------------ @@ -17,7 +17,4 @@ default: $(PROJECTS) testDll.exe: testDll.dpr $(DCC) -ProductPrice.dll: ProductPrice.dpr - $(DCC) - diff --git a/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm b/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm index ced3b24..b7032df 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm +++ b/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm @@ -1,25 +1,25 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList - Left = 245 - Top = 105 + Left = 309 + Top = 334 Width = 1621 Height = 863 Caption = #25104#21697#20986#24211#21015#34920 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -15 + Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnShow = FormShow - PixelsPerInch = 120 - TextHeight = 15 + PixelsPerInch = 96 + TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 - Width = 1603 + Width = 1613 Height = 33 ButtonHeight = 30 ButtonWidth = 115 @@ -64,7 +64,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object ComboBox1: TComboBox Left = 317 - Top = 0 + Top = 1 Width = 128 Height = 27 Style = csDropDownList @@ -110,165 +110,165 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList object Panel1: TPanel Left = 0 Top = 33 - Width = 1603 - Height = 105 + Width = 1613 + Height = 84 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label3: TLabel - Left = 553 - Top = 15 - Width = 92 - Height = 22 + Left = 442 + Top = 12 + Width = 80 + Height = 19 Caption = #20013#25991#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel - Left = 786 - Top = 15 - Width = 46 - Height = 22 + Left = 629 + Top = 12 + Width = 40 + Height = 19 Caption = #39068#33394 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel - Left = 110 - Top = 50 - Width = 23 - Height = 22 + Left = 88 + Top = 40 + Width = 20 + Height = 19 Caption = #33267 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel - Left = 316 - Top = 50 - Width = 92 - Height = 22 + Left = 253 + Top = 40 + Width = 80 + Height = 19 Caption = #25351#31034#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel - Left = 786 - Top = 50 - Width = 46 - Height = 22 + Left = 629 + Top = 40 + Width = 40 + Height = 19 Caption = #26465#30721 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel - Left = 1018 - Top = 15 - Width = 46 - Height = 22 + Left = 814 + Top = 12 + Width = 40 + Height = 19 Caption = #31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel - Left = 316 - Top = 15 - Width = 92 - Height = 22 + Left = 253 + Top = 12 + Width = 80 + Height = 19 Caption = #20986#24211#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel - Left = 598 - Top = 50 - Width = 46 - Height = 22 + Left = 478 + Top = 40 + Width = 40 + Height = 19 Caption = #32568#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label22: TLabel - Left = 1225 - Top = 15 - Width = 46 - Height = 22 + Left = 980 + Top = 12 + Width = 40 + Height = 19 Caption = #23458#25143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label24: TLabel - Left = 973 - Top = 50 - Width = 92 - Height = 22 + Left = 778 + Top = 40 + Width = 80 + Height = 19 Caption = #20986#24211#31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel - Left = 1203 - Top = 50 - Width = 69 - Height = 22 + Left = 962 + Top = 40 + Width = 60 + Height = 19 Caption = #21512#21516#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MLCodeName: TEdit Tag = 2 - Left = 648 - Top = 10 - Width = 112 - Height = 25 + Left = 518 + Top = 8 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -276,30 +276,30 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList OnKeyPress = MLOrderNoKeyPress end object BegDate: TDateTimePicker - Left = 140 - Top = 10 - Width = 154 - Height = 30 + Left = 112 + Top = 8 + Width = 123 + Height = 27 Date = 40768.458268587970000000 Time = 40768.458268587970000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object EndDate: TDateTimePicker - Left = 140 - Top = 45 - Width = 154 - Height = 30 + Left = 112 + Top = 36 + Width = 123 + Height = 27 Date = 40768.458268587970000000 Time = 40768.458268587970000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -307,13 +307,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object MLOrderNo: TEdit Tag = 2 - Left = 408 - Top = 45 - Width = 112 - Height = 25 + Left = 326 + Top = 36 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -322,13 +322,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object MJID: TEdit Tag = 2 - Left = 834 - Top = 45 - Width = 112 - Height = 25 + Left = 667 + Top = 36 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -337,13 +337,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object CkOrdNo: TEdit Tag = 2 - Left = 408 - Top = 10 - Width = 112 - Height = 25 + Left = 326 + Top = 8 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -351,10 +351,10 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList OnKeyPress = MLOrderNoKeyPress end object begtime: TDateTimePicker - Left = 56 - Top = 125 - Width = 69 - Height = 23 + Left = 45 + Top = 100 + Width = 55 + Height = 20 Date = 39780.000000000000000000 Format = 'HH:mm' Time = 39780.000000000000000000 @@ -362,10 +362,10 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList TabOrder = 12 end object endTime: TDateTimePicker - Left = 56 - Top = 155 - Width = 69 - Height = 23 + Left = 45 + Top = 124 + Width = 55 + Height = 20 Date = 39780.999317129630000000 Format = 'HH:mm' Time = 39780.999317129630000000 @@ -374,13 +374,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object CXKH: TEdit Tag = 2 - Left = 1271 - Top = 10 - Width = 100 - Height = 25 + Left = 1017 + Top = 8 + Width = 80 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -389,17 +389,17 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object CRType: TComboBox Tag = 2 - Left = 1065 - Top = 45 - Width = 113 - Height = 30 + Left = 852 + Top = 36 + Width = 90 + Height = 27 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] - ItemHeight = 22 + ItemHeight = 19 ParentFont = False TabOrder = 9 OnChange = CRTypeChange @@ -414,17 +414,17 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object CPType: TComboBox Tag = 2 - Left = 1065 - Top = 10 - Width = 113 - Height = 30 + Left = 852 + Top = 8 + Width = 90 + Height = 27 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] - ItemHeight = 22 + ItemHeight = 19 ParentFont = False TabOrder = 8 OnChange = CPTypeChange @@ -435,15 +435,15 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList '') end object IsJYTime: TCheckBox - Left = 24 - Top = 15 - Width = 119 - Height = 21 + Left = 19 + Top = 12 + Width = 95 + Height = 17 Caption = #26597#35810#26085#26399 Checked = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -452,13 +452,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object MLColor: TEdit Tag = 2 - Left = 834 - Top = 10 - Width = 112 - Height = 25 + Left = 667 + Top = 8 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -467,13 +467,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object ganghao: TEdit Tag = 2 - Left = 648 - Top = 45 - Width = 112 - Height = 25 + Left = 518 + Top = 36 + Width = 90 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -482,13 +482,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object MLConNo: TEdit Tag = 2 - Left = 1271 - Top = 45 - Width = 100 - Height = 25 + Left = 1017 + Top = 36 + Width = 80 + Height = 30 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -22 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -498,9 +498,9 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object cxGrid2: TcxGrid Left = 0 - Top = 177 - Width = 1603 - Height = 639 + Top = 150 + Width = 1613 + Height = 682 Align = alClient PopupMenu = PopupMenu1 TabOrder = 3 @@ -670,7 +670,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object v1Column10: TcxGridDBColumn Caption = #32568#21495 - DataBinding.FieldName = 'ganghao' + DataBinding.FieldName = 'gangNO' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 @@ -702,16 +702,16 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end end object MovePanel2: TMovePanel - Left = 590 - Top = 400 - Width = 361 - Height = 61 + Left = 472 + Top = 320 + Width = 289 + Height = 49 BevelInner = bvLowered Caption = #27491#22312#25191#34892#25968#25454#25805#20316#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed - Font.Height = -17 + Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -720,65 +720,65 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object Panel6: TPanel Left = 0 - Top = 138 - Width = 1603 - Height = 39 + Top = 117 + Width = 1613 + Height = 33 Align = alTop AutoSize = True BorderStyle = bsSingle Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 DesignSize = ( - 1599 - 35) + 1609 + 29) object LBCPAP: TLabel - Left = 634 - Top = 4 - Width = 106 - Height = 27 + Left = 507 + Top = 3 + Width = 85 + Height = 22 Alignment = taCenter Anchors = [akLeft, akTop, akBottom] AutoSize = False Caption = #24403#21069#39029'/'#24635#39029#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object Label1: TLabel - Left = 30 - Top = 5 - Width = 158 - Height = 28 + Left = 24 + Top = 4 + Width = 126 + Height = 22 Alignment = taCenter Anchors = [akLeft, akTop, akBottom] AutoSize = False Caption = #27599#39029#35760#24405#26465#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object BTLP: TButton - Left = 524 - Top = 3 - Width = 97 - Height = 31 + Left = 419 + Top = 2 + Width = 78 + Height = 25 Caption = #19978#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -786,14 +786,14 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList OnClick = BTLPClick end object BTNP: TButton - Left = 746 + Left = 597 Top = 1 - Width = 98 - Height = 32 + Width = 78 + Height = 25 Caption = #19979#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False @@ -802,18 +802,18 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList end object TCBNOR: TComboBox Tag = 2 - Left = 195 + Left = 156 Top = 1 - Width = 98 - Height = 31 + Width = 78 + Height = 27 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText - Font.Height = -23 + Font.Height = -19 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 - ItemHeight = 23 + ItemHeight = 19 ItemIndex = 0 ParentFont = False TabOrder = 2 diff --git a/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas b/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas index 87d5723..94f52cc 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas +++ b/成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas @@ -11,7 +11,21 @@ uses ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, cxCheckBox, Menus, MovePanel, RM_E_llPDF, cxCalendar, Math, - Clipbrd, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator; + Clipbrd, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxSkinsCore, + dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, + dxSkinDarkRoom, dxSkinDarkSide, dxSkinDevExpressDarkStyle, + dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, + dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, + dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis, + dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black, + dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink, + dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue, + dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, + dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin, + dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, + dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008, + dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine, + dxSkinVS2010, dxSkinWhiteprint, dxSkinXmas2008Blue, dxSkinscxPCPainter; type TfrmCKProductBCPOutList = class(TForm) diff --git a/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.dfm b/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.dfm index 110135b..ed3468f 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.dfm +++ b/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.dfm @@ -17858,7 +17858,7 @@ object DataLink_FinishedClothWarehouse: TDataLink_FinishedClothWarehouse object ThreeColorBase: TcxStyleRepository Left = 147 Top = 80 - PixelsPerInch = 120 + PixelsPerInch = 96 object SHuangSe: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = 4707838 diff --git a/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas b/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas index 0af3b15..6f065b2 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas +++ b/成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas @@ -4,7 +4,21 @@ interface uses SysUtils, Classes, DB, ADODB, ImgList, Controls, cxStyles, cxLookAndFeels, - Windows,Messages,forms,OleCtnrs,DateUtils, cxClasses; + Windows,Messages,forms,OleCtnrs,DateUtils, cxClasses, dxSkinsCore, + dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, + dxSkinDarkRoom, dxSkinDarkSide, dxSkinDevExpressDarkStyle, + dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans, + dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, + dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis, + dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black, + dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink, + dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue, + dxSkinOffice2010Silver, dxSkinOffice2013DarkGray, + dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin, + dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus, + dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008, + dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine, + dxSkinVS2010, dxSkinWhiteprint, dxSkinXmas2008Blue; var DConString:String; {ȫַ} server, dtbase, user, pswd: String; {ݿӲ} diff --git a/成品仓库(FinishedClothWarehouse.dll)/U_testdll.dfm b/成品仓库(FinishedClothWarehouse.dll)/U_testdll.dfm index 6b709b8..7f7da70 100644 --- a/成品仓库(FinishedClothWarehouse.dll)/U_testdll.dfm +++ b/成品仓库(FinishedClothWarehouse.dll)/U_testdll.dfm @@ -21,7 +21,7 @@ object Form1: TForm1 object ToolBar1: TToolBar Left = 0 Top = 0 - Width = 775 + Width = 783 Height = 25 ButtonWidth = 57 Caption = 'ToolBar1'