?? umail.~dfm
字號:
object frmMain: TfrmMain
Left = 207
Top = 59
BorderStyle = bsDialog
Caption = 'frmMain'
ClientHeight = 442
ClientWidth = 544
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label2: TLabel
Left = 40
Top = 346
Width = 92
Height = 87
Caption = #21488' '#36798#13#13#65328#65324#65315
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label3: TLabel
Left = 8
Top = 8
Width = 25
Height = 13
Caption = 'Delta'
end
object Label4: TLabel
Left = 168
Top = 352
Width = 28
Height = 13
Caption = #21629#20196
end
object SpeedButton1: TSpeedButton
Left = 200
Top = 377
Width = 49
Height = 22
Caption = #25191#34892
OnClick = SpeedButton1Click
end
object Label5: TLabel
Left = 168
Top = 412
Width = 28
Height = 13
Caption = #36820#22238
end
object btnRun: TSpeedButton
Left = 232
Top = 3
Width = 39
Height = 22
Caption = 'Run'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = btnRunClick
end
object btnStop: TSpeedButton
Left = 272
Top = 3
Width = 39
Height = 22
Caption = 'Stop'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = btnStopClick
end
object SpeedButton2: TSpeedButton
Left = 41
Top = 4
Width = 23
Height = 22
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 352
Top = 4
Width = 70
Height = 22
Caption = 'D000-D1311'
OnClick = SpeedButton3Click
end
object btnReadM: TSpeedButton
Left = 440
Top = 4
Width = 70
Height = 22
Caption = 'M000-M1279'
OnClick = btnReadMClick
end
object SpeedButton4: TSpeedButton
Left = 132
Top = 271
Width = 36
Height = 22
Caption = 'Read'
OnClick = SpeedButton4Click
end
object D: TLabel
Left = 51
Top = 274
Width = 9
Height = 15
Caption = 'D'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel1: TPanel
Left = 16
Top = 32
Width = 297
Height = 121
TabOrder = 0
object Label1: TLabel
Left = 27
Top = 90
Width = 239
Height = 13
Caption = 'Y0 Y1 Y2 Y3 Y4 Y5 Y6 Y7'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object btnOut1: TSpeedButton
Tag = 1
Left = 24
Top = 12
Width = 23
Height = 22
Hint = '01050500'
AllowAllUp = True
GroupIndex = 1
Caption = 'Y0'
OnClick = btnOut1Click
end
object btnOut2: TSpeedButton
Tag = 2
Left = 56
Top = 12
Width = 23
Height = 22
Hint = '01050501'
AllowAllUp = True
GroupIndex = 2
Caption = 'Y1'
OnClick = btnOut1Click
end
object btnOut3: TSpeedButton
Tag = 3
Left = 88
Top = 12
Width = 23
Height = 22
Hint = '01050502'
AllowAllUp = True
GroupIndex = 3
Caption = 'Y2'
OnClick = btnOut1Click
end
object btnOut4: TSpeedButton
Tag = 4
Left = 120
Top = 12
Width = 23
Height = 22
Hint = '01050503'
AllowAllUp = True
GroupIndex = 4
Caption = 'Y3'
OnClick = btnOut1Click
end
object btnOut5: TSpeedButton
Tag = 5
Left = 152
Top = 12
Width = 23
Height = 22
Hint = '01050504'
AllowAllUp = True
GroupIndex = 5
Caption = 'Y4'
OnClick = btnOut1Click
end
object btnOut6: TSpeedButton
Tag = 6
Left = 184
Top = 12
Width = 23
Height = 22
Hint = '01050505'
AllowAllUp = True
GroupIndex = 6
Caption = 'Y5'
OnClick = btnOut1Click
end
object btnOut7: TSpeedButton
Tag = 7
Left = 216
Top = 12
Width = 23
Height = 22
Hint = '01050506'
AllowAllUp = True
GroupIndex = 7
Caption = 'Y6'
OnClick = btnOut1Click
end
object btnOut8: TSpeedButton
Tag = 8
Left = 248
Top = 12
Width = 23
Height = 22
Hint = '01050507'
AllowAllUp = True
GroupIndex = 8
Caption = 'Y7'
OnClick = btnOut1Click
end
object ledOut1: TiLedRound
Left = 24
Top = 67
ActiveColor = clRed
end
object ledOut2: TiLedRound
Left = 56
Top = 67
ActiveColor = clRed
end
object ledOut3: TiLedRound
Left = 88
Top = 67
ActiveColor = clRed
end
object ledOut4: TiLedRound
Left = 120
Top = 67
ActiveColor = clRed
end
object ledOut5: TiLedRound
Left = 152
Top = 67
ActiveColor = clRed
end
object ledOut6: TiLedRound
Left = 184
Top = 67
ActiveColor = clRed
end
object ledOut7: TiLedRound
Left = 216
Top = 67
ActiveColor = clRed
end
object ledOut8: TiLedRound
Left = 248
Top = 67
ActiveColor = clRed
end
end
object Panel2: TPanel
Left = 16
Top = 160
Width = 292
Height = 89
TabOrder = 1
object shpIn1: TShape
Left = 24
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn2: TShape
Left = 56
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn3: TShape
Left = 88
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn4: TShape
Left = 120
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn5: TShape
Left = 152
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn6: TShape
Left = 184
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn7: TShape
Left = 216
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn8: TShape
Left = 248
Top = 16
Width = 20
Height = 24
Shape = stCircle
end
object shpIn9: TShape
Left = 24
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn10: TShape
Left = 56
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn11: TShape
Left = 88
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn12: TShape
Left = 120
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn13: TShape
Left = 152
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn14: TShape
Left = 184
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn15: TShape
Left = 216
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
object shpIn16: TShape
Left = 248
Top = 49
Width = 20
Height = 23
Shape = stCircle
end
end
object edtAdr: TEdit
Left = 200
Top = 349
Width = 108
Height = 21
TabOrder = 2
Text = '01010C300001'
end
object edtValue: TEdit
Left = 200
Top = 409
Width = 108
Height = 21
TabOrder = 3
end
object Memo1: TMemo
Left = 344
Top = 32
Width = 177
Height = 313
ScrollBars = ssBoth
TabOrder = 4
end
object edtDAddr: TEdit
Left = 64
Top = 272
Width = 54
Height = 21
TabOrder = 5
Text = '0'
end
object edtDValue: TEdit
Left = 176
Top = 272
Width = 97
Height = 21
TabOrder = 6
Text = '0'
end
object TimerPLCRdStat: TTimer
Enabled = False
Interval = 100
OnTimer = TimerPLCRdStatTimer
Left = 8
Top = 248
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -