D7myYunxiang/云翔生产管理(MYSC.dll)/U_LLRKInPut.dfm

1058 lines
25 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmLLRKInPut: TfrmLLRKInPut
Left = 190
Top = 219
Width = 1198
2025-07-05 15:14:36 +08:00
Height = 352
2025-01-20 13:04:03 +08:00
Caption = #26469#26009#20837#24211#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
2025-07-05 15:14:36 +08:00
PixelsPerInch = 96
TextHeight = 15
2025-01-20 13:04:03 +08:00
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-07-05 15:14:36 +08:00
Width = 1190
2025-01-20 13:04:03 +08:00
Height = 30
ButtonHeight = 30
ButtonWidth = 79
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object Label26: TLabel
Left = 0
Top = 0
Width = 36
Height = 30
Caption = ' '
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TBSave: TToolButton
Left = 36
Top = 0
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object Label19: TLabel
Left = 115
Top = 0
Width = 276
Height = 30
Caption = ' '
end
object labMYType: TLabel
Left = 391
Top = 0
Width = 32
Height = 30
Caption = ' '
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 423
Top = 0
Width = 276
Height = 30
Caption = ' '
end
object TBClose: TToolButton
Left = 699
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel3: TPanel
Left = 0
Top = 30
2025-07-05 15:14:36 +08:00
Width = 1190
Height = 291
2025-01-20 13:04:03 +08:00
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Panel6: TPanel
2025-07-05 15:14:36 +08:00
Left = 31
Top = 236
Width = 334
Height = 274
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
Visible = False
OnDblClick = Panel6DblClick
end
object Panel4: TPanel
Left = 2
Top = 2
2025-07-05 15:14:36 +08:00
Width = 1186
Height = 50
2025-01-20 13:04:03 +08:00
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label13: TLabel
2025-07-05 15:14:36 +08:00
Left = 690
Top = 15
Width = 105
Height = 20
2025-01-20 13:04:03 +08:00
Caption = #20837#24211#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
2025-07-05 15:14:36 +08:00
Left = 28
Top = 15
Width = 74
Height = 20
2025-01-20 13:04:03 +08:00
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
2025-07-05 15:14:36 +08:00
Left = 382
Top = 52
Width = 105
Height = 20
2025-01-20 13:04:03 +08:00
Caption = #36135#29289#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label1: TLabel
2025-07-05 15:14:36 +08:00
Left = 386
Top = 15
Width = 105
Height = 20
2025-01-20 13:04:03 +08:00
Caption = #36135#29289#21697#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRTime: TDateTimePicker
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 784
Top = 11
Width = 135
Height = 28
2025-01-20 13:04:03 +08:00
Date = 42459.000000000000000000
Time = 42459.000000000000000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object KHName: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 99
Top = 11
Width = 261
Height = 29
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 1
OnBtnClick = KHNameBtnClick
end
object HWType: TEdit
2025-07-05 15:14:36 +08:00
Left = 479
Top = 50
Width = 179
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
Visible = False
end
object MYName: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 481
Top = 11
Width = 187
Height = 28
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -19
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
OnBtnClick = MYNameBtnClick
end
end
object Panel5: TPanel
Left = 2
2025-07-05 15:14:36 +08:00
Top = 52
Width = 1186
Height = 165
2025-01-20 13:04:03 +08:00
Align = alTop
TabOrder = 2
object Label6: TLabel
2025-07-05 15:14:36 +08:00
Left = 33
Top = 124
Width = 66
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
2025-07-05 15:14:36 +08:00
Left = 213
Top = 76
Width = 66
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #39068' '#33394#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
2025-07-05 15:14:36 +08:00
Left = 213
Top = 25
Width = 66
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20811' '#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
2025-07-05 15:14:36 +08:00
Left = 33
Top = 25
Width = 66
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #38376' '#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
2025-07-05 15:14:36 +08:00
Left = 161
Top = 24
Width = 22
Height = 17
2025-01-20 13:04:03 +08:00
Caption = 'CM'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = 'Cambria'
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
2025-07-05 15:14:36 +08:00
Left = 338
Top = 24
2025-01-20 13:04:03 +08:00
Width = 33
2025-07-05 15:14:36 +08:00
Height = 17
2025-01-20 13:04:03 +08:00
Caption = 'g/'#13217
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = 'Cambria'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
2025-07-05 15:14:36 +08:00
Left = 33
Top = 76
Width = 66
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #33394' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
2025-07-05 15:14:36 +08:00
Left = 161
Top = 71
Width = 13
Height = 25
2025-01-20 13:04:03 +08:00
Caption = '#'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = 'Cambria'
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
2025-07-05 15:14:36 +08:00
Left = 395
Top = 25
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #30721#21333#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
2025-07-05 15:14:36 +08:00
Left = 507
Top = 25
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
2025-07-05 15:14:36 +08:00
Left = 625
Top = 25
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label34: TLabel
2025-07-05 15:14:36 +08:00
Left = 734
Top = 25
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
2025-07-05 15:14:36 +08:00
Left = 392
Top = 195
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #26680#23545#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label5: TLabel
2025-07-05 15:14:36 +08:00
Left = 508
Top = 195
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label7: TLabel
2025-07-05 15:14:36 +08:00
Left = 624
Top = 195
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label8: TLabel
2025-07-05 15:14:36 +08:00
Left = 733
Top = 195
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label9: TLabel
2025-07-05 15:14:36 +08:00
Left = 392
Top = 255
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #25968#37327#23545#27604#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label10: TLabel
2025-07-05 15:14:36 +08:00
Left = 508
Top = 255
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label17: TLabel
2025-07-05 15:14:36 +08:00
Left = 624
Top = 255
Width = 16
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label18: TLabel
2025-07-05 15:14:36 +08:00
Left = 733
Top = 255
Width = 32
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label23: TLabel
2025-07-05 15:14:36 +08:00
Left = 395
Top = 124
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #26469#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
2025-07-05 15:14:36 +08:00
Left = 395
Top = 76
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #23454#38469#20811#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
2025-07-05 15:14:36 +08:00
Left = 530
Top = 75
2025-01-20 13:04:03 +08:00
Width = 33
2025-07-05 15:14:36 +08:00
Height = 17
2025-01-20 13:04:03 +08:00
Caption = 'g/'#13217
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = 'Cambria'
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
2025-07-05 15:14:36 +08:00
Left = 596
Top = 76
Width = 48
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #32568#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Note: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 99
Top = 120
Width = 272
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object PS: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 465
Top = 22
Width = 40
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object Qty: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 554
Top = 22
Width = 71
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnChange = KgQtyChange
end
object KgQty: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 663
Top = 22
Width = 71
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = KgQtyChange
end
object MXHZPS: TEdit
2025-07-05 15:14:36 +08:00
Left = 467
Top = 191
Width = 40
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 4
Visible = False
end
object MXHZQty: TEdit
2025-07-05 15:14:36 +08:00
Left = 553
Top = 191
Width = 71
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
Visible = False
end
object MXHZKgQty: TEdit
2025-07-05 15:14:36 +08:00
Left = 662
Top = 191
Width = 71
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 6
Visible = False
end
object PSChaE: TEdit
2025-07-05 15:14:36 +08:00
Left = 467
Top = 251
Width = 40
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clRed
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 7
Visible = False
end
object QtyChaE: TEdit
2025-07-05 15:14:36 +08:00
Left = 553
Top = 251
Width = 71
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clRed
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 8
Visible = False
end
object KgQtyChaE: TEdit
2025-07-05 15:14:36 +08:00
Left = 662
Top = 251
Width = 71
Height = 23
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clRed
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 9
Visible = False
end
object Panel7: TPanel
2025-07-05 15:14:36 +08:00
Left = 806
2025-01-20 13:04:03 +08:00
Top = 1
2025-07-05 15:14:36 +08:00
Width = 90
Height = 156
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 10
object Panel1: TPanel
2025-07-05 15:14:36 +08:00
Left = 10
Top = 16
Width = 69
Height = 121
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
TabOrder = 0
OnClick = Panel1Click
object Label20: TLabel
2025-07-05 15:14:36 +08:00
Left = 22
Top = 20
Width = 22
Height = 84
2025-01-20 13:04:03 +08:00
Caption = #26126#13#10#32454#13#10#30721#13#10#21333
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
2025-07-05 15:14:36 +08:00
Font.Height = -21
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = Label20Click
end
end
end
object PTID: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 941
Top = 64
Width = 72
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 11
end
object JCDanWei: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 465
Top = 116
Width = 289
Height = 28
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -19
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 12
OnBtnClick = JCDanWeiBtnClick
end
object MYMF: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 99
Top = 21
Width = 60
Height = 23
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 13
OnBtnClick = MYMFBtnClick
end
object MYKZ: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 277
Top = 20
Width = 60
Height = 23
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 14
OnBtnClick = MYMFBtnClick
end
object MYColorNo: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 99
Top = 71
Width = 60
Height = 23
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 15
OnBtnClick = MYColorNoBtnClick
end
object MYColor: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 277
Top = 71
Width = 60
Height = 23
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 16
OnBtnClick = MYColorNoBtnClick
end
object SJKZ: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 465
Top = 73
Width = 59
Height = 21
2025-01-20 13:04:03 +08:00
Color = clScrollBar
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 17
end
object RCGangNo: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 641
Top = 71
Width = 111
Height = 23
2025-01-20 13:04:03 +08:00
TabOrder = 18
end
end
object Panel8: TPanel
2025-07-05 15:14:36 +08:00
Left = 363
Top = 236
Width = 86
Height = 274
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
Visible = False
object Button1: TButton
2025-07-05 15:14:36 +08:00
Left = 5
Top = 102
Width = 74
Height = 48
2025-01-20 13:04:03 +08:00
Caption = #36873#25321#39068#33394
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button1Click
end
end
object Panel16: TPanel
2025-07-05 15:14:36 +08:00
Left = 334
Top = 94
Width = 249
Height = 30
2025-01-20 13:04:03 +08:00
BevelOuter = bvNone
Caption = #27491#22312#20445#23384#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Visible = False
end
object Panel2: TPanel
2025-07-05 15:14:36 +08:00
Left = 467
Top = 235
Width = 86
Height = 274
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 5
Visible = False
object Image11: TImage
2025-07-05 15:14:36 +08:00
Left = 27
Top = 225
Width = 43
Height = 33
2025-01-20 13:04:03 +08:00
Visible = False
end
object Button3: TButton
2025-07-05 15:14:36 +08:00
Left = 4
Top = 103
Width = 75
Height = 48
2025-01-20 13:04:03 +08:00
Caption = #36873#25321#22270#29255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button3Click
end
end
object Panel9: TPanel
2025-07-05 15:14:36 +08:00
Left = 550
Top = 235
Width = 354
Height = 274
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 6
Visible = False
object Image1: TImage
2025-07-05 15:14:36 +08:00
Left = 195
Top = 136
Width = 75
Height = 57
2025-01-20 13:04:03 +08:00
Visible = False
OnDblClick = Image1DblClick
end
end
end
object ADOTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 688
Top = 541
end
object ADOCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 688
Top = 509
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 688
Top = 357
end
object DataSource1: TDataSource
DataSet = ClientDataSet1
Left = 688
Top = 480
end
object ClientDataSet1: TClientDataSet
Aggregates = <>
Params = <>
Left = 688
Top = 416
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 688
Top = 384
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 688
Top = 446
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
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 690
Top = 326
ReportData = {}
end
object ODPat: TOpenDialog
Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 692
Top = 301
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 717
Top = 300
end
object SaveDialog1: TSaveDialog
Left = 721
Top = 333
end
object adoqueryPicture: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 769
Top = 447
end
end