D7myYunxiang/云翔生产管理(MYSC.dll)/U_MLManage_LRTJ2.dfm
DESKTOP-E401PHE\Administrator 1011cb7292 1
2025-01-20 13:04:03 +08:00

1504 lines
36 KiB
Plaintext

object frmMLManage_LRTJ2: TfrmMLManage_LRTJ2
Left = 110
Top = 10
Width = 1386
Height = 788
Caption = #28907#37329#38754#26009#20449#24687#30331#35760
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 33
Width = 1370
Height = 36
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object GSNo: TLabel
Tag = 2
Left = 1098
Top = 40
Width = 52
Height = 12
Caption = #24037#33402#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object GYName: TLabel
Tag = 2
Left = 1242
Top = 40
Width = 52
Height = 12
Caption = #24037#33402#21517#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label1: TLabel
Tag = 2
Left = 1042
Top = 40
Width = 59
Height = 12
Caption = #24037#33402#32534#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label3: TLabel
Tag = 2
Left = 1185
Top = 40
Width = 59
Height = 12
Caption = #24037#33402#21517#31216':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object TLabel
Left = 427
Top = 10
Width = 96
Height = 15
Caption = #28907#37329#38754#26009#21697#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLName: TEdit
Tag = 2
Left = 525
Top = 6
Width = 213
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = MLNameChange
end
object MLNo: TEdit
Tag = 2
Left = 744
Top = 42
Width = 70
Height = 23
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
OnChange = MLNameChange
end
object TJML: TEdit
Tag = 2
Left = 738
Top = 6
Width = 91
Height = 23
HelpType = htKeyword
HelpKeyword = 'x'
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = MLNameChange
end
end
object Panel9: TPanel
Left = 0
Top = 69
Width = 1370
Height = 34
Align = alTop
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label2: TLabel
Left = 273
Top = 9
Width = 64
Height = 15
Caption = #28907#37329#38376#24133
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 438
Top = 9
Width = 64
Height = 15
Caption = #28907#37329#20811#37325
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 49
Top = 9
Width = 64
Height = 15
Caption = #28907#37329#25104#20221
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 599
Top = 9
Width = 73
Height = 15
Caption = #33457#22411#31867#22411':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 821
Top = 9
Width = 73
Height = 15
Caption = #28907#37329#24037#33402':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MLKZ: TEdit
Tag = 2
Left = 504
Top = 6
Width = 51
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnChange = MLMFChange
end
object MLCF: TBtnEditA
Tag = 2
Left = 114
Top = 5
Width = 131
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnBtnClick = MLCFBtnClick
end
object MLMF: TBtnEditA
Tag = 2
Left = 338
Top = 6
Width = 71
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnBtnClick = MLMFBtnClick
end
object HXType: TBtnEditA
Left = 673
Top = 5
Width = 127
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
OnBtnClick = HXTypeBtnClick
end
object TJGYName: TBtnEditA
Left = 895
Top = 5
Width = 265
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnBtnClick = TJGYNameBtnClick
end
object Button5: TButton
Left = 554
Top = 6
Width = 23
Height = 23
Caption = '...'
TabOrder = 5
OnClick = Button5Click
end
object GYLX: TEdit
Tag = 2
Left = 1161
Top = 5
Width = 136
Height = 23
HelpType = htKeyword
HelpKeyword = 'x'
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
end
object Panel2: TPanel
Left = 0
Top = 103
Width = 1370
Height = 646
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object TJName: TLabel
Left = 87
Top = 219
Width = 7
Height = 12
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TJGYMX: TLabel
Left = 222
Top = 219
Width = 7
Height = 12
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel14: TPanel
Left = 2
Top = 173
Width = 1366
Height = 471
Align = alClient
TabOrder = 0
object Panel4: TPanel
Left = 1
Top = 1
Width = 1364
Height = 469
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object ScrollBox2: TScrollBox
Left = 2
Top = 2
Width = 1305
Height = 465
Align = alClient
BevelInner = bvLowered
BorderStyle = bsNone
Ctl3D = True
ParentCtl3D = False
TabOrder = 0
end
object ScrollBox3: TPanel
Left = 1307
Top = 2
Width = 55
Height = 465
Align = alRight
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object LBCPAP: TLabel
Left = 11
Top = 198
Width = 36
Height = 21
Caption = '1/1'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BTLP: TButton
Left = 2
Top = 2
Width = 52
Height = 164
Caption = #19978
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -33
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BTLPClick
end
object BTNP: TButton
Left = 2
Top = 246
Width = 52
Height = 149
Caption = #19979
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -33
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 = 1366
Height = 171
Align = alTop
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 1
object Label11: TLabel
Left = 21
Top = 105
Width = 41
Height = 15
Caption = #33394#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 21
Top = 136
Width = 41
Height = 15
Caption = #24037#33402':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 21
Top = 45
Width = 41
Height = 15
Caption = #21697#21517':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 243
Top = 75
Width = 41
Height = 15
Caption = #38376#24133':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 243
Top = 105
Width = 41
Height = 15
Caption = #20811#37325':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 21
Top = 75
Width = 41
Height = 15
Caption = #39068#33394':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object cxGrid1: TcxGrid
Left = -7
Top = 707
Width = 473
Height = 46
TabOrder = 0
Visible = False
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
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_MYSC.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 = 1366
Height = 33
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_MYSC.ThreeImgList
Flat = True
Images = DataLink_MYSC.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 = 367
Top = 31
Width = 163
Height = 131
BevelInner = bvRaised
BevelOuter = bvLowered
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu3
TabOrder = 2
object Label79: TLabel
Left = 3
Top = 2
Width = 4
Height = 17
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label80: TLabel
Left = 3
Top = 17
Width = 4
Height = 17
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 2
Top = 2
Width = 159
Height = 127
Align = alClient
end
object Image12: TImage
Left = 2
Top = 2
Width = 159
Height = 127
Align = alClient
Visible = False
OnDblClick = Image12DblClick
end
end
object MLXXNO: TEdit
Tag = 2
Left = 286
Top = 42
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = MLNameChange
end
object MLXXMF: TEdit
Tag = 2
Left = 285
Top = 71
Width = 77
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
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 = 285
Top = 102
Width = 77
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
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 = 65
Top = 102
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnChange = MLNameChange
end
object MLXXCol: TEdit
Tag = 2
Left = 65
Top = 71
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnChange = MLNameChange
end
object MLXXGYName: TBtnEditA
Tag = 2
Left = 65
Top = 132
Width = 298
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 8
end
object MLXXNote: TMemo
Tag = 2
Left = 533
Top = 33
Width = 200
Height = 128
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ScrollBars = ssVertical
TabOrder = 9
end
object MBPID: TEdit
Tag = 2
Left = 68
Top = 213
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
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 = 150
Top = 211
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
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 = 228
Top = 210
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
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 = 141
Top = 70
Width = 25
Height = 23
Caption = '...'
TabOrder = 13
OnClick = Button1Click
end
object Button6: TButton
Left = 260
Top = 41
Width = 26
Height = 23
Caption = '...'
TabOrder = 14
end
object MLXXName: TEdit
Tag = 2
Left = 64
Top = 42
Width = 196
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
OnChange = MLXXNameChange
end
end
end
object ToolBar3: TToolBar
Left = 0
Top = 0
Width = 1370
Height = 33
ButtonHeight = 30
ButtonWidth = 69
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_MYSC.ThreeImgList
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_MYSC.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 = 579
Top = 4
Width = 113
Height = 24
Caption = 'T'#28907#37329#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 = 502
Top = 266
Width = 242
Height = 42
Caption = #27491#22312#19979#36733#22270#29255#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 = 4
Visible = False
end
object Panel6: TPanel
Left = 846
Top = 103
Width = 483
Height = 168
BevelOuter = bvNone
Color = clSkyBlue
TabOrder = 5
Visible = False
object TLabel
Left = 104
Top = 6
Width = 41
Height = 15
Caption = #32534#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TLabel
Left = 238
Top = 193
Width = 41
Height = 15
Caption = #33394#21495':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object TLabel
Left = 21
Top = 193
Width = 73
Height = 15
Caption = #28907#37329#39068#33394':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label6: TLabel
Left = 276
Top = 3
Width = 44
Height = 21
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 8
Top = 3
Width = 88
Height = 21
Caption = #28907#37329#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel10: TPanel
Left = 112
Top = 28
Width = 106
Height = 139
BevelInner = bvRaised
BevelOuter = bvLowered
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu4
TabOrder = 0
object Label14: TLabel
Left = 3
Top = 2
Width = 4
Height = 17
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 3
Top = 16
Width = 4
Height = 17
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Image2: TImage
Left = 2
Top = 2
Width = 102
Height = 135
Align = alClient
end
object Image11: TImage
Left = 2
Top = 2
Width = 102
Height = 135
Align = alClient
Visible = False
OnDblClick = Image11DblClick
end
end
object TJNote: TMemo
Tag = 2
Left = 222
Top = 25
Width = 177
Height = 142
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 1
end
object TJColNo: TEdit
Tag = 2
Left = 282
Top = 189
Width = 77
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
OnChange = MLNameChange
end
object TJCol: TBtnEditA
Tag = 2
Left = 95
Top = 198
Width = 99
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
Visible = False
end
object TJNo: TEdit
Left = 146
Top = 2
Width = 98
Height = 23
CharCase = ecUpperCase
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object TJPTID: TEdit
Tag = 2
Left = 80
Top = 225
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Visible = False
OnChange = MLNameChange
end
object TJCPID: TEdit
Left = 155
Top = 229
Width = 76
Height = 23
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Visible = False
OnChange = MLNameChange
end
object TJTPID: TEdit
Tag = 2
Left = 253
Top = 228
Width = 76
Height = 23
HelpType = htKeyword
HelpKeyword = 'x'
CharCase = ecUpperCase
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Visible = False
OnChange = MLNameChange
end
object Button2: TButton
Left = 2
Top = 113
Width = 102
Height = 43
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = Button2Click
end
object Button3: TButton
Left = 397
Top = 0
Width = 50
Height = 30
Caption = #20851#38381
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = Button3Click
end
end
object Panel7: TPanel
Left = 739
Top = 160
Width = 97
Height = 104
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 6
object Button4: TButton
Left = 3
Top = 2
Width = 92
Height = 38
Caption = #22686#21152#33394#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button4Click
end
object Button7: TButton
Left = 4
Top = 71
Width = 67
Height = 31
Caption = #21024#38500#22270#29255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
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_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 845
Top = 342
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 898
Top = 349
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_MYSC.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_MYSC.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_MYSC.ADOLink
Parameters = <>
Left = 952
Top = 382
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 837
Top = 368
end
object PopupMenu1: TPopupMenu
Left = 902
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 = 923
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 = 336
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 = 810
Top = 678
end
object ADOQueryCol: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 810
Top = 697
end
object PopupMenu3: TPopupMenu
Left = 475
Top = 199
object N2: TMenuItem
Caption = #36873#25321#39068#33394
end
object N3: TMenuItem
Caption = #36873#25321#28504#36890#33394#21345
OnClick = N3Click
end
end
object PopupMenu4: TPopupMenu
Left = 1081
Top = 195
object N4: TMenuItem
Caption = #36873#25321#22270#29255
OnClick = N4Click
end
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 934
Top = 331
end
object ADOCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 995
Top = 331
end
end