📄 unit1.dfm
字号:
object Form1: TForm1
Left = 223
Top = 108
Width = 627
Height = 573
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = OnDestory
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 7
Top = 4
Width = 594
Height = 85
Caption = #20027#31449#35774#32622
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 24
Width = 75
Height = 13
Caption = #20027#31449#35774#22791#31867#22411':'
end
object Label2: TLabel
Left = 184
Top = 24
Width = 63
Height = 13
Caption = #35774#22791#32034#24341#21495':'
end
object Label3: TLabel
Left = 336
Top = 24
Width = 49
Height = 13
Caption = 'CAN'#36890#36947':'
end
object Label4: TLabel
Left = 22
Top = 56
Width = 61
Height = 13
Caption = 'CAN'#27874#29305#29575':'
end
object Label5: TLabel
Left = 209
Top = 56
Width = 38
Height = 13
Caption = #20027#31449'ID:'
end
object Label6: TLabel
Left = 336
Top = 56
Width = 75
Height = 13
Caption = #23450#26102#24490#29615#21608#26399':'
end
object Label7: TLabel
Left = 464
Top = 55
Width = 13
Height = 13
Caption = 'ms'
end
object ComboBox_Devtype: TComboBox
Left = 86
Top = 19
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
Items.Strings = (
'PCI5121'#9
'PCI9810'#9
'USBCAN1'#9
'USBCAN2'#9
'PCI9820'#9
'CAN232'#9
'PCI5110'#9
'CANLITE'#9
'ISA9620'#9
'ISA5420'#9
'PC104CAN'
'CANETE'#9
'DNP9810'#9
'PCI9840'#9
'PC104CAN2')
end
object ComboBox_DevInd: TComboBox
Left = 252
Top = 19
Width = 73
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'0'
'1'
'2'
'3'
'4'
'5'
'6'
'7')
end
object ComboBox_CANInd: TComboBox
Left = 389
Top = 19
Width = 73
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
Items.Strings = (
'0')
end
object ComboBox_Baud: TComboBox
Left = 86
Top = 51
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 3
end
object ComboBox_MasterID: TComboBox
Left = 252
Top = 51
Width = 73
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 4
end
object Edit_MasterCycle: TEdit
Left = 414
Top = 51
Width = 47
Height = 21
TabOrder = 5
Text = '100'
end
object Button_Start: TButton
Left = 488
Top = 32
Width = 75
Height = 25
Caption = #21551#21160
TabOrder = 6
OnClick = Button_StartClick
end
end
object GroupBox2: TGroupBox
Left = 8
Top = 96
Width = 593
Height = 49
Caption = #20174#31449#35774#32622
TabOrder = 1
object Label8: TLabel
Left = 136
Top = 24
Width = 74
Height = 13
Caption = #26410#36830#25509#20174#31449'ID:'
end
object ComboBox_Disslave: TComboBox
Left = 231
Top = 19
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
end
object Button_Connect: TButton
Left = 331
Top = 17
Width = 75
Height = 25
Caption = #36830#25509
TabOrder = 1
OnClick = Button_ConnectClick
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 152
Width = 593
Height = 81
Caption = #20174#31449#35774#32622
TabOrder = 2
object Label9: TLabel
Left = 8
Top = 24
Width = 74
Height = 13
Caption = #24050#36830#25509#20174#31449'ID:'
end
object Label10: TLabel
Left = 192
Top = 24
Width = 51
Height = 13
Caption = #25968#25454#31867#22411':'
end
object Label11: TLabel
Left = 8
Top = 53
Width = 27
Height = 13
Caption = #25968#25454':'
end
object ComboBox_ConSlave: TComboBox
Left = 95
Top = 19
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
end
object ComboBox_Datatype: TComboBox
Left = 257
Top = 19
Width = 65
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'DO'
'AO')
end
object Button_SendData: TButton
Left = 336
Top = 17
Width = 75
Height = 25
Caption = #21457#36865#25968#25454
TabOrder = 2
OnClick = Button_SendDataClick
end
object Button_Disconnect: TButton
Left = 440
Top = 16
Width = 75
Height = 25
Caption = #26029#24320#36830#25509
TabOrder = 3
OnClick = Button_DisconnectClick
end
object Edit_Data: TEdit
Left = 41
Top = 49
Width = 534
Height = 21
TabOrder = 4
Text = '00 01 02 '
end
end
object ListView_Data: TListView
Left = 8
Top = 240
Width = 593
Height = 297
Columns = <
item
Caption = #20174#31449#22320#22336
end
item
Caption = #25968#25454#31867#22411
Width = 80
end
item
Caption = #21047#26032#26102#38388
Width = 80
end
item
Caption = #25968#25454
Width = 300
end>
TabOrder = 3
ViewStyle = vsReport
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 564
Top = 112
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -