📄 terminal.dfm
字号:
object Frm_Terminal: TFrm_Terminal
Left = 72
Top = 14
BorderStyle = bsDialog
Caption = ' '#32456#31471#32500#25252
ClientHeight = 518
ClientWidth = 670
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 15
object Bevel1: TBevel
Left = 280
Top = 8
Width = 376
Height = 298
end
object Label1: TLabel
Left = 360
Top = 49
Width = 48
Height = 15
Caption = #32456#31471#21517#31216
end
object Label2: TLabel
Left = 361
Top = 94
Width = 48
Height = 15
Caption = #36153#29575#31867#22411
end
object Label3: TLabel
Left = 367
Top = 139
Width = 36
Height = 15
Caption = #20018#21475#21495
end
object GroupBox1: TGroupBox
Left = 280
Top = 368
Width = 375
Height = 139
Caption = ' '#32479#35745#20449#24687' '
TabOrder = 9
end
object DBGrid1: TDBGrid
Left = 12
Top = 9
Width = 258
Height = 491
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDrawColumnCell = DBGrid1DrawColumnCell
OnDblClick = DBGrid1DblClick
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'TermName'
Title.Alignment = taCenter
Title.Caption = #32456#31471
Width = 60
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Rname'
Title.Alignment = taCenter
Title.Caption = #36153#29575
Width = 60
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'COMNAME'
Title.Alignment = taCenter
Title.Caption = #20018#21475#21495
Width = 60
Visible = True
end>
end
object Btn_Add: TButton
Left = 329
Top = 230
Width = 87
Height = 31
Caption = #22686#21152'[&A]'
TabOrder = 1
OnClick = Btn_AddClick
end
object Btn_Modi: TButton
Left = 433
Top = 229
Width = 87
Height = 31
Caption = #20462#25913'[&M]'
TabOrder = 2
OnClick = Btn_ModiClick
end
object Btn_Dele: TButton
Left = 538
Top = 230
Width = 87
Height = 31
Caption = #21024#38500'[&D]'
TabOrder = 3
OnClick = Btn_DeleClick
end
object Btn_Close: TButton
Left = 543
Top = 322
Width = 94
Height = 31
Cancel = True
Caption = #36864#20986'(&C)'
ModalResult = 2
TabOrder = 4
end
object StaticText1: TStaticText
Left = 314
Top = 409
Width = 72
Height = 23
BorderStyle = sbsSunken
Caption = #32456#31471#25968#37327':'
Color = clActiveCaption
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 5
end
object StTxt_Qty1: TStaticText
Left = 387
Top = 409
Width = 78
Height = 23
BorderStyle = sbsSunken
Caption = 'StTxt_Qty1'
Color = clActiveCaption
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 6
end
object StaticText2: TStaticText
Left = 314
Top = 445
Width = 184
Height = 23
Caption = #20854#20013#25317#26377#26222#36890#36153#29575#30340#32456#31471':'
Color = clActiveCaption
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 7
end
object StTxt_Qty2: TStaticText
Left = 500
Top = 445
Width = 78
Height = 23
BorderStyle = sbsSunken
Caption = 'StTxt_Qty1'
Color = clActiveCaption
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 8
end
object edt_Termname: TEdit
Left = 415
Top = 44
Width = 126
Height = 23
Color = 16772846
Enabled = False
TabOrder = 10
end
object CmbBx_RName: TComboBox
Left = 415
Top = 88
Width = 126
Height = 23
Style = csDropDownList
Color = 16772846
Enabled = False
ItemHeight = 15
ItemIndex = 0
TabOrder = 11
Text = #26222#36890#36153#29575
OnChange = CmbBx_RNameChange
Items.Strings = (
#26222#36890#36153#29575
#29305#21035#36153#29575)
end
object CmbBx_ComName: TComboBox
Left = 415
Top = 135
Width = 126
Height = 23
Style = csDropDownList
Color = 16772846
Enabled = False
ItemHeight = 15
ItemIndex = 0
TabOrder = 12
Text = 'COM1'
Items.Strings = (
'COM1'
'COM2'
'COM3'
'COM4')
end
object DataSource1: TDataSource
DataSet = Frm_sys_dm.Qr_tmp1
OnDataChange = DataSource1DataChange
Left = 175
Top = 79
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -