D7myYunxiang/样品新云翔(YPGLBOM.dll)/U_MLMangeTJ.dfm

906 lines
25 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmMLMangeTJ: TfrmMLMangeTJ
Left = 190
Top = 114
Width = 1300
Height = 708
Caption = #28907#37329#38754#26009#31649#29702
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1284
AutoSize = True
ButtonHeight = 30
ButtonWidth = 61
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 9
OnClick = TBRafreshClick
end
object ToolButton11: TToolButton
Left = 65
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 3
OnClick = ToolButton11Click
end
object TCK: TToolButton
Left = 130
Top = 0
AutoSize = True
Caption = #26597#30475
ImageIndex = 57
Visible = False
OnClick = TCKClick
end
object ToolButton1: TToolButton
Left = 195
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 53
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 260
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
object ToolButton2: TToolButton
Left = 325
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 59
Visible = False
OnClick = ToolButton2Click
end
end
object Panel1: TPanel
Left = 0
Top = 32
Width = 1284
Height = 636
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 1280
Height = 71
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label2: TLabel
Left = 569
Top = 13
Width = 68
Height = 16
Caption = #28907#37329#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 369
Top = 42
Width = 34
Height = 16
Caption = #21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 569
Top = 42
Width = 102
Height = 16
Caption = #28907#37329#24037#33402#26126#32454
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 16
Top = 6
Width = 102
Height = 30
Caption = 'T'#28907#37329#38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -22
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 803
Top = 13
Width = 68
Height = 16
Caption = #38754#26009#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 803
Top = 42
Width = 61
Height = 16
Caption = #20811' '#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 335
Top = 13
Width = 68
Height = 16
Caption = #33457#22411#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 128
Top = 13
Width = 68
Height = 16
Caption = #25195#25551#20837#21475
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TJML: TEdit
Tag = 2
Left = 672
Top = 9
Width = 105
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = HXTypeChange
end
object MLPinYin: TEdit
Tag = 2
Left = 405
Top = 38
Width = 110
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = HXTypeChange
end
object TJGYName: TEdit
Tag = 2
Left = 672
Top = 38
Width = 105
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = HXTypeChange
end
object MLXXNO: TEdit
Tag = 2
Left = 874
Top = 9
Width = 50
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = HXTypeChange
end
object MLKZ: TEdit
Tag = 2
Left = 874
Top = 38
Width = 50
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnChange = HXTypeChange
end
object Button1: TButton
Left = 515
Top = 8
Width = 29
Height = 25
Caption = '...'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button1Click
end
object HXType: TEdit
Tag = 2
Left = 405
Top = 9
Width = 110
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnChange = HXTypeChange
end
object SMRK: TEdit
Left = 198
Top = 9
Width = 117
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnKeyPress = SMRKKeyPress
end
end
object cxGrid1: TcxGrid
Left = 2
Top = 73
Width = 1280
Height = 561
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 1
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v1ColGS
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.GroupByBox = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
object v1HXType: TcxGridDBColumn
Caption = #33457#22411#31867#22411
DataBinding.FieldName = 'HXType'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 95
end
object v1TJML: TcxGridDBColumn
Caption = #28907#37329#32534#21495
DataBinding.FieldName = 'TJML'
HeaderAlignmentHorz = taCenter
Options.Editing = False
SortIndex = 0
SortOrder = soAscending
Width = 92
end
object v1MLXXNO: TcxGridDBColumn
Caption = #38754#26009#32534#21495
DataBinding.FieldName = 'MLXXNO'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 78
end
object v1ColGS: TcxGridDBColumn
Caption = #39068#33394#20010#25968
DataBinding.FieldName = 'ColGS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 74
end
object v1MLName: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'MLName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 222
end
object v1MLMF: TcxGridDBColumn
Caption = #38376#24133
DataBinding.FieldName = 'MLMF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 55
end
object v1MLKZ: TcxGridDBColumn
Caption = #20811#37325
DataBinding.FieldName = 'MLKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 53
end
object v1Column1: TcxGridDBColumn
Caption = #25104#20221
DataBinding.FieldName = 'MLCF'
HeaderAlignmentHorz = taCenter
Width = 195
end
object v1MLXXGYName: TcxGridDBColumn
Caption = #26579#33394#24037#33402#26126#32454
DataBinding.FieldName = 'MLXXGYName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 200
end
object v1TJGYName: TcxGridDBColumn
Caption = #28907#37329#24037#33402#26126#32454
DataBinding.FieldName = 'TJGYName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 200
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel2: TPanel
Left = 1122
Top = 128
Width = 144
Height = 273
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
Visible = False
object Label8: TLabel
Left = 32
Top = 12
Width = 68
Height = 16
Caption = #25171#21360#36873#25321
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 120
Top = 4
Width = 20
Height = 21
Picture.Data = {
0A544A504547496D616765E2020000FFD8FFE000104A46494600010101006000
600000FFDB004300080606070605080707070909080A0C140D0C0B0B0C191213
0F141D1A1F1E1D1A1C1C20242E2720222C231C1C2837292C30313434341F2739
3D38323C2E333432FFDB0043010909090C0B0C180D0D1832211C213232323232
3232323232323232323232323232323232323232323232323232323232323232
32323232323232323232323232FFC20011080015001503012200021101031101
FFC4001800010003010000000000000000000000000001040607FFC400140101
00000000000000000000000000000000FFDA000C03010002100310000001D728
E50E8491541641FFC4001A100101000301010000000000000000000003040002
140512FFDA00080101000105025A08767A0A63CF4B9B8A2FAECC59C9B679CA93
CFFFC40014110100000000000000000000000000000020FFDA0008010301013F
011FFFC400161100030000000000000000000000000000012021FFDA00080102
01013F01153FFFC4002310000103030207000000000000000000000201031200
10111432152331415161F1FFDA0008010100063F020170E2A6B81A9BC711B16A
B676F39F54CF119EDE44FA7DB013812505C8D41E090DBFFFC400201000010401
040300000000000000000000110001217131104161D15181B1FFDA0008010100
013F2163D491BBDA068605E4BD2CAF9A3D165E7E1E773DBAD18F5246CF481A18
8780F6B0BFFFDA000C03010002000300000010F70F3CFFC40019110001050000
000000000000000000000001112021F0F1FFDA0008010301013F103016E33FFF
C400181100020300000000000000000000000000112021F0F1FFDA0008010201
013F10985D4FFFC4002010010002020201050000000000000000000111310021
4171106191B1C1D1FFDA0008010100013F1052BE32C171A4165A5E6B36882928
00ABD142E0804A779F5775BF2BD2267539ED182EFC22D53BF052BE76C373B434
58E6B378A28290223D34A60000A359FFD9}
OnClick = Image1Click
end
object cxButton1: TcxButton
Left = 18
Top = 40
Width = 110
Height = 47
Caption = #21697#21517#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = cxButton1Click
Colors.Default = clBtnFace
end
object cxButton2: TcxButton
Left = 18
Top = 101
Width = 110
Height = 47
Caption = #39068#33394#22823#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = cxButton2Click
Colors.Default = clBtnFace
end
object cxButton3: TcxButton
Left = 18
Top = 161
Width = 110
Height = 43
Caption = #39068#33394#23567#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = cxButton3Click
Colors.Default = clBtnFace
end
object cxButton4: TcxButton
Left = 18
Top = 218
Width = 110
Height = 43
Caption = #23458#25143#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = cxButton4Click
Colors.Default = clBtnFace
end
end
object Panel3: TPanel
Left = 943
Top = 129
Width = 176
Height = 302
Color = clSkyBlue
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu1
TabOrder = 3
Visible = False
object Image11: TImage
Left = 863
Top = 158
Width = 138
Height = 190
AutoSize = True
Stretch = True
Visible = False
end
object Image22: TImage
Left = 117
Top = 316
Width = 415
Height = 571
AutoSize = True
Stretch = True
Visible = False
end
object TJHX: TLabel
Left = 7
Top = 30
Width = 38
Height = 18
Caption = #32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
PopupMenu = PopupMenu1
end
object TJHXType: TLabel
Left = 7
Top = 8
Width = 34
Height = 16
Caption = #31867#22411
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
PopupMenu = PopupMenu1
end
object TJMLNo: TLabel
Left = 7
Top = 55
Width = 68
Height = 16
Caption = #38754#26009#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
PopupMenu = PopupMenu1
end
object Image2: TImage
Left = 153
Top = 2
Width = 20
Height = 21
Picture.Data = {
0A544A504547496D616765E2020000FFD8FFE000104A46494600010101006000
600000FFDB004300080606070605080707070909080A0C140D0C0B0B0C191213
0F141D1A1F1E1D1A1C1C20242E2720222C231C1C2837292C30313434341F2739
3D38323C2E333432FFDB0043010909090C0B0C180D0D1832211C213232323232
3232323232323232323232323232323232323232323232323232323232323232
32323232323232323232323232FFC20011080015001503012200021101031101
FFC4001800010003010000000000000000000000000001040607FFC400140101
00000000000000000000000000000000FFDA000C03010002100310000001D728
E50E8491541641FFC4001A100101000301010000000000000000000003040002
140512FFDA00080101000105025A08767A0A63CF4B9B8A2FAECC59C9B679CA93
CFFFC40014110100000000000000000000000000000020FFDA0008010301013F
011FFFC400161100030000000000000000000000000000012021FFDA00080102
01013F01153FFFC4002310000103030207000000000000000000000201031200
10111432152331415161F1FFDA0008010100063F020170E2A6B81A9BC711B16A
B676F39F54CF119EDE44FA7DB013812505C8D41E090DBFFFC400201000010401
040300000000000000000000110001217131104161D15181B1FFDA0008010100
013F2163D491BBDA068605E4BD2CAF9A3D165E7E1E773DBAD18F5246CF481A18
8780F6B0BFFFDA000C03010002000300000010F70F3CFFC40019110001050000
000000000000000000000001112021F0F1FFDA0008010301013F103016E33FFF
C400181100020300000000000000000000000000112021F0F1FFDA0008010201
013F10985D4FFFC4002010010002020201050000000000000000000111310021
4171106191B1C1D1FFDA0008010100013F1052BE32C171A4165A5E6B36882928
00ABD142E0804A779F5775BF2BD2267539ED182EFC22D53BF052BE76C373B434
58E6B378A28290223D34A60000A359FFD9}
OnClick = Image2Click
end
object cxImage1: TcxImage
Left = 2
Top = 76
Properties.PopupMenuLayout.MenuItems = [pmiCut, pmiCopy, pmiPaste, pmiLoad, pmiSave]
Properties.ReadOnly = True
Properties.Stretch = True
Style.BorderStyle = ebsOffice11
StyleHot.TextStyle = []
TabOrder = 0
OnDblClick = cxImage1DblClick
Height = 225
Width = 173
end
object Panel16: TPanel
Left = 29
Top = 157
Width = 124
Height = 35
BevelInner = bvRaised
Caption = #27491#22312#19978#20256#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
end
end
end
object DataSource1: TDataSource
DataSet = ADOQueryTree
Left = 660
Top = 387
end
object ADOQueryTree: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 626
Top = 386
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 880
Top = 196
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 853
Top = 226
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 652
Top = 194
end
object DataSource2: TDataSource
DataSet = CDS_Main
Left = 593
Top = 223
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 682
Top = 195
end
object CDS_Main: TClientDataSet
Aggregates = <>
Params = <>
Left = 652
Top = 223
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
ShowProgress = False
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_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 623
Top = 194
ReportData = {}
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Main
Left = 696
Top = 386
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 889
Top = 239
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 855
Top = 258
end
object SaveDialog1: TSaveDialog
Left = 681
Top = 223
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 660
Top = 419
end
object DataSource3: TDataSource
DataSet = CDS_Sub
Left = 626
Top = 419
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 592
Top = 419
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 593
Top = 387
end
object DataSource4: TDataSource
DataSet = Order_GX
Left = 695
Top = 418
end
object cxGridPopupMenu3: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 729
Top = 403
end
object ML_Col: TClientDataSet
Aggregates = <>
Params = <>
Left = 1126
Top = 503
end
object DataSource5: TDataSource
DataSet = ML_Col
Left = 1161
Top = 501
end
object cxGridPopupMenu4: TcxGridPopupMenu
PopupMenus = <>
Left = 1193
Top = 501
end
object cxStyleRepository1: TcxStyleRepository
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
object DataSource6: TDataSource
DataSet = Ord_HX
Left = 848
Top = 201
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 877
Top = 284
end
object ADOQuery1: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 883
Top = 220
end
object PopupMenu1: TPopupMenu
Left = 595
Top = 194
object N1: TMenuItem
Caption = #20462#25913
OnClick = N1Click
end
object N4: TMenuItem
Caption = #26032#22686
OnClick = N4Click
end
object N3: TMenuItem
Caption = #22797#21046
OnClick = N3Click
end
object N2: TMenuItem
Caption = #21024#38500
OnClick = N2Click
end
object N5: TMenuItem
Caption = #25171#21360
OnClick = N5Click
end
end
object RM2: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
DefaultCollate = 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_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 623
Top = 223
ReportData = {}
end
end