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

171 lines
4.1 KiB
ObjectPascal

object Bet03Frame: TBet03Frame
Left = 0
Top = 0
Width = 384
Height = 310
TabOrder = 0
object Label1: TLabel
Left = 40
Top = 24
Width = 104
Height = 15
Caption = #20869#32622#25171#27861#65306#24196#38386#24046
end
object Label2: TLabel
Left = 152
Top = 91
Width = 101
Height = 20
AutoSize = False
Caption = #20010#21450#20197#19978#19979#27880
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 152
Top = 155
Width = 101
Height = 20
AutoSize = False
Caption = #20010#21450#20197#19978#19979#27880
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object m_leBlP: TLabeledEdit
Left = 109
Top = 88
Width = 39
Height = 28
Hint = '1 - 30 '#20043#38388#30340#24046#20540
Alignment = taCenter
EditLabel.Width = 64
EditLabel.Height = 28
EditLabel.Caption = #24196#27604#38386#22810
EditLabel.Font.Charset = DEFAULT_CHARSET
EditLabel.Font.Color = clRed
EditLabel.Font.Height = -15
EditLabel.Font.Name = 'Segoe UI'
EditLabel.Font.Style = []
EditLabel.ParentFont = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
LabelPosition = lpLeft
MaxLength = 2
NumbersOnly = True
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
Text = '5'
OnExit = DiffEditExit
end
object m_lePlB: TLabeledEdit
Left = 109
Top = 152
Width = 39
Height = 28
Hint = '1 - 30 '#20043#38388#30340#24046#20540
Alignment = taCenter
EditLabel.Width = 64
EditLabel.Height = 28
EditLabel.Caption = #38386#27604#24196#22810
EditLabel.Font.Charset = DEFAULT_CHARSET
EditLabel.Font.Color = clBlue
EditLabel.Font.Height = -15
EditLabel.Font.Name = 'Segoe UI'
EditLabel.Font.Style = []
EditLabel.ParentFont = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
LabelPosition = lpLeft
MaxLength = 2
NumbersOnly = True
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
Text = '5'
OnExit = DiffEditExit
end
object m_edBlP: TEdit
Left = 257
Top = 88
Width = 88
Height = 28
Hint = #28165#36755#20837'1-15'#20010#19979#27880#39033
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
Text = 'a'
OnExit = BetEditExit
OnKeyPress = BetEditKeyPress
end
object m_edPlB: TEdit
Left = 257
Top = 152
Width = 88
Height = 28
Hint = #28165#36755#20837'1-15'#20010#19979#27880#39033
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
Text = 's'
OnExit = BetEditExit
OnKeyPress = BetEditKeyPress
end
object StaticText1: TStaticText
Left = 46
Top = 223
Width = 238
Height = 19
Caption = #35828#26126#65306#19979#27880#39033#20026#19968#20010#25110#22810#20010#20197#19979#26377#25928#23383#27597
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object StaticText2: TStaticText
Left = 46
Top = 249
Width = 299
Height = 19
Caption = #65288' a='#24196#65292's='#38386#65292'd='#21644#65292'x='#26412#25163#19981#19979#65292'z='#26412#23616#32467#26463' '#65289
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 5
end
end