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