Group_99/D7myYunxiang
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-06-04 14:51:18 +08:00
parent cc81ebbd15
commit 298ffe5dca
8 changed files with 216 additions and 188 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dof
View File

@ -101,7 +101,7 @@ DebugSourceDirs=
UsePackages=0 UsePackages=0
[Parameters] [Parameters]
RunParams= RunParams=
HostApplication=D:\马哥代码\项目代码\云翔\成品仓库(FinishedClothWarehouse.dll)\testDll.exe HostApplication=D:\马国钢开发代码\项目代码\D7WMyunxiang\成品仓库(FinishedClothWarehouse.dll)\testDll.exe
Launcher= Launcher=
UseLauncher=0 UseLauncher=0
DebugCWD= DebugCWD=

5
成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.bpg
View File

@ -9,7 +9,7 @@ MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
DCC = $(ROOT)\bin\dcc32.exe $** DCC = $(ROOT)\bin\dcc32.exe $**
BRCC = $(ROOT)\bin\brcc32.exe $** BRCC = $(ROOT)\bin\brcc32.exe $**
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
PROJECTS = testDll.exe PROJECTS = testDll.exe FinishedClothWarehouse.dll
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
default: $(PROJECTS) default: $(PROJECTS)
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
@ -17,4 +17,7 @@ default: $(PROJECTS)
testDll.exe: testDll.dpr testDll.exe: testDll.dpr
$(DCC) $(DCC)
FinishedClothWarehouse.dll: FinishedClothWarehouse.dpr
$(DCC)

5
成品仓库(FinishedClothWarehouse.dll)/ProjectGroup1.~bpg
View File

@ -9,7 +9,7 @@ MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
DCC = $(ROOT)\bin\dcc32.exe $** DCC = $(ROOT)\bin\dcc32.exe $**
BRCC = $(ROOT)\bin\brcc32.exe $** BRCC = $(ROOT)\bin\brcc32.exe $**
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
PROJECTS = testDll.exe ProductPrice.dll PROJECTS = testDll.exe
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
default: $(PROJECTS) default: $(PROJECTS)
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------
@ -17,7 +17,4 @@ default: $(PROJECTS)
testDll.exe: testDll.dpr testDll.exe: testDll.dpr
$(DCC) $(DCC)
ProductPrice.dll: ProductPrice.dpr
$(DCC)

356
成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm
View File

@ -1,25 +1,25 @@
object frmCKProductBCPOutList: TfrmCKProductBCPOutList object frmCKProductBCPOutList: TfrmCKProductBCPOutList
Left = 245 Left = 309
Top = 105 Top = 334
Width = 1621 Width = 1621
Height = 863 Height = 863
Caption = #25104#21697#20986#24211#21015#34920 Caption = #25104#21697#20986#24211#21015#34920
Color = clBtnFace Color = clBtnFace
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -15 Font.Height = -12
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [] Font.Style = []
OldCreateOrder = False OldCreateOrder = False
OnClose = FormClose OnClose = FormClose
OnCreate = FormCreate OnCreate = FormCreate
OnShow = FormShow OnShow = FormShow
PixelsPerInch = 120 PixelsPerInch = 96
TextHeight = 15 TextHeight = 12
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1603 Width = 1613
Height = 33 Height = 33
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 115 ButtonWidth = 115
@ -64,7 +64,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object ComboBox1: TComboBox object ComboBox1: TComboBox
Left = 317 Left = 317
Top = 0 Top = 1
Width = 128 Width = 128
Height = 27 Height = 27
Style = csDropDownList Style = csDropDownList
@ -110,165 +110,165 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Top = 33 Top = 33
Width = 1603 Width = 1613
Height = 105 Height = 84
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised
BevelOuter = bvLowered BevelOuter = bvLowered
Color = clSkyBlue Color = clSkyBlue
TabOrder = 1 TabOrder = 1
object Label3: TLabel object Label3: TLabel
Left = 553 Left = 442
Top = 15 Top = 12
Width = 92 Width = 80
Height = 22 Height = 19
Caption = #20013#25991#21517#31216 Caption = #20013#25991#21517#31216
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label4: TLabel object Label4: TLabel
Left = 786 Left = 629
Top = 15 Top = 12
Width = 46 Width = 40
Height = 22 Height = 19
Caption = #39068#33394 Caption = #39068#33394
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label2: TLabel object Label2: TLabel
Left = 110 Left = 88
Top = 50 Top = 40
Width = 23 Width = 20
Height = 22 Height = 19
Caption = #33267 Caption = #33267
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label5: TLabel object Label5: TLabel
Left = 316 Left = 253
Top = 50 Top = 40
Width = 92 Width = 80
Height = 22 Height = 19
Caption = #25351#31034#21333#21495 Caption = #25351#31034#21333#21495
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label6: TLabel object Label6: TLabel
Left = 786 Left = 629
Top = 50 Top = 40
Width = 46 Width = 40
Height = 22 Height = 19
Caption = #26465#30721 Caption = #26465#30721
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label7: TLabel object Label7: TLabel
Left = 1018 Left = 814
Top = 15 Top = 12
Width = 46 Width = 40
Height = 22 Height = 19
Caption = #31867#22411 Caption = #31867#22411
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label10: TLabel object Label10: TLabel
Left = 316 Left = 253
Top = 15 Top = 12
Width = 92 Width = 80
Height = 22 Height = 19
Caption = #20986#24211#21333#21495 Caption = #20986#24211#21333#21495
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label11: TLabel object Label11: TLabel
Left = 598 Left = 478
Top = 50 Top = 40
Width = 46 Width = 40
Height = 22 Height = 19
Caption = #32568#21495 Caption = #32568#21495
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label22: TLabel object Label22: TLabel
Left = 1225 Left = 980
Top = 15 Top = 12
Width = 46 Width = 40
Height = 22 Height = 19
Caption = #23458#25143 Caption = #23458#25143
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label24: TLabel object Label24: TLabel
Left = 973 Left = 778
Top = 50 Top = 40
Width = 92 Width = 80
Height = 22 Height = 19
Caption = #20986#24211#31867#22411 Caption = #20986#24211#31867#22411
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label8: TLabel object Label8: TLabel
Left = 1203 Left = 962
Top = 50 Top = 40
Width = 69 Width = 60
Height = 22 Height = 19
Caption = #21512#21516#21495 Caption = #21512#21516#21495
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object MLCodeName: TEdit object MLCodeName: TEdit
Tag = 2 Tag = 2
Left = 648 Left = 518
Top = 10 Top = 8
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -276,30 +276,30 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
OnKeyPress = MLOrderNoKeyPress OnKeyPress = MLOrderNoKeyPress
end end
object BegDate: TDateTimePicker object BegDate: TDateTimePicker
Left = 140 Left = 112
Top = 10 Top = 8
Width = 154 Width = 123
Height = 30 Height = 27
Date = 40768.458268587970000000 Date = 40768.458268587970000000
Time = 40768.458268587970000000 Time = 40768.458268587970000000
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
TabOrder = 0 TabOrder = 0
end end
object EndDate: TDateTimePicker object EndDate: TDateTimePicker
Left = 140 Left = 112
Top = 45 Top = 36
Width = 154 Width = 123
Height = 30 Height = 27
Date = 40768.458268587970000000 Date = 40768.458268587970000000
Time = 40768.458268587970000000 Time = 40768.458268587970000000
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -307,13 +307,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object MLOrderNo: TEdit object MLOrderNo: TEdit
Tag = 2 Tag = 2
Left = 408 Left = 326
Top = 45 Top = 36
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -322,13 +322,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object MJID: TEdit object MJID: TEdit
Tag = 2 Tag = 2
Left = 834 Left = 667
Top = 45 Top = 36
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -337,13 +337,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object CkOrdNo: TEdit object CkOrdNo: TEdit
Tag = 2 Tag = 2
Left = 408 Left = 326
Top = 10 Top = 8
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -351,10 +351,10 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
OnKeyPress = MLOrderNoKeyPress OnKeyPress = MLOrderNoKeyPress
end end
object begtime: TDateTimePicker object begtime: TDateTimePicker
Left = 56 Left = 45
Top = 125 Top = 100
Width = 69 Width = 55
Height = 23 Height = 20
Date = 39780.000000000000000000 Date = 39780.000000000000000000
Format = 'HH:mm' Format = 'HH:mm'
Time = 39780.000000000000000000 Time = 39780.000000000000000000
@ -362,10 +362,10 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
TabOrder = 12 TabOrder = 12
end end
object endTime: TDateTimePicker object endTime: TDateTimePicker
Left = 56 Left = 45
Top = 155 Top = 124
Width = 69 Width = 55
Height = 23 Height = 20
Date = 39780.999317129630000000 Date = 39780.999317129630000000
Format = 'HH:mm' Format = 'HH:mm'
Time = 39780.999317129630000000 Time = 39780.999317129630000000
@ -374,13 +374,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object CXKH: TEdit object CXKH: TEdit
Tag = 2 Tag = 2
Left = 1271 Left = 1017
Top = 10 Top = 8
Width = 100 Width = 80
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -389,17 +389,17 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object CRType: TComboBox object CRType: TComboBox
Tag = 2 Tag = 2
Left = 1065 Left = 852
Top = 45 Top = 36
Width = 113 Width = 90
Height = 30 Height = 27
Style = csDropDownList Style = csDropDownList
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ItemHeight = 22 ItemHeight = 19
ParentFont = False ParentFont = False
TabOrder = 9 TabOrder = 9
OnChange = CRTypeChange OnChange = CRTypeChange
@ -414,17 +414,17 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object CPType: TComboBox object CPType: TComboBox
Tag = 2 Tag = 2
Left = 1065 Left = 852
Top = 10 Top = 8
Width = 113 Width = 90
Height = 30 Height = 27
Style = csDropDownList Style = csDropDownList
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ItemHeight = 22 ItemHeight = 19
ParentFont = False ParentFont = False
TabOrder = 8 TabOrder = 8
OnChange = CPTypeChange OnChange = CPTypeChange
@ -435,15 +435,15 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
'') '')
end end
object IsJYTime: TCheckBox object IsJYTime: TCheckBox
Left = 24 Left = 19
Top = 15 Top = 12
Width = 119 Width = 95
Height = 21 Height = 17
Caption = #26597#35810#26085#26399 Caption = #26597#35810#26085#26399
Checked = True Checked = True
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -452,13 +452,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object MLColor: TEdit object MLColor: TEdit
Tag = 2 Tag = 2
Left = 834 Left = 667
Top = 10 Top = 8
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -467,13 +467,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object ganghao: TEdit object ganghao: TEdit
Tag = 2 Tag = 2
Left = 648 Left = 518
Top = 45 Top = 36
Width = 112 Width = 90
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -482,13 +482,13 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object MLConNo: TEdit object MLConNo: TEdit
Tag = 2 Tag = 2
Left = 1271 Left = 1017
Top = 45 Top = 36
Width = 100 Width = 80
Height = 25 Height = 30
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -22 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -498,9 +498,9 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object cxGrid2: TcxGrid object cxGrid2: TcxGrid
Left = 0 Left = 0
Top = 177 Top = 150
Width = 1603 Width = 1613
Height = 639 Height = 682
Align = alClient Align = alClient
PopupMenu = PopupMenu1 PopupMenu = PopupMenu1
TabOrder = 3 TabOrder = 3
@ -670,7 +670,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object v1Column10: TcxGridDBColumn object v1Column10: TcxGridDBColumn
Caption = #32568#21495 Caption = #32568#21495
DataBinding.FieldName = 'ganghao' DataBinding.FieldName = 'gangNO'
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Options.Editing = False Options.Editing = False
Width = 79 Width = 79
@ -702,16 +702,16 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
end end
object MovePanel2: TMovePanel object MovePanel2: TMovePanel
Left = 590 Left = 472
Top = 400 Top = 320
Width = 361 Width = 289
Height = 61 Height = 49
BevelInner = bvLowered BevelInner = bvLowered
Caption = #27491#22312#25191#34892#25968#25454#25805#20316#65292#35831#31245#21518#12290#12290#12290 Caption = #27491#22312#25191#34892#25968#25454#25805#20316#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue Color = clSkyBlue
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clRed Font.Color = clRed
Font.Height = -17 Font.Height = -13
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -720,65 +720,65 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object Panel6: TPanel object Panel6: TPanel
Left = 0 Left = 0
Top = 138 Top = 117
Width = 1603 Width = 1613
Height = 39 Height = 33
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderStyle = bsSingle BorderStyle = bsSingle
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
TabOrder = 2 TabOrder = 2
DesignSize = ( DesignSize = (
1599 1609
35) 29)
object LBCPAP: TLabel object LBCPAP: TLabel
Left = 634 Left = 507
Top = 4 Top = 3
Width = 106 Width = 85
Height = 27 Height = 22
Alignment = taCenter Alignment = taCenter
Anchors = [akLeft, akTop, akBottom] Anchors = [akLeft, akTop, akBottom]
AutoSize = False AutoSize = False
Caption = #24403#21069#39029'/'#24635#39029#25968 Caption = #24403#21069#39029'/'#24635#39029#25968
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
Layout = tlCenter Layout = tlCenter
end end
object Label1: TLabel object Label1: TLabel
Left = 30 Left = 24
Top = 5 Top = 4
Width = 158 Width = 126
Height = 28 Height = 22
Alignment = taCenter Alignment = taCenter
Anchors = [akLeft, akTop, akBottom] Anchors = [akLeft, akTop, akBottom]
AutoSize = False AutoSize = False
Caption = #27599#39029#35760#24405#26465#25968 Caption = #27599#39029#35760#24405#26465#25968
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
Layout = tlCenter Layout = tlCenter
end end
object BTLP: TButton object BTLP: TButton
Left = 524 Left = 419
Top = 3 Top = 2
Width = 97 Width = 78
Height = 31 Height = 25
Caption = #19978#19968#39029 Caption = #19978#19968#39029
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -786,14 +786,14 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
OnClick = BTLPClick OnClick = BTLPClick
end end
object BTNP: TButton object BTNP: TButton
Left = 746 Left = 597
Top = 1 Top = 1
Width = 98 Width = 78
Height = 32 Height = 25
Caption = #19979#19968#39029 Caption = #19979#19968#39029
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
@ -802,18 +802,18 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
end end
object TCBNOR: TComboBox object TCBNOR: TComboBox
Tag = 2 Tag = 2
Left = 195 Left = 156
Top = 1 Top = 1
Width = 98 Width = 78
Height = 31 Height = 27
Style = csDropDownList Style = csDropDownList
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
Font.Height = -23 Font.Height = -19
Font.Name = #23435#20307 Font.Name = #23435#20307
Font.Style = [fsBold] Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 23 ItemHeight = 19
ItemIndex = 0 ItemIndex = 0
ParentFont = False ParentFont = False
TabOrder = 2 TabOrder = 2

16
成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas
View File

@ -11,7 +11,21 @@ uses
ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
cxDropDownEdit, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, RM_System, cxDropDownEdit, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, RM_System,
RM_GridReport, cxCheckBox, Menus, MovePanel, RM_E_llPDF, cxCalendar, Math, 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 type
TfrmCKProductBCPOutList = class(TForm) TfrmCKProductBCPOutList = class(TForm)

2
成品仓库(FinishedClothWarehouse.dll)/U_DataLink.dfm
View File

@ -17858,7 +17858,7 @@ object DataLink_FinishedClothWarehouse: TDataLink_FinishedClothWarehouse
object ThreeColorBase: TcxStyleRepository object ThreeColorBase: TcxStyleRepository
Left = 147 Left = 147
Top = 80 Top = 80
PixelsPerInch = 120 PixelsPerInch = 96
object SHuangSe: TcxStyle object SHuangSe: TcxStyle
AssignedValues = [svColor, svFont, svTextColor] AssignedValues = [svColor, svFont, svTextColor]
Color = 4707838 Color = 4707838

16
成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas
View File

@ -4,7 +4,21 @@ interface
uses uses
SysUtils, Classes, DB, ADODB, ImgList, Controls, cxStyles, cxLookAndFeels, 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 var
DConString:String; {全局连接字符串} DConString:String; {全局连接字符串}
server, dtbase, user, pswd: String; {数据库连接参数} server, dtbase, user, pswd: String; {数据库连接参数}

2
成品仓库(FinishedClothWarehouse.dll)/U_testdll.dfm
View File

@ -21,7 +21,7 @@ object Form1: TForm1
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 775 Width = 783
Height = 25 Height = 25
ButtonWidth = 57 ButtonWidth = 57
Caption = 'ToolBar1' Caption = 'ToolBar1'