1
This commit is contained in:
ddf
parent
eae38d4fd4
commit
14f3173a13
|
|
@ -1,6 +1,6 @@
|
|||
object frmCPCKMdList: TfrmCPCKMdList
|
||||
Left = 248
|
||||
Top = 179
|
||||
Left = 572
|
||||
Top = 322
|
||||
Width = 1128
|
||||
Height = 516
|
||||
Caption = #30721#21333#25171#21360
|
||||
|
|
@ -20,7 +20,7 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
object ToolBar1: TToolBar
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1112
|
||||
Width = 1120
|
||||
AutoSize = True
|
||||
ButtonHeight = 30
|
||||
ButtonWidth = 95
|
||||
|
|
@ -112,7 +112,7 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
object Panel1: TPanel
|
||||
Left = 0
|
||||
Top = 32
|
||||
Width = 1112
|
||||
Width = 1120
|
||||
Height = 93
|
||||
Align = alTop
|
||||
BevelInner = bvRaised
|
||||
|
|
@ -141,18 +141,19 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
Caption = #30003#35831#21333#21495
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 515
|
||||
Left = 531
|
||||
Top = 12
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #21697#21517
|
||||
end
|
||||
object Label5: TLabel
|
||||
Left = 189
|
||||
Top = 36
|
||||
Left = 869
|
||||
Top = 60
|
||||
Width = 48
|
||||
Height = 12
|
||||
Caption = #21512' '#21516' '#21495
|
||||
Visible = False
|
||||
end
|
||||
object Label8: TLabel
|
||||
Left = 357
|
||||
|
|
@ -162,25 +163,26 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
Caption = #20986#24211#31867#22411
|
||||
end
|
||||
object Label12: TLabel
|
||||
Left = 515
|
||||
Top = 36
|
||||
Left = 381
|
||||
Top = 12
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #32534#21495
|
||||
end
|
||||
object Label14: TLabel
|
||||
Left = 357
|
||||
Top = 12
|
||||
Width = 48
|
||||
Left = 531
|
||||
Top = 36
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #23458' '#25143
|
||||
Caption = #23458#25143
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 656
|
||||
Top = 12
|
||||
Left = 800
|
||||
Top = 28
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #25209#21495
|
||||
Visible = False
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 64
|
||||
|
|
@ -196,8 +198,8 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
ParentFont = False
|
||||
end
|
||||
object Label7: TLabel
|
||||
Left = 632
|
||||
Top = 35
|
||||
Left = 189
|
||||
Top = 36
|
||||
Width = 48
|
||||
Height = 12
|
||||
Caption = #25910#36135#21333#20301
|
||||
|
|
@ -233,7 +235,7 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
end
|
||||
object P_CodeName: TEdit
|
||||
Tag = 2
|
||||
Left = 541
|
||||
Left = 557
|
||||
Top = 8
|
||||
Width = 87
|
||||
Height = 20
|
||||
|
|
@ -242,11 +244,12 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
end
|
||||
object Conno: TEdit
|
||||
Tag = 2
|
||||
Left = 246
|
||||
Top = 32
|
||||
Left = 926
|
||||
Top = 56
|
||||
Width = 87
|
||||
Height = 20
|
||||
TabOrder = 6
|
||||
Visible = False
|
||||
OnChange = ConnoChange
|
||||
OnKeyPress = ConnoKeyPress
|
||||
end
|
||||
|
|
@ -267,8 +270,8 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
end
|
||||
object P_Code: TEdit
|
||||
Tag = 2
|
||||
Left = 541
|
||||
Top = 32
|
||||
Left = 409
|
||||
Top = 8
|
||||
Width = 87
|
||||
Height = 20
|
||||
TabOrder = 8
|
||||
|
|
@ -276,8 +279,8 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
end
|
||||
object KHName: TEdit
|
||||
Tag = 2
|
||||
Left = 409
|
||||
Top = 8
|
||||
Left = 557
|
||||
Top = 32
|
||||
Width = 87
|
||||
Height = 20
|
||||
TabOrder = 2
|
||||
|
|
@ -285,17 +288,18 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
end
|
||||
object BatchNo: TEdit
|
||||
Tag = 2
|
||||
Left = 682
|
||||
Top = 8
|
||||
Left = 826
|
||||
Top = 24
|
||||
Width = 87
|
||||
Height = 20
|
||||
TabOrder = 4
|
||||
Visible = False
|
||||
OnChange = P_CodeNameChange
|
||||
end
|
||||
object SHDWName: TEdit
|
||||
Tag = 2
|
||||
Left = 682
|
||||
Top = 31
|
||||
Left = 246
|
||||
Top = 32
|
||||
Width = 87
|
||||
Height = 20
|
||||
TabOrder = 9
|
||||
|
|
@ -322,8 +326,8 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
object cxGrid1: TcxGrid
|
||||
Left = 0
|
||||
Top = 147
|
||||
Width = 1112
|
||||
Height = 330
|
||||
Width = 1120
|
||||
Height = 338
|
||||
Align = alClient
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
|
|
@ -685,7 +689,7 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
object cxTabControl1: TcxTabControl
|
||||
Left = 0
|
||||
Top = 125
|
||||
Width = 1112
|
||||
Width = 1120
|
||||
Height = 22
|
||||
Align = alTop
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -771,8 +775,8 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
ScaleX = 1.000000000000000000
|
||||
ScaleY = 1.000000000000000000
|
||||
CompressFile = False
|
||||
Left = 256
|
||||
Top = 260
|
||||
Left = 280
|
||||
Top = 268
|
||||
end
|
||||
object ADOQueryDH: TADOQuery
|
||||
Connection = DataLink_FinishedClothWarehouse.ADOLink
|
||||
|
|
@ -810,6 +814,6 @@ object frmCPCKMdList: TfrmCPCKMdList
|
|||
Aggregates = <>
|
||||
Params = <>
|
||||
Left = 443
|
||||
Top = 134
|
||||
Top = 198
|
||||
end
|
||||
end
|
||||
|
|
|
|||
|
|
@ -14,18 +14,17 @@ uses
|
|||
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu, cxPC,
|
||||
dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter, 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, dxSkinValentine, dxSkinVS2010, dxSkinWhiteprint,
|
||||
dxSkinXmas2008Blue;
|
||||
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, dxSkinValentine, dxSkinVS2010,
|
||||
dxSkinWhiteprint, dxSkinXmas2008Blue;
|
||||
|
||||
type
|
||||
TfrmCPCKMdList = class(TForm)
|
||||
|
|
@ -193,7 +192,7 @@ begin
|
|||
case cxTabControl1.TabIndex of
|
||||
0: /////////////////////////»ã×Ü//////////////////////////////
|
||||
begin
|
||||
SQL.Add('SELECT AA.*,C.KHName,C.SYRName,C.ywy,C.DeliveryDate,C.Note,D.P_Code,D.P_CodeName,D.P_Spec,D.P_MF,D.P_KZ,D.P_Color ');
|
||||
SQL.Add('SELECT AA.*,C.KHName,C.SYRName,C.ywy,C.DeliveryDate,C.Note,D.P_CodeName,D.P_Spec,D.P_MF,D.P_KZ,D.P_Color ');
|
||||
SQL.Add(',E.SQDate,E.SQType,E.Filler,E.Chker,E.ChkTime,E.FHDate,e.ranchang FROM(');
|
||||
Sql.Add(' select A.FHMainid,A.SHDWName,B.FromMainId,B.FromSubId,B.P_Code,B.SQPiQty');
|
||||
Sql.Add(' ,FHPiQtyHZ=(select count(JSLen) from CK_Cloth_CR X where X.CKNO=A.FHMainId and X.P_Code=B.P_Code)');
|
||||
|
|
@ -275,6 +274,7 @@ procedure TfrmCPCKMdList.TBFindClick(Sender: TObject);
|
|||
begin
|
||||
if ADOQueryMain.Active then
|
||||
begin
|
||||
// ShowMessage(SGetFilters(Panel1, 1, 2));
|
||||
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
|
||||
SCreateCDS20(ADOQueryMain, CDS_Main);
|
||||
SInitCDSData20(ADOQueryMain, CDS_Main);
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user