D7myYunxiang/合同管理(Contract.dll)/U_MLManage_LRYHCE.dfm

1494 lines
36 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmMLManage_LRYHCE: TfrmMLManage_LRYHCE
Left = 179
Top = 59
Width = 1421
Height = 788
Caption = #21360#33457#38754#26009#20449#24687#30331#35760
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
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 33
Width = 1405
Height = 39
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object GSNo: TLabel
Tag = 2
Left = 1190
Top = 43
Width = 56
Height = 13
Caption = #24037#33402#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object GYName: TLabel
Tag = 2
Left = 1346
Top = 43
Width = 56
Height = 13
Caption = #24037#33402#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label1: TLabel
Tag = 2
Left = 1129
Top = 43
Width = 64
Height = 13
Caption = #24037#33402#32534#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label3: TLabel
Tag = 2
Left = 1284
Top = 43
Width = 64
Height = 13
Caption = #24037#33402#21517#31216':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object TLabel
Left = 463
Top = 11
Width = 102
Height = 16
Caption = #21360#33457#38754#26009#21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLName: TEdit
Tag = 2
Left = 569
Top = 7
Width = 231
Height = 24
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = MLNameChange
end
object MLNo: TEdit
Tag = 2
Left = 834
Top = 41
Width = 76
Height = 24
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
OnChange = MLNameChange
end
object TJML: TEdit
Tag = 2
Left = 801
Top = 7
Width = 86
Height = 24
HelpType = htKeyword
HelpKeyword = 'x'
CharCase = ecUpperCase
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = MLNameChange
end
end
object Panel9: TPanel
Left = 0
Top = 72
Width = 1405
Height = 36
Align = alTop
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label2: TLabel
Left = 309
Top = 10
Width = 68
Height = 16
Caption = #21360#33457#38376#24133
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 497
Top = 10
Width = 68
Height = 16
Caption = #21360#33457#20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 53
Top = 10
Width = 68
Height = 16
Caption = #21360#33457#25104#20221
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 679
Top = 10
Width = 77
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 TLabel
Left = 920
Top = 10
Width = 77
Height = 16
Caption = #21360#33457#24037#33402':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLKZ: TEdit
Tag = 2
Left = 569
Top = 6
Width = 55
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = MLMFChange
end
object MLCF: TBtnEditA
Tag = 2
Left = 124
Top = 5
Width = 141
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnBtnClick = MLCFBtnClick
end
object MLMF: TBtnEditA
Tag = 2
Left = 379
Top = 6
Width = 77
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnBtnClick = MLMFBtnClick
end
object HXType: TBtnEditA
Left = 759
Top = 5
Width = 138
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
OnBtnClick = HXTypeBtnClick
end
object TJGYName: TBtnEditA
Left = 1000
Top = 5
Width = 287
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnBtnClick = TJGYNameBtnClick
end
object Button5: TButton
Left = 623
Top = 6
Width = 25
Height = 25
Caption = '...'
TabOrder = 5
OnClick = Button5Click
end
end
object Panel2: TPanel
Left = 0
Top = 108
Width = 1405
Height = 640
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object TJName: TLabel
Left = 94
Top = 237
Width = 8
Height = 13
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TJGYMX: TLabel
Left = 241
Top = 237
Width = 8
Height = 13
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel14: TPanel
Left = 2
Top = 187
Width = 1401
Height = 451
Align = alClient
TabOrder = 0
object Panel4: TPanel
Left = 1
Top = 1
Width = 1399
Height = 449
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object ScrollBox2: TScrollBox
Left = 2
Top = 2
Width = 1336
Height = 445
Align = alClient
BevelInner = bvLowered
BorderStyle = bsNone
Ctl3D = True
ParentCtl3D = False
TabOrder = 0
end
object ScrollBox3: TPanel
Left = 1338
Top = 2
Width = 59
Height = 445
Align = alRight
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object LBCPAP: TLabel
Left = 12
Top = 166
Width = 36
Height = 22
Caption = '1/1'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BTLP: TButton
Left = 2
Top = 2
Width = 57
Height = 130
Caption = #19978
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -36
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BTLPClick
end
object BTNP: TButton
Left = 2
Top = 210
Width = 57
Height = 130
Caption = #19979
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -36
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BTNPClick
end
end
end
end
object Panel39: TPanel
Left = 2
Top = 2
Width = 1401
Height = 185
Align = alTop
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label11: TLabel
Left = 23
Top = 114
Width = 43
Height = 16
Caption = #33394#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 23
Top = 147
Width = 43
Height = 16
Caption = #24037#33402':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 23
Top = 49
Width = 43
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 TLabel
Left = 263
Top = 81
Width = 43
Height = 16
Caption = #38376#24133':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 263
Top = 114
Width = 43
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 Label5: TLabel
Left = 23
Top = 81
Width = 43
Height = 16
Caption = #39068#33394':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object cxGrid1: TcxGrid
Left = -8
Top = 766
Width = 513
Height = 50
TabOrder = 0
Visible = False
object TV1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.FocusCellOnCycle = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsSelection.CellSelect = False
OptionsView.GroupByBox = False
Styles.Header = DataLink_YPGLBOM.Default
object V1Ssel: TcxGridDBColumn
Caption = #36873#25321
DataBinding.FieldName = 'Ssel'
Visible = False
Width = 70
end
object V1BPCode: TcxGridDBColumn
Tag = 3
Caption = #32534#21495
DataBinding.FieldName = 'BPCode'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 88
end
object V1BPName: TcxGridDBColumn
Tag = 3
Caption = #21517#31216
DataBinding.FieldName = 'BPName'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 80
end
object V1BPMF: TcxGridDBColumn
Tag = 3
Caption = #38376#24133
DataBinding.FieldName = 'BPMF'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 91
end
object V1BPKZ: TcxGridDBColumn
Tag = 3
Caption = #20811#37325
DataBinding.FieldName = 'BPKZ'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 82
end
object V1BPJS: TcxGridDBColumn
Tag = 3
Caption = #32463#32428#32433
DataBinding.FieldName = 'BPJS'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 74
end
object v1BPMiDu: TcxGridDBColumn
Tag = 3
Caption = #23494#24230
DataBinding.FieldName = 'BPMiDu'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 91
end
end
object cxGrid1Level1: TcxGridLevel
GridView = TV1
end
end
object ToolBar4: TToolBar
Left = 0
Top = 0
Width = 1401
Height = 33
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 1
object Panel5: TPanel
Left = 0
Top = 0
Width = 341
Height = 30
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label4: TLabel
Left = 176
Top = 4
Width = 92
Height = 22
Caption = #38754#26009#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
object Panel12: TPanel
Left = 341
Top = 0
Width = 452
Height = 30
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 0
object Label12: TLabel
Left = 278
Top = 5
Width = 46
Height = 22
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
object Panel42: TPanel
Left = 398
Top = 34
Width = 176
Height = 141
BevelInner = bvRaised
BevelOuter = bvLowered
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu3
TabOrder = 2
object Label79: TLabel
Left = 3
Top = 2
Width = 4
Height = 19
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label80: TLabel
Left = 3
Top = 18
Width = 4
Height = 19
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 2
Top = 2
Width = 172
Height = 137
Align = alClient
end
object Image12: TImage
Left = 2
Top = 2
Width = 172
Height = 137
Align = alClient
Visible = False
OnDblClick = Image12DblClick
end
end
object MLXXNO: TEdit
Tag = 2
Left = 310
Top = 45
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = MLNameChange
end
object MLXXMF: TEdit
Tag = 2
Left = 309
Top = 77
Width = 83
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 4
OnChange = MLNameChange
end
object MLXXKZ: TEdit
Tag = 2
Left = 309
Top = 110
Width = 83
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 5
OnChange = MLNameChange
end
object MLXXColNo: TEdit
Tag = 2
Left = 70
Top = 110
Width = 83
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 6
OnChange = MLNameChange
end
object MLXXCol: TEdit
Tag = 2
Left = 70
Top = 77
Width = 83
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnChange = MLNameChange
end
object MLXXGYName: TBtnEditA
Tag = 2
Left = 70
Top = 143
Width = 323
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 8
OnBtnClick = MLXXGYNameBtnClick
end
object MLXXNote: TMemo
Tag = 2
Left = 577
Top = 36
Width = 217
Height = 138
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ScrollBars = ssVertical
TabOrder = 9
end
object MBPID: TEdit
Tag = 2
Left = 74
Top = 231
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 10
Visible = False
OnChange = MLNameChange
end
object PTID: TEdit
Tag = 2
Left = 163
Top = 229
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 11
Visible = False
OnChange = MLNameChange
end
object MLTPID: TEdit
Tag = 2
Left = 247
Top = 228
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 12
Visible = False
OnChange = MLNameChange
end
object Button1: TButton
Left = 153
Top = 76
Width = 27
Height = 25
Caption = '...'
TabOrder = 13
OnClick = Button1Click
end
object Button6: TButton
Left = 282
Top = 45
Width = 28
Height = 25
Caption = '...'
TabOrder = 14
OnClick = Button6Click
end
object MLXXName: TEdit
Tag = 2
Left = 69
Top = 45
Width = 213
Height = 24
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
end
end
end
object ToolBar3: TToolBar
Left = 0
Top = 0
Width = 1405
Height = 33
ButtonHeight = 30
ButtonWidth = 69
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_YPGLBOM.ThreeImgList
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_YPGLBOM.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 3
object TSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TSaveClick
end
object Panel3: TPanel
Left = 73
Top = 0
Width = 744
Height = 30
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 0
object Label8: TLabel
Left = 584
Top = 4
Width = 113
Height = 24
Caption = 'Y'#21360#33457#38754#26009
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
object Panel16: TPanel
Left = 397
Top = 199
Width = 181
Height = 31
Caption = #27491#22312#19979#36733#22270#29255#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Visible = False
end
object Panel6: TPanel
Left = 915
Top = 113
Width = 523
Height = 182
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 5
Visible = False
object TLabel
Left = 113
Top = 6
Width = 43
Height = 16
Caption = #32534#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 258
Top = 209
Width = 43
Height = 16
Caption = #33394#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object TLabel
Left = 23
Top = 209
Width = 77
Height = 16
Caption = #28907#37329#39068#33394':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label6: TLabel
Left = 299
Top = 3
Width = 46
Height = 22
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 9
Top = 3
Width = 92
Height = 22
Caption = #21360#33457#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel10: TPanel
Left = 121
Top = 30
Width = 115
Height = 151
BevelInner = bvRaised
BevelOuter = bvLowered
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu4
TabOrder = 0
object Label14: TLabel
Left = 3
Top = 2
Width = 4
Height = 19
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 3
Top = 17
Width = 4
Height = 19
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Image2: TImage
Left = 2
Top = 2
Width = 111
Height = 147
Align = alClient
end
object Image11: TImage
Left = 2
Top = 2
Width = 111
Height = 147
Align = alClient
Visible = False
OnDblClick = Image11DblClick
end
end
object TJNote: TMemo
Tag = 2
Left = 240
Top = 27
Width = 192
Height = 154
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 1
end
object TJColNo: TEdit
Tag = 2
Left = 306
Top = 205
Width = 83
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
OnChange = MLNameChange
end
object TJCol: TBtnEditA
Tag = 2
Left = 103
Top = 214
Width = 107
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
Visible = False
OnBtnClick = TJColBtnClick
end
object TJNo: TEdit
Left = 158
Top = 2
Width = 106
Height = 24
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object TJPTID: TEdit
Tag = 2
Left = 87
Top = 244
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Visible = False
OnChange = MLNameChange
end
object TJCPID: TEdit
Left = 168
Top = 248
Width = 82
Height = 24
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Visible = False
OnChange = MLNameChange
end
object TJTPID: TEdit
Tag = 2
Left = 274
Top = 247
Width = 82
Height = 24
HelpType = htKeyword
HelpKeyword = 'x'
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Visible = False
OnChange = MLNameChange
end
object Button2: TButton
Left = 2
Top = 125
Width = 111
Height = 47
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = Button2Click
end
object Button3: TButton
Left = 430
Top = 0
Width = 54
Height = 33
Caption = #20851#38381
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = Button3Click
end
end
object Panel7: TPanel
Left = 802
Top = 176
Width = 105
Height = 109
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 6
object Button4: TButton
Left = 3
Top = 1
Width = 100
Height = 41
Caption = #22686#21152#33457#33394
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button4Click
end
object Button7: TButton
Left = 4
Top = 74
Width = 73
Height = 34
Caption = #21024#38500#22270#29255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button7Click
end
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 928
Top = 354
end
object ADOQueryMain: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 845
Top = 342
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 898
Top = 349
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 958
Top = 358
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 995
Top = 359
end
object Order_GX: TClientDataSet
Aggregates = <>
Params = <>
Left = 966
Top = 332
end
object DataSource1: TDataSource
DataSet = Order_GX
Left = 942
Top = 358
end
object OrdBP_SH: TClientDataSet
Aggregates = <>
Params = <>
Left = 874
Top = 367
end
object Ord_HX: TClientDataSet
Aggregates = <>
Params = <>
Left = 900
Top = 373
end
object adoqueryPicture: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 942
Top = 340
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Print
Left = 981
Top = 381
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
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 = 922
Top = 381
ReportData = {}
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 952
Top = 382
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 837
Top = 368
end
object PopupMenu1: TPopupMenu
Left = 904
Top = 332
object N1: TMenuItem
Caption = #26597#30475#21407#22270
OnClick = N1Click
end
end
object SaveDialog1: TSaveDialog
Left = 922
Top = 361
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 918
Top = 345
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 948
Top = 353
end
object PopupMenu2: TPopupMenu
Left = 874
Top = 339
object MenuItem1: TMenuItem
Caption = #26597#30475#21407#22270
OnClick = MenuItem1Click
end
end
object Ord_ZB: TClientDataSet
Aggregates = <>
Params = <>
Left = 857
Top = 371
end
object Ord_Col: TClientDataSet
Aggregates = <>
Params = <>
Left = 981
Top = 358
end
object DataSource2: TDataSource
DataSet = Ord_Col
Left = 820
Top = 343
end
object ADOQueryCol: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 1010
Top = 382
end
object PopupMenu3: TPopupMenu
Left = 472
Top = 201
object N2: TMenuItem
Caption = #36873#25321#39068#33394
OnClick = N2Click
end
object N3: TMenuItem
Caption = #36873#25321#28504#36890#33394#21345
OnClick = N3Click
end
end
object PopupMenu4: TPopupMenu
Left = 1077
Top = 206
object N4: TMenuItem
Caption = #36873#25321#22270#29255
OnClick = N4Click
end
object N6: TMenuItem
Caption = #36873#25321#20844#21496#20135#21697
OnClick = N6Click
end
end
object ADOQuery1: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 940
Top = 330
end
object ADOCmd: TADOQuery
Connection = DataLink_YPGLBOM.ADOLink
Parameters = <>
Left = 995
Top = 331
end
end