home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip Hitware 6 A
/
CHIP_HITWARE6_A.iso
/
edukacja
/
GenDes
/
gendesigner.exe
/
0
/
RCDATA
/
TPERSON
/
TPERSON.txt
< prev
Wrap
Text File
|
1998-06-09
|
9KB
|
456 lines
object Person: TPerson
Left = 216
Top = 119
BorderStyle = bsDialog
Caption = 'Person'
ClientHeight = 425
ClientWidth = 591
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
Position = poScreenCenter
OnShow = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 208
Top = 11
Width = 55
Height = 13
Caption = 'First Names'
end
object Label2: TLabel
Left = 208
Top = 33
Width = 56
Height = 13
Caption = 'Last Names'
end
object Label7: TLabel
Left = 488
Top = 144
Width = 26
Height = 13
Caption = 'Date:'
end
object Label8: TLabel
Left = 208
Top = 194
Width = 58
Height = 13
Caption = 'Occupation:'
end
object Label3: TLabel
Left = 239
Top = 74
Width = 22
Height = 13
Caption = 'Born'
end
object Label4: TLabel
Left = 275
Top = 53
Width = 23
Height = 13
Caption = 'Date'
end
object Label5: TLabel
Left = 341
Top = 53
Width = 32
Height = 13
Caption = 'Where'
end
object Label9: TLabel
Left = 8
Top = 224
Width = 90
Height = 13
Caption = 'Picture description:'
end
object Label6: TLabel
Left = 208
Top = 216
Width = 53
Height = 13
Caption = 'Reference:'
end
object Label10: TLabel
Left = 208
Top = 145
Width = 50
Height = 13
Caption = 'Married to:'
end
object Label11: TLabel
Left = 208
Top = 167
Width = 35
Height = 13
Caption = 'Where:'
end
object Label12: TLabel
Left = 221
Top = 95
Width = 41
Height = 13
Caption = 'Baptized'
end
object Button3: TButton
Left = 480
Top = 265
Width = 105
Height = 25
Caption = 'Create &new text file'
TabOrder = 18
OnClick = Button3Click
end
object Edit1: TEdit
Left = 272
Top = 7
Width = 177
Height = 21
TabOrder = 0
Text = 'Edit1'
end
object Edit2: TEdit
Left = 272
Top = 29
Width = 177
Height = 21
TabOrder = 1
Text = 'Edit2'
end
object Sex: TGroupBox
Left = 456
Top = 1
Width = 129
Height = 65
Ctl3D = True
ParentCtl3D = False
TabOrder = 2
object Image1: TImage
Left = 3
Top = 11
Width = 48
Height = 48
AutoSize = True
Picture.Data = {<image000.bmp>}
Transparent = True
end
object Image2: TImage
Left = 3
Top = 11
Width = 48
Height = 48
AutoSize = True
Picture.Data = {<image001.bmp>}
Transparent = True
Visible = False
end
object RadioButton1: TRadioButton
Left = 55
Top = 16
Width = 61
Height = 23
Caption = 'Male'
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 55
Top = 32
Width = 61
Height = 23
Caption = 'Female'
TabOrder = 1
OnClick = RadioButton2Click
end
end
object Button2: TButton
Left = 480
Top = 393
Width = 105
Height = 25
Cancel = True
Caption = 'Cancel'
TabOrder = 22
OnClick = Button2Click
end
object Memo1: TMemo
Left = 8
Top = 265
Width = 465
Height = 153
Color = clBtnFace
Enabled = False
ScrollBars = ssVertical
TabOrder = 17
OnDblClick = Memo1DblClick
end
object Edit4: TEdit
Left = 160
Top = 317
Width = 41
Height = 21
TabOrder = 23
Text = 'Edit4'
Visible = False
OnChange = Edit4Change
end
object Edit3: TEdit
Left = 160
Top = 293
Width = 41
Height = 21
TabOrder = 24
Text = 'Edit3'
Visible = False
OnChange = Edit3Change
end
object MaskEdit3: TMaskEdit
Left = 520
Top = 141
Width = 65
Height = 21
Enabled = False
TabOrder = 10
Text = 'MaskEdit3'
Visible = False
end
object Edit7: TEdit
Left = 272
Top = 190
Width = 313
Height = 21
TabOrder = 12
Text = 'Edit7'
end
object MaskEdit1: TMaskEdit
Left = 272
Top = 70
Width = 65
Height = 21
TabOrder = 3
Text = 'MaskEdit1'
end
object MaskEdit2: TMaskEdit
Left = 272
Top = 114
Width = 65
Height = 21
Color = clBtnFace
Enabled = False
TabOrder = 8
Text = 'MaskEdit2'
end
object CheckBox1: TCheckBox
Left = 223
Top = 116
Width = 44
Height = 17
Caption = 'Died'
TabOrder = 7
OnClick = CheckBox1Click
end
object Edit5: TEdit
Left = 338
Top = 70
Width = 247
Height = 21
MaxLength = 100
TabOrder = 4
Text = 'Edit5'
end
object Edit6: TEdit
Left = 338
Top = 114
Width = 247
Height = 21
Color = clBtnFace
Enabled = False
MaxLength = 100
TabOrder = 9
Text = 'Edit6'
end
object Panel1: TPanel
Left = 8
Top = 8
Width = 185
Height = 185
BevelOuter = bvLowered
Caption = 'Picture'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 25
object AdvImage1: TAdvImage
Left = 1
Top = 1
Width = 183
Height = 183
Align = alClient
OnDblClick = AdvImage1Click
BevelWidth = 1
GIFAnimate = False
ShowFrame3D = False
StretchRatio = True
CenterView = True
ShowEmptyLabel = False
JPEGPixelFormat = jf8Bit
JPEGScale = jsFullSize
JPEGGrayscale = False
JPEGPerformance = jpBestQuality
JPEGSmoothing = True
JPEGProgressiveEncoding = False
JPEGCompressionQuality = 1
JPEGProgressiveDisplay = False
Checked = False
CheckColor = clRed
GifAnimateSpeed = 10
EmptyLabel = 'Empty'
end
end
object Edit8: TEdit
Left = 8
Top = 238
Width = 577
Height = 21
Color = clBtnFace
Enabled = False
MaxLength = 255
TabOrder = 16
Text = 'Edit8'
end
object Edit9: TEdit
Left = 272
Top = 212
Width = 313
Height = 21
TabOrder = 13
Text = 'Edit9'
end
object ComboBox1: TEdit
Left = 272
Top = 141
Width = 209
Height = 21
TabStop = False
Color = clBtnFace
Ctl3D = True
ParentCtl3D = False
ReadOnly = True
TabOrder = 26
Text = 'Name'
OnChange = ComboBox1Change
end
object Button1: TButton
Left = 480
Top = 365
Width = 105
Height = 25
Caption = 'OK'
Default = True
TabOrder = 21
OnClick = Button1Click
end
object Button6: TButton
Left = 8
Top = 197
Width = 89
Height = 25
Caption = 'Open &picture'
TabOrder = 14
OnClick = Button6Click
end
object Button7: TButton
Left = 104
Top = 197
Width = 89
Height = 25
Caption = '&Clear'
TabOrder = 15
OnClick = Button7Click
end
object Button4: TButton
Left = 480
Top = 293
Width = 105
Height = 25
Caption = '&Open existing text file'
TabOrder = 19
OnClick = Button4Click
end
object Button5: TButton
Left = 480
Top = 321
Width = 105
Height = 25
Caption = '&Don'#39't use text file'
TabOrder = 20
OnClick = Button5Click
end
object Edit10: TEdit
Left = 272
Top = 163
Width = 313
Height = 21
TabOrder = 11
Text = 'Edit10'
Visible = False
end
object MaskEdit4: TMaskEdit
Left = 272
Top = 92
Width = 65
Height = 21
TabOrder = 5
Text = 'MaskEdit4'
end
object Edit11: TEdit
Left = 338
Top = 92
Width = 247
Height = 21
MaxLength = 100
TabOrder = 6
Text = 'Edit11'
end
object SaveDialog1: TSaveDialog
DefaultExt = 'txt'
Filter = 'Text files (*.txt)|*.txt|All files (*.*)|*.*'
Options = [ofOverwritePrompt, ofHideReadOnly]
Title = 'Create new text file'
Left = 120
Top = 357
end
object OpenDialog1: TOpenDialog
DefaultExt = 'txt'
Filter = 'Text files (*.txt)|*.txt|All files (*.*)|*.*'
Options = [ofHideReadOnly, ofNoChangeDir]
Title = 'Open existing text file'
Left = 88
Top = 356
end
object OpenPictureDialog1: TOpenPictureDialog
DefaultExt = 'jpg'
Filter =
'All (*.jpg;*.jpeg;*.gif;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.' +
'gif;*.bmp;*.ico;*.emf;*.wmf|JPEG Image File (*.jpg)|*.jpg|JPEG I' +
'mage File (*.jpeg)|*.jpeg|Graphics Interchange Format (*.gif)|*.' +
'gif|Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced Metafiles' +
' (*.emf)|*.emf|Metafiles (*.wmf)|*.wmf'
Options = [ofNoChangeDir]
Left = 88
Top = 364
end
end