home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
FANCY
/
MAIN.dfm
/
MAIN.txt
Wrap
Text File
|
1998-05-14
|
3KB
|
152 lines
object MainForm: TMainForm
Left = 136
Top = 153
AutoScroll = False
Caption = 'Fancy RadioButton Groups'
ClientHeight = 290
ClientWidth = 550
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = []
OldCreateOrder = True
PixelsPerInch = 120
TextHeight = 18
object Panel1: TPanel
Left = 9
Top = 9
Width = 226
Height = 136
BevelInner = bvLowered
BevelWidth = 4
BorderStyle = bsSingle
TabOrder = 0
object RadioButton1: TRadioButton
Left = 54
Top = 18
Width = 127
Height = 19
Caption = 'RadioButton1'
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton2: TRadioButton
Left = 54
Top = 45
Width = 127
Height = 19
Caption = 'RadioButton2'
TabOrder = 1
end
object RadioButton3: TRadioButton
Left = 54
Top = 72
Width = 127
Height = 19
Caption = 'RadioButton3'
TabOrder = 2
end
object RadioButton4: TRadioButton
Left = 54
Top = 99
Width = 127
Height = 19
Caption = 'RadioButton4'
TabOrder = 3
end
end
object Panel2: TPanel
Left = 252
Top = 9
Width = 226
Height = 136
BevelInner = bvRaised
BevelWidth = 3
BorderWidth = 2
BorderStyle = bsSingle
TabOrder = 1
object RadioButton5: TRadioButton
Left = 54
Top = 27
Width = 127
Height = 19
Caption = 'RadioButton5'
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton6: TRadioButton
Left = 54
Top = 54
Width = 127
Height = 19
Caption = 'RadioButton6'
TabOrder = 1
end
object RadioButton7: TRadioButton
Left = 54
Top = 81
Width = 127
Height = 19
Caption = 'RadioButton7'
TabOrder = 2
end
end
object Memo1: TMemo
Left = 9
Top = 153
Width = 226
Height = 100
TabStop = False
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Courier New'
Font.Style = []
Lines.Strings = (
'BevelInner = bvLowered'
'BevelOuter = bvRaised'
'BevelWidth = 4'
'BorderStyle = bsSingle'
'BorderWidth = 0')
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object Memo2: TMemo
Left = 252
Top = 153
Width = 226
Height = 100
TabStop = False
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Courier New'
Font.Style = []
Lines.Strings = (
'BevelInner = bvRaised'
'BevelOuter = bvRaised'
'BevelWidth = 3'
'BorderStyle = bsSingle'
'BorderWidth = 2')
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object BitBtn1: TBitBtn
Left = 486
Top = 72
Width = 55
Height = 109
TabOrder = 4
Kind = bkClose
Layout = blGlyphBottom
end
end