home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2003 February
/
PCWorld_2003-02_cd.bin
/
Software
/
Topware
/
devpascal
/
devpas.exe
/
0
/
RCDATA
/
TCREATEDIALOGFORM
/
TCREATEDIALOGFORM.txt
Wrap
Text File
|
2002-07-15
|
9KB
|
410 lines
object CreateDialogForm: TCreateDialogForm
Left = 114
Top = 128
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'Create new dialog'
ClientHeight = 341
ClientWidth = 780
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 120
TextHeight = 16
object GroupBox1: TGroupBox
Left = 10
Top = 10
Width = 375
Height = 278
Caption = 'Standard options :'
TabOrder = 0
object Label4: TLabel
Left = 17
Top = 30
Width = 342
Height = 16
Caption = 'ID of the dialog (ID can be any number not already used) :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 16
Top = 89
Width = 155
Height = 16
Caption = 'Title of the dialog window :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 17
Top = 148
Width = 109
Height = 16
Caption = 'Default font name :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 17
Top = 207
Width = 99
Height = 16
Caption = 'Default font size :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ID: TEdit
Left = 17
Top = 49
Width = 90
Height = 24
TabOrder = 0
Text = '100'
end
object Title: TEdit
Left = 17
Top = 108
Width = 326
Height = 24
TabOrder = 1
Text = 'Dialog title'
end
object FontName: TEdit
Left = 17
Top = 167
Width = 326
Height = 24
TabOrder = 2
Text = 'Helv'
end
object FontSize: TSpinEdit
Left = 17
Top = 226
Width = 93
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 3
Value = 8
end
end
object GroupBox2: TGroupBox
Left = 394
Top = 10
Width = 375
Height = 116
Caption = 'Dialog size and position :'
TabOrder = 1
object Label5: TLabel
Left = 17
Top = 37
Width = 27
Height = 16
Caption = 'Left :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 17
Top = 76
Width = 31
Height = 16
Caption = 'Top :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 185
Top = 37
Width = 45
Height = 16
Caption = 'Height :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 185
Top = 76
Width = 40
Height = 16
Caption = 'Width :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LeftValue: TSpinEdit
Left = 59
Top = 30
Width = 100
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 0
Value = 0
end
object TopValue: TSpinEdit
Left = 59
Top = 69
Width = 100
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 1
Value = 0
end
object HeightValue: TSpinEdit
Left = 246
Top = 30
Width = 100
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 2
Value = 200
end
object WidthValue: TSpinEdit
Left = 246
Top = 69
Width = 100
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 3
Value = 200
end
end
object GroupBox3: TGroupBox
Left = 394
Top = 128
Width = 188
Height = 160
Caption = 'Optionals :'
TabOrder = 2
object SysMenu: TCheckBox
Left = 20
Top = 30
Width = 119
Height = 20
Caption = '&System menu'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
end
object Min: TCheckBox
Left = 20
Top = 49
Width = 119
Height = 21
Caption = '&Minimize button'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Maxi: TCheckBox
Left = 20
Top = 69
Width = 119
Height = 21
Caption = 'M&aximize button'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object VertScroll: TCheckBox
Left = 20
Top = 89
Width = 119
Height = 21
Caption = '&Vertical scroll'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object HorizScroll: TCheckBox
Left = 20
Top = 108
Width = 119
Height = 21
Caption = '&Horizontal scroll'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object Popup: TCheckBox
Left = 20
Top = 128
Width = 119
Height = 21
Caption = '&Popup'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 5
end
end
object GroupBox4: TGroupBox
Left = 591
Top = 128
Width = 178
Height = 159
Caption = 'Frame style :'
TabOrder = 3
object TitleBar: TCheckBox
Left = 20
Top = 30
Width = 119
Height = 20
Caption = '&Title bar'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
end
object Modal: TCheckBox
Left = 20
Top = 49
Width = 119
Height = 21
Caption = 'M&odal'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 1
end
object Resizable: TCheckBox
Left = 20
Top = 69
Width = 119
Height = 21
Caption = '&Resizable'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object ClientEdge: TCheckBox
Left = 20
Top = 89
Width = 119
Height = 21
Caption = '&Client edge'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object StaticEdge: TCheckBox
Left = 20
Top = 108
Width = 119
Height = 21
Caption = 'S&tatic edge'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
end
object CancelBtn: TBitBtn
Left = 677
Top = 302
Width = 92
Height = 30
Caption = '&Cancel'
TabOrder = 4
Kind = bkCancel
end
object OKBtn: TBitBtn
Left = 578
Top = 302
Width = 93
Height = 30
Caption = '&OK'
TabOrder = 5
Kind = bkOK
end
end