Files
winapp/TableSet.dfm
T
2026-06-12 22:37:02 +08:00

98 lines
2.0 KiB
ObjectPascal

object TabSetForm: TTabSetForm
Left = 0
Top = 0
BorderIcons = []
BorderStyle = bsNone
ClientHeight = 93
ClientWidth = 273
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
KeyPreview = True
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnMouseDown = FormMouseDown
OnMouseMove = FormMouseMove
OnShow = FormShow
TextHeight = 15
object m_panBack: TPanel
Left = 0
Top = 0
Width = 273
Height = 93
Align = alClient
Ctl3D = True
FullRepaint = False
ParentCtl3D = False
ShowCaption = False
TabOrder = 0
OnMouseEnter = FormMouseEnter
OnMouseLeave = FormMouseLeave
object m_lblShow: TLabel
Left = 23
Top = 17
Width = 26
Height = 15
Caption = #26174#31034
end
object m_lblTabRun: TLabel
Left = 145
Top = 17
Width = 26
Height = 15
Caption = #36816#34892
end
object m_btnOk: TButton
Left = 186
Top = 52
Width = 60
Height = 25
Caption = #30830#23450
TabOrder = 0
OnClick = OnOkClick
end
object m_cbResetIPs: TCheckBox
Left = 23
Top = 56
Width = 106
Height = 17
Hint = #28165#38500#20840#37096#21488#26700#30340#29420#31435#31574#30053
Caption = #37325#32622#21488#26700#31574#30053
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object m_cbRun: TComboBox
Left = 179
Top = 14
Width = 67
Height = 23
Style = csDropDownList
TabOrder = 2
OnChange = OnRunChange
OnCloseUp = ComboCloseUp
Items.Strings = (
#20840#19981#36873
'5'#21488
'10'#21488
#20840#36873)
end
object m_cbShow: TComboBox
Left = 58
Top = 14
Width = 57
Height = 23
Style = csDropDownList
TabOrder = 3
OnChange = OnShowChange
OnCloseUp = ComboCloseUp
Items.Strings = (
'15'#21488
'30'#21488)
end
end
end