RTFormwork/项目代码/RTBasicsV1/T05贸易门市管理/U_TradeDispatchedList.dfm

1015 lines
26 KiB
Plaintext
Raw Normal View History

2024-07-29 13:06:23 +08:00
inherited frmTradeDispatchedList: TfrmTradeDispatchedList
Left = 165
Top = 13
Caption = #37197#36135#31649#29702
ClientHeight = 562
ClientWidth = 1540
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1556
ExplicitHeight = 601
PixelsPerInch = 96
TextHeight = 17
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1540
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 103
Caption = 'ToolBar1'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeMarket.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object ToolButton1: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #25195#25551#37197#36135
ImageIndex = 8
OnClick = ToolButton1Click
end
object TBPrint: TToolButton
Left = 166
Top = 0
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = TBPrintClick
end
object TBPrint1: TToolButton
Left = 237
Top = 0
AutoSize = True
Caption = #25171#21360#20986#24211#21333
ImageIndex = 21
OnClick = TBPrint1Click
end
object TBCK: TToolButton
Left = 344
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 8
OnClick = TBCKClick
end
object TBFJ: TToolButton
Left = 415
Top = 0
AutoSize = True
Caption = #38468#20214
ImageIndex = 22
OnClick = TBFJClick
end
object ToolButton2: TToolButton
Left = 486
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 581
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 38
Width = 1540
Height = 67
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
object Label3: TLabel
Left = 283
Top = 20
Width = 52
Height = 12
Caption = #22823#36135#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 613
Top = 119
Width = 26
Height = 12
Caption = #20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 612
Top = 20
Width = 26
Height = 12
Caption = #23458#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 449
Top = 20
Width = 52
Height = 12
Caption = #20135#21697#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TMMNo: TEdit
Tag = 2
Left = 341
Top = 16
Width = 101
Height = 25
TabOrder = 0
OnKeyPress = TMMNoKeyPress
end
object MPRTKZ: TEdit
Tag = 2
Left = 654
Top = 99
Width = 56
Height = 25
TabOrder = 1
end
object CustName: TEdit
Tag = 2
Left = 644
Top = 16
Width = 104
Height = 25
TabOrder = 2
OnKeyPress = TMMNoKeyPress
end
object C_Name: TEdit
Tag = 2
Left = 504
Top = 16
Width = 101
Height = 25
TabOrder = 3
OnKeyPress = TMMNoKeyPress
end
object CheckBox3: TCheckBox
Left = 776
Top = 16
Width = 99
Height = 19
Caption = #20840#36873
TabOrder = 4
OnClick = CheckBox3Click
end
object BegDate: TDateTimePicker
Left = 152
Top = 16
Width = 101
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464742650459811600
TabOrder = 5
end
object EndDate: TDateTimePicker
Left = 152
Top = 42
Width = 102
Height = 20
Date = 40675.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.464761099538009100
TabOrder = 6
end
object ComboBox1: TComboBox
Left = 49
Top = 16
Width = 93
Height = 25
TabOrder = 7
Text = #21046#21333#26085#26399
OnChange = ComboBox1Change
Items.Strings = (
#21046#21333#26085#26399
#20132#36135#26085#26399)
end
object CheckBox1: TCheckBox
Left = 28
Top = 18
Width = 19
Height = 17
Checked = True
State = cbChecked
TabOrder = 8
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 127
Width = 1540
Height = 205
Align = alClient
PopupMenu = PM_1
TabOrder = 2
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DataSource1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv1Column11
end
item
Kind = skSum
Column = Tv1Column10
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.IndicatorWidth = 30
Styles.Content = DataLink_TradeMarket.Default
Styles.IncSearch = DataLink_TradeMarket.SHuangSe
Styles.Footer = DataLink_TradeMarket.Default
Styles.Header = DataLink_TradeMarket.Default
Styles.Inactive = DataLink_TradeMarket.SHuangSe
Styles.Selection = DataLink_TradeMarket.SHuangSe
object v1Column16: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'SSel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
HeaderAlignmentHorz = taCenter
Width = 50
end
object Tv1Column14: TcxGridDBColumn
Caption = #22823#36135#21333#21495
DataBinding.FieldName = 'TMMNO'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1OrdDate: TcxGridDBColumn
Caption = #21046#21333#26085#26399
DataBinding.FieldName = 'OrdDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeMarket.Default
Width = 66
end
object Tv1Column2: TcxGridDBColumn
Caption = #32463#33829#21333#20301
DataBinding.FieldName = 'OurCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeMarket.FontBlue
Width = 66
end
object Tv1Column4: TcxGridDBColumn
Caption = #23458#25143
DataBinding.FieldName = 'CustName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeMarket.FoneClMaroon
Width = 66
end
object v1DeliveryDate: TcxGridDBColumn
Caption = #20132#36135#26085#26399
DataBinding.FieldName = 'DlyDate'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxDateEditProperties'
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeMarket.Default
Width = 66
end
object Tv1Column9: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
end
object Tv1Column12: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
end
object Tv1Column13: TcxGridDBColumn
Caption = #20013#25991#39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
end
object Tv1Column15: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object Tv1Column11: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'TMSPiece'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column10: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'TMSQty'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column7: TcxGridDBColumn
Caption = #37197#36135#21305#25968
DataBinding.FieldName = 'PHRollNum'
DataBinding.IsNullValueType = True
end
object Tv1Column8: TcxGridDBColumn
Caption = #37197#36135#25968#37327
DataBinding.FieldName = 'PHQty'
DataBinding.IsNullValueType = True
end
object v1Column11: TcxGridDBColumn
Caption = #21333#20301
DataBinding.FieldName = 'TMSUnit'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column6: TcxGridDBColumn
Caption = #21046#21333#20154
DataBinding.FieldName = 'FILLER'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column1: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'OrdNote'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column3: TcxGridDBColumn
Caption = #21457#36135#22320#22336
DataBinding.FieldName = 'ShippingAddress'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 134
end
object Tv1Column5: TcxGridDBColumn
Caption = #32852#31995#26041#24335
DataBinding.FieldName = 'CONTACT'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel2: TPanel [3]
Left = 0
Top = 366
Width = 1540
Height = 196
Align = alBottom
BevelOuter = bvNone
Caption = 'Panel2'
TabOrder = 3
object cxGrid2: TcxGrid
Left = 0
Top = 0
Width = 1540
Height = 231
Align = alTop
TabOrder = 0
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_PH
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <
item
Kind = skSum
Position = spFooter
Column = V2Column5
end
item
Kind = skCount
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
Column = V2Column5
end
item
Kind = skCount
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Position = spFooter
end
item
Kind = skSum
end>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
Column = V2Column5
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.Inserting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
object V2Column13: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'ssel'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Width = 41
end
object V2Column10: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'CIID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 75
end
object V2Column2: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_Name'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object TV2Column2: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'C_Code'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 70
end
object V2Column3: TcxGridDBColumn
Caption = #35268#26684
DataBinding.FieldName = 'C_Spec'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object V2C_Color: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'C_Color'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object TV2Column1: TcxGridDBColumn
Caption = #33457#22411
DataBinding.FieldName = 'C_Pattern'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object V2Column5: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'stkmeter'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object V2Column6: TcxGridDBColumn
Caption = #32568#21495
DataBinding.FieldName = 'batchno'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object V2Column11: TcxGridDBColumn
Caption = #26579#21378#32568#21495
DataBinding.FieldName = 'RCGangNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object V2Filler: TcxGridDBColumn
Caption = #37197#36135#20154#21592
DataBinding.FieldName = 'Filler'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object V2Column12: TcxGridDBColumn
Caption = #37197#36135#26102#38388
DataBinding.FieldName = 'FillTime'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 90
end
object V2Column14: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'C_Width'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object V2Column15: TcxGridDBColumn
Caption = #20811#37325'(g/'#13217')'
DataBinding.FieldName = 'C_GramWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 60
end
object V2Column16: TcxGridDBColumn
Caption = #21152#24037#21378
DataBinding.FieldName = 'factoryName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
end
object cxGrid2Level1: TcxGridLevel
GridView = TV2
end
end
end
object cxTabControl1: TcxTabControl [4]
Left = 0
Top = 105
Width = 1540
Height = 22
Align = alTop
TabOrder = 4
Properties.CustomButtons.Buttons = <>
Properties.Style = 9
Properties.TabIndex = 0
Properties.Tabs.Strings = (
#26410#37197#36135
#24050#37197#36135
#24050#21457#36135
#20840#37096)
OnChange = cxTabControl1Change
ClientRectRight = 0
ClientRectTop = 0
end
object Panel3: TPanel [5]
Left = 0
Top = 332
Width = 1540
Height = 34
Align = alBottom
TabOrder = 5
object Label14: TLabel
Left = 500
Top = 60
Width = 36
Height = 12
Caption = #21367#26465#30721
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 881
Top = 11
Width = 48
Height = 17
Caption = #20986#24211#26085#26399
end
object Panel4: TPanel
Left = 1286
Top = 1
Width = 253
Height = 32
Align = alRight
BevelOuter = bvNone
TabOrder = 0
end
object Edit1: TEdit
Left = 536
Top = 56
Width = 145
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object CRdate: TDateTimePicker
Left = 935
Top = 7
Width = 91
Height = 21
Date = 41557.000000000000000000
Format = 'yyyy-MM-dd'
Time = 0.498293449083576000
TabOrder = 2
end
object CheckBox2: TCheckBox
Left = 1038
Top = 7
Width = 99
Height = 19
Caption = #20840#36873
TabOrder = 3
OnClick = CheckBox2Click
end
object ToolBar2: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 874
Align = alLeft
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeMarket.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 4
object ToolButton4: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #36873#25321#24211#23384
ImageIndex = 9
OnClick = ToolButton4Click
end
object phwc: TToolButton
Left = 95
Top = 0
AutoSize = True
Caption = #37197#36135#23436#25104
ImageIndex = 12
OnClick = phwcClick
end
object ToolButton6: TToolButton
Left = 190
Top = 0
AutoSize = True
Caption = #20462#25913#37197#36135
ImageIndex = 3
OnClick = ToolButton6Click
end
object phok: TToolButton
Left = 285
Top = 0
AutoSize = True
Caption = #37197#36135#30830#35748
ImageIndex = 12
OnClick = phokClick
end
object fh: TToolButton
Left = 380
Top = 0
AutoSize = True
Caption = #25104#21697#21457#36135
ImageIndex = 12
OnClick = fhClick
end
object ToolButton9: TToolButton
Left = 475
Top = 0
AutoSize = True
Caption = #25171#21360#26631#31614
ImageIndex = 21
OnClick = ToolButton9Click
end
object del: TToolButton
Left = 570
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = delClick
end
object ToolButton5: TToolButton
Left = 641
Top = 0
AutoSize = True
Caption = #25972#21333#25764#38144
ImageIndex = 11
OnClick = ToolButton5Click
end
object Tdbchexiao: TToolButton
Left = 736
Top = 0
AutoSize = True
Caption = #25972#31508#25764#38144
ImageIndex = 11
OnClick = TdbchexiaoClick
end
object ToolButton3: TToolButton
Left = 831
Top = 0
AutoSize = True
Caption = #25764#38144#21457#36135
ImageIndex = 11
OnClick = ToolButton3Click
end
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
Left = 257
Top = 152
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
Left = 121
Top = 153
end
object cxgrdpmn1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 700
Top = 236
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
Parameters = <>
Left = 568
Top = 240
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 428
Top = 176
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 328
Top = 168
end
object DataSource1: TDataSource
DataSet = Order_Main
Left = 812
Top = 440
end
object Order_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 724
Top = 432
end
object ADOQuerySub: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
Parameters = <>
Left = 328
Top = 272
end
object DataSource2: TDataSource
DataSet = ORDER_SUB
Left = 616
Top = 420
end
object ADOQueryImage: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
EnableBCD = False
Parameters = <>
Left = 332
Top = 227
end
object DSImage: TDataSource
DataSet = ADOQueryImage
Left = 424
Top = 224
end
object IdFTP1: TIdFTP
ConnectTimeout = 0
NATKeepAlive.UseKeepAlive = False
NATKeepAlive.IdleTimeMS = 0
NATKeepAlive.IntervalMS = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
ReadTimeout = 0
Left = 92
Top = 258
end
object ORDER_SUB: TClientDataSet
Aggregates = <>
Params = <>
Left = 228
Top = 264
end
object PopupMenu2: TPopupMenu
Left = 812
Top = 388
object N3: TMenuItem
Caption = #20840#36873
OnClick = N3Click
end
object N4: TMenuItem
Caption = #20840#24323
OnClick = N4Click
end
object N2: TMenuItem
Caption = #22797#21046
OnClick = N2Click
end
end
object cxgrdpmn2: TcxGridPopupMenu
PopupMenus = <>
Left = 932
Top = 260
end
object CDS_WXTS: TClientDataSet
Aggregates = <>
Params = <>
Left = 516
Top = 416
end
object PM_1: TPopupMenu
Left = 940
Top = 388
object N1: TMenuItem
Caption = #22797#21046
OnClick = N1Click
end
end
object GPM_3: TcxGridPopupMenu
PopupMenus = <>
Left = 860
Top = 228
end
object ADO_PH: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
Parameters = <>
Left = 296
Top = 476
end
object DS_PH: TDataSource
DataSet = CDS_PH
Left = 360
Top = 444
end
object CDS_PH: TClientDataSet
Aggregates = <>
Params = <>
Left = 396
Top = 486
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_TradeMarket.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1128
Top = 432
end
object RMDB_1: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 1180
Top = 432
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator]
DefaultCollate = False
ShowPrintDialog = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDB_1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 1228
Top = 432
ReportData = {}
end
end