home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
PageTab
/
Main.dfm
/
Main.txt
Wrap
Text File
|
1998-03-06
|
3KB
|
162 lines
object MainForm: TMainForm
Left = 192
Top = 132
Width = 573
Height = 281
Caption = 'Page and Tab Controls'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 40
Top = 32
Width = 217
Height = 145
ActivePage = TabSheet1
HotTrack = True
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'TabSheet1'
object CheckBox1: TCheckBox
Left = 32
Top = 24
Width = 97
Height = 17
Caption = 'CheckBox1'
TabOrder = 0
end
object CheckBox2: TCheckBox
Left = 32
Top = 48
Width = 97
Height = 17
Caption = 'CheckBox2'
TabOrder = 1
end
object CheckBox3: TCheckBox
Left = 32
Top = 72
Width = 97
Height = 17
Caption = 'CheckBox3'
TabOrder = 2
end
end
object TabSheet2: TTabSheet
Caption = 'TabSheet2'
object RadioButton1: TRadioButton
Left = 16
Top = 24
Width = 113
Height = 17
Caption = 'RadioButton1'
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton2: TRadioButton
Left = 16
Top = 48
Width = 113
Height = 17
Caption = 'RadioButton2'
TabOrder = 1
end
object RadioButton3: TRadioButton
Left = 16
Top = 72
Width = 113
Height = 17
Caption = 'RadioButton3'
TabOrder = 2
end
object Button1: TButton
Left = 120
Top = 40
Width = 75
Height = 25
Caption = 'Next...'
TabOrder = 3
OnClick = Button1Click
end
end
object TabSheet3: TTabSheet
Caption = 'TabSheet3'
object DateTimePicker1: TDateTimePicker
Left = 8
Top = 16
Width = 186
Height = 21
CalAlignment = dtaLeft
Date = 35860.484889699070000000
Time = 35860.484889699070000000
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
object Button2: TButton
Left = 48
Top = 64
Width = 105
Height = 33
Caption = 'Go to first page'
TabOrder = 1
OnClick = Button2Click
end
end
end
object TabControl1: TTabControl
Left = 272
Top = 32
Width = 241
Height = 145
HotTrack = True
TabIndex = 0
TabOrder = 1
Tabs.Strings = (
'Tab 1'
'Tab 2'
'Tab 3'
'Tab 4')
OnChange = TabControl1Change
object Edit1: TEdit
Left = 16
Top = 40
Width = 209
Height = 21
TabOrder = 0
Text = 'Edit1 Tab 1'
end
object Edit2: TEdit
Left = 16
Top = 72
Width = 209
Height = 21
TabOrder = 1
Text = 'Edit2 Tab 1'
end
object Edit3: TEdit
Left = 16
Top = 104
Width = 209
Height = 21
TabOrder = 2
Text = 'Edit3 Tab 1'
end
end
object BitBtn1: TBitBtn
Left = 464
Top = 200
Width = 75
Height = 25
TabOrder = 2
Kind = bkClose
end
end