This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-05-19 16:52:45 +08:00
parent 457d5137c0
commit bc250e3bce
5 changed files with 145 additions and 55 deletions

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; {数据库连接参数}

View File

@ -18,7 +18,7 @@ object frmOrderInPut: TfrmOrderInPut
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1101 Width = 1109
Height = 29 Height = 29
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 59 ButtonWidth = 59
@ -58,8 +58,8 @@ object frmOrderInPut: TfrmOrderInPut
object ScrollBox1: TScrollBox object ScrollBox1: TScrollBox
Left = 0 Left = 0
Top = 29 Top = 29
Width = 1101 Width = 1109
Height = 312 Height = 316
Align = alTop Align = alTop
BevelInner = bvNone BevelInner = bvNone
BevelOuter = bvNone BevelOuter = bvNone
@ -122,7 +122,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label12: TLabel object Label12: TLabel
Left = 29 Left = 29
Top = 126 Top = 124
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #38376' '#24133#65306 Caption = #38376' '#24133#65306
@ -135,7 +135,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label13: TLabel object Label13: TLabel
Left = 224 Left = 224
Top = 126 Top = 124
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #20811' '#37325#65306 Caption = #20811' '#37325#65306
@ -148,7 +148,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label2: TLabel object Label2: TLabel
Left = 31 Left = 31
Top = 102 Top = 99
Width = 65 Width = 65
Height = 12 Height = 12
Caption = #20135#21697#21517#31216#65306 Caption = #20135#21697#21517#31216#65306
@ -161,7 +161,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label6: TLabel object Label6: TLabel
Left = 224 Left = 224
Top = 102 Top = 99
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #32568' '#21495#65306 Caption = #32568' '#21495#65306
@ -174,7 +174,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label19: TLabel object Label19: TLabel
Left = 31 Left = 31
Top = 200 Top = 193
Width = 65 Width = 65
Height = 12 Height = 12
Caption = #21253#35013#35201#27714#65306 Caption = #21253#35013#35201#27714#65306
@ -213,7 +213,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label23: TLabel object Label23: TLabel
Left = 29 Left = 29
Top = 258 Top = 251
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #22791' '#27880#65306 Caption = #22791' '#27880#65306
@ -252,7 +252,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label5: TLabel object Label5: TLabel
Left = 29 Left = 29
Top = 151 Top = 148
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #39068' '#33394#65306 Caption = #39068' '#33394#65306
@ -265,7 +265,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label9: TLabel object Label9: TLabel
Left = 29 Left = 29
Top = 177 Top = 170
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #21305' '#25968#65306 Caption = #21305' '#25968#65306
@ -278,7 +278,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label15: TLabel object Label15: TLabel
Left = 231 Left = 231
Top = 177 Top = 170
Width = 60 Width = 60
Height = 12 Height = 12
Caption = #25968' '#37327#65306 Caption = #25968' '#37327#65306
@ -291,7 +291,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label16: TLabel object Label16: TLabel
Left = 225 Left = 225
Top = 151 Top = 148
Width = 65 Width = 65
Height = 12 Height = 12
Caption = #25968#37327#21333#20301#65306 Caption = #25968#37327#21333#20301#65306
@ -304,7 +304,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label7: TLabel object Label7: TLabel
Left = 402 Left = 402
Top = 104 Top = 99
Width = 78 Width = 78
Height = 12 Height = 12
Caption = #23458#25143#21512#21516#21495#65306 Caption = #23458#25143#21512#21516#21495#65306
@ -317,7 +317,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label4: TLabel object Label4: TLabel
Left = 408 Left = 408
Top = 129 Top = 124
Width = 66 Width = 66
Height = 12 Height = 12
Caption = #33394' '#21345' '#21495#65306 Caption = #33394' '#21345' '#21495#65306
@ -330,7 +330,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label17: TLabel object Label17: TLabel
Left = 404 Left = 404
Top = 155 Top = 148
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #24037' '#33402#65306 Caption = #24037' '#33402#65306
@ -343,7 +343,7 @@ object frmOrderInPut: TfrmOrderInPut
end end
object Label18: TLabel object Label18: TLabel
Left = 405 Left = 405
Top = 179 Top = 172
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #31354' '#21152#65306 Caption = #31354' '#21152#65306
@ -354,6 +354,32 @@ object frmOrderInPut: TfrmOrderInPut
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label20: TLabel
Left = 602
Top = 99
Width = 39
Height = 12
Caption = #25104#20998#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 602
Top = 124
Width = 39
Height = 12
Caption = #27454#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object OrderNo: TEdit object OrderNo: TEdit
Tag = 1 Tag = 1
Left = 97 Left = 97
@ -410,7 +436,7 @@ object frmOrderInPut: TfrmOrderInPut
object MPRTBZNote: TMemo object MPRTBZNote: TMemo
Tag = 1 Tag = 1
Left = 97 Left = 97
Top = 198 Top = 191
Width = 633 Width = 633
Height = 50 Height = 50
Hint = 'MPRTBZNote/'#21253#35013#35201#27714 Hint = 'MPRTBZNote/'#21253#35013#35201#27714
@ -421,7 +447,7 @@ object frmOrderInPut: TfrmOrderInPut
object Note: TMemo object Note: TMemo
Tag = 1 Tag = 1
Left = 97 Left = 97
Top = 254 Top = 247
Width = 633 Width = 633
Height = 50 Height = 50
Hint = 'OrdNote/'#22791#27880 Hint = 'OrdNote/'#22791#27880
@ -432,7 +458,7 @@ object frmOrderInPut: TfrmOrderInPut
object MPRTMF: TEdit object MPRTMF: TEdit
Tag = 1 Tag = 1
Left = 97 Left = 97
Top = 123 Top = 121
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 7 TabOrder = 7
@ -440,7 +466,7 @@ object frmOrderInPut: TfrmOrderInPut
object MPRTSpec: TEdit object MPRTSpec: TEdit
Tag = 1 Tag = 1
Left = 288 Left = 288
Top = 99 Top = 96
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 6 TabOrder = 6
@ -448,7 +474,7 @@ object frmOrderInPut: TfrmOrderInPut
object MPRTKZ: TEdit object MPRTKZ: TEdit
Tag = 1 Tag = 1
Left = 288 Left = 288
Top = 123 Top = 121
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 8 TabOrder = 8
@ -482,7 +508,7 @@ object frmOrderInPut: TfrmOrderInPut
object PRTColor: TEdit object PRTColor: TEdit
Tag = 2 Tag = 2
Left = 97 Left = 97
Top = 148 Top = 145
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 9 TabOrder = 9
@ -491,7 +517,7 @@ object frmOrderInPut: TfrmOrderInPut
object MPRTCodeName: TBtnEditC object MPRTCodeName: TBtnEditC
Tag = 1 Tag = 1
Left = 97 Left = 97
Top = 98 Top = 95
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'MPRTCode/'#20135#21697#32534#21495 Hint = 'MPRTCode/'#20135#21697#32534#21495
@ -502,7 +528,7 @@ object frmOrderInPut: TfrmOrderInPut
object PRTPs: TEdit object PRTPs: TEdit
Tag = 2 Tag = 2
Left = 97 Left = 97
Top = 174 Top = 167
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 14 TabOrder = 14
@ -511,7 +537,7 @@ object frmOrderInPut: TfrmOrderInPut
object PRTOrderQty: TEdit object PRTOrderQty: TEdit
Tag = 2 Tag = 2
Left = 288 Left = 288
Top = 174 Top = 167
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 15 TabOrder = 15
@ -520,7 +546,7 @@ object frmOrderInPut: TfrmOrderInPut
object OrderUnit: TEdit object OrderUnit: TEdit
Tag = 2 Tag = 2
Left = 287 Left = 287
Top = 148 Top = 145
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 16 TabOrder = 16
@ -537,7 +563,7 @@ object frmOrderInPut: TfrmOrderInPut
object KHConno: TEdit object KHConno: TEdit
Tag = 1 Tag = 1
Left = 474 Left = 474
Top = 101 Top = 96
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 18 TabOrder = 18
@ -545,7 +571,7 @@ object frmOrderInPut: TfrmOrderInPut
object PRTColorNo: TEdit object PRTColorNo: TEdit
Tag = 2 Tag = 2
Left = 474 Left = 474
Top = 126 Top = 121
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 19 TabOrder = 19
@ -554,7 +580,7 @@ object frmOrderInPut: TfrmOrderInPut
object gongyi: TBtnEditC object gongyi: TBtnEditC
Tag = 1 Tag = 1
Left = 474 Left = 474
Top = 151 Top = 144
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'gongyi/'#24037#33402 Hint = 'gongyi/'#24037#33402
@ -565,25 +591,42 @@ object frmOrderInPut: TfrmOrderInPut
object KJIA: TEdit object KJIA: TEdit
Tag = 2 Tag = 2
Left = 474 Left = 474
Top = 178 Top = 171
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 21 TabOrder = 21
OnChange = PRTColorChange OnChange = PRTColorChange
end end
object MPRTCF: TEdit
Tag = 1
Left = 646
Top = 96
Width = 100
Height = 18
TabOrder = 22
end
object PRTKuanNO: TEdit
Tag = 2
Left = 645
Top = 121
Width = 100
Height = 18
TabOrder = 23
OnChange = PRTColorChange
end
end end
object cxPageControl1: TcxPageControl object cxPageControl1: TcxPageControl
Left = 0 Left = 0
Top = 341 Top = 345
Width = 1101 Width = 1109
Height = 363 Height = 367
Align = alClient Align = alClient
TabOrder = 2 TabOrder = 2
Properties.ActivePage = cxTabSheet4 Properties.ActivePage = cxTabSheet4
Properties.CustomButtons.Buttons = <> Properties.CustomButtons.Buttons = <>
Properties.Style = 8 Properties.Style = 8
ClientRectBottom = 363 ClientRectBottom = 367
ClientRectRight = 1101 ClientRectRight = 1109
ClientRectTop = 23 ClientRectTop = 23
object cxTabSheet3: TcxTabSheet object cxTabSheet3: TcxTabSheet
Caption = #24037#24207#23450#20041 Caption = #24037#24207#23450#20041
@ -592,6 +635,7 @@ object frmOrderInPut: TfrmOrderInPut
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1101 Width = 1101
Height = 29
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 107 ButtonWidth = 107
@ -691,7 +735,7 @@ object frmOrderInPut: TfrmOrderInPut
object ToolBar2: TToolBar object ToolBar2: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1101 Width = 1109
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 83 ButtonWidth = 83
@ -720,8 +764,8 @@ object frmOrderInPut: TfrmOrderInPut
object cxGrid1: TcxGrid object cxGrid1: TcxGrid
Left = 0 Left = 0
Top = 32 Top = 32
Width = 1101 Width = 1109
Height = 308 Height = 312
Align = alClient Align = alClient
TabOrder = 1 TabOrder = 1
object TV1: TcxGridDBTableView object TV1: TcxGridDBTableView
@ -850,8 +894,8 @@ object frmOrderInPut: TfrmOrderInPut
object CDS_PBCK: TClientDataSet object CDS_PBCK: TClientDataSet
Aggregates = <> Aggregates = <>
Params = <> Params = <>
Left = 537 Left = 657
Top = 521 Top = 553
end end
object DS_PBKC: TDataSource object DS_PBKC: TDataSource
DataSet = CDS_PBCK DataSet = CDS_PBCK

View File

@ -11,7 +11,21 @@ uses
StdCtrls, ToolWin, DBClient, ADODB, ExtCtrls, BtnEdit, cxCalendar, StrUtils, StdCtrls, ToolWin, DBClient, ADODB, ExtCtrls, BtnEdit, cxCalendar, StrUtils,
cxCurrencyEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxDropDownEdit, cxCurrencyEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxDropDownEdit,
RM_Common, RM_Preview, RM_System, RM_Class, RM_GridReport, cxPC, Menus, RM_Common, RM_Preview, RM_System, RM_Class, RM_GridReport, cxPC, Menus,
cxLookAndFeels, cxLookAndFeelPainters, dxBarBuiltInMenu, cxNavigator; cxLookAndFeels, cxLookAndFeelPainters, dxBarBuiltInMenu, 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
TfrmOrderInPut = class(TForm) TfrmOrderInPut = class(TForm)
@ -101,6 +115,10 @@ type
gongyi: TBtnEditC; gongyi: TBtnEditC;
KJIA: TEdit; KJIA: TEdit;
Label18: TLabel; Label18: TLabel;
Label20: TLabel;
MPRTCF: TEdit;
Label21: TLabel;
PRTKuanNO: TEdit;
procedure TBCloseClick(Sender: TObject); procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject); procedure FormShow(Sender: TObject);
procedure TBSaveClick(Sender: TObject); procedure TBSaveClick(Sender: TObject);

View File

@ -19,7 +19,7 @@ object frmProductOrderList: TfrmProductOrderList
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1240 Width = 1248
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 95 ButtonWidth = 95
@ -162,16 +162,16 @@ object frmProductOrderList: TfrmProductOrderList
object cxPageControl1: TcxPageControl object cxPageControl1: TcxPageControl
Left = 0 Left = 0
Top = 162 Top = 162
Width = 1240 Width = 1248
Height = 553 Height = 561
Align = alClient Align = alClient
TabOrder = 1 TabOrder = 1
Properties.ActivePage = cxTabSheet4 Properties.ActivePage = cxTabSheet4
Properties.CustomButtons.Buttons = <> Properties.CustomButtons.Buttons = <>
Properties.Style = 8 Properties.Style = 8
OnChange = cxPageControl1Change OnChange = cxPageControl1Change
ClientRectBottom = 553 ClientRectBottom = 561
ClientRectRight = 1240 ClientRectRight = 1248
ClientRectTop = 23 ClientRectTop = 23
object cxTabSheet3: TcxTabSheet object cxTabSheet3: TcxTabSheet
Caption = #22383#24067#24211#21015#34920 Caption = #22383#24067#24211#21015#34920
@ -412,7 +412,7 @@ object frmProductOrderList: TfrmProductOrderList
object cxTabControl1: TcxTabControl object cxTabControl1: TcxTabControl
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1240 Width = 1248
Height = 22 Height = 22
Align = alTop Align = alTop
TabOrder = 0 TabOrder = 0
@ -426,14 +426,14 @@ object frmProductOrderList: TfrmProductOrderList
#20840#37096) #20840#37096)
OnChange = cxTabControl1Change OnChange = cxTabControl1Change
ClientRectBottom = 22 ClientRectBottom = 22
ClientRectRight = 1240 ClientRectRight = 1248
ClientRectTop = 22 ClientRectTop = 22
end end
object cxGrid1: TcxGrid object cxGrid1: TcxGrid
Left = 0 Left = 0
Top = 22 Top = 22
Width = 1240 Width = 1248
Height = 508 Height = 516
Align = alClient Align = alClient
PopupMenu = PopupMenu1 PopupMenu = PopupMenu1
TabOrder = 1 TabOrder = 1
@ -642,7 +642,7 @@ object frmProductOrderList: TfrmProductOrderList
object Panel2: TPanel object Panel2: TPanel
Left = 0 Left = 0
Top = 32 Top = 32
Width = 1240 Width = 1248
Height = 65 Height = 65
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised
@ -817,7 +817,7 @@ object frmProductOrderList: TfrmProductOrderList
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Top = 97 Top = 97
Width = 1240 Width = 1248
Height = 65 Height = 65
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised

View File

@ -13,7 +13,21 @@ uses
RM_Dataset, RM_System, RM_GridReport, cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_GridReport, cxGridCustomPopupMenu, cxGridPopupMenu,
cxPC, cxSplitter, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, cxPC, cxSplitter, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdFTP, ShellAPI, cxCheckBox, cxDropDownEdit, cxLookAndFeels, IdFTP, ShellAPI, cxCheckBox, cxDropDownEdit, cxLookAndFeels,
cxLookAndFeelPainters, dxBarBuiltInMenu, cxNavigator; cxLookAndFeelPainters, dxBarBuiltInMenu, 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
TfrmProductOrderList = class(TForm) TfrmProductOrderList = class(TForm)