Online Praxis 1997 February/OP2_97.BIN/cd-rom/tools/email/pronto/family.z/FAMILY.exe/0/RCDATA/TFRMTABS/TFRMTABS.txt

Text File | 1997-01-13 | 40KB | 1,513 lines

object frmTabs: TfrmTabs
  Left = 322
  Top = 94
  BorderStyle = bsNone
  Caption = 'Pronto Family'
  ClientHeight = 589
  ClientWidth = 778
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object lblUserName: TLabel
    Left = 215
    Top = 190
    Width = 46
    Height = 16
    Caption = 'Name:'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lblUserIcon: TLabel
    Left = 215
    Top = 222
    Width = 34
    Height = 16
    Caption = 'Icon:'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lblAddress: TLabel
    Left = 215
    Top = 320
    Width = 110
    Height = 16
    Caption = 'E-mail address:'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lblUniqueAddress: TLabel
    Left = 561
    Top = 254
    Width = 114
    Height = 85
    AutoSize = False
    Caption = 'kid1<[e-mail]>'
    Font.Color = clRed
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object PageControl1: TPageControl
    Left = -5
    Top = -6
    Width = 718
    Height = 508
    ActivePage = tabPostMaster
    TabOrder = 0
    object tabComm: TTabSheet
      Caption = '005*00001920*00000000*3'
      ParentShowHint = False
      ShowHint = False
      TabVisible = False
      OnEnter = tabCommEnter
      object imgComm: TImage
        Left = 0
        Top = 0
        Width = 600
        Height = 420
        AutoSize = True
        OnMouseDown = imgCommMouseDown
      end
      object CancelInternetImg: TImage
        Left = 474
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = CancelInternetImgMouseDown
        OnMouseUp = CancelInternetImgMouseUp
      end
      object NextInternetImg: TImage
        Left = 313
        Top = 364
        Width = 102
        Height = 43
        Cursor = 18
        Picture.Data = {<image000.bmp>}
        Visible = False
        OnMouseDown = NextInternetImgMouseDown
        OnMouseUp = NextInternetImgMouseUp
      end
      object lblEMailExpl: TLabel
        Left = 205
        Top = 81
        Width = 370
        Height = 50
        AutoSize = False
        Caption = 'lblEMailExpl'
        Color = clMaroon
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Transparent = True
        WordWrap = True
      end
      object lblAccountExpl: TLabel
        Left = 205
        Top = 149
        Width = 370
        Height = 50
        AutoSize = False
        Caption = 'Label1'
        Color = clMaroon
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Transparent = True
        WordWrap = True
      end
      object lblHostExpl: TLabel
        Left = 205
        Top = 218
        Width = 370
        Height = 52
        AutoSize = False
        Caption = 'Label1'
        Color = clMaroon
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Transparent = True
        WordWrap = True
      end
      object lblPasswordExpl: TLabel
        Left = 205
        Top = 290
        Width = 370
        Height = 69
        AutoSize = False
        Caption = 'Label1'
        Color = clMaroon
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Transparent = True
        WordWrap = True
      end
      object ELogin: TEdit
        Left = 337
        Top = 130
        Width = 240
        Height = 21
        AutoSize = False
        TabOrder = 1
        OnChange = ELoginChange
        OnExit = ELoginExit
        OnKeyUp = ELoginKeyUp
        OnMouseDown = ELoginMouseDown
      end
      object EPass: TEdit
        Left = 337
        Top = 269
        Width = 240
        Height = 21
        AutoSize = False
        PasswordChar = '*'
        TabOrder = 3
        OnChange = EPassChange
        OnExit = EPassExit
        OnKeyDown = EPassKeyDown
        OnMouseDown = EPassMouseDown
      end
      object EHost: TEdit
        Left = 338
        Top = 197
        Width = 240
        Height = 21
        AutoSize = False
        TabOrder = 2
        OnChange = EHostChange
        OnExit = EHostExit
        OnKeyUp = EHostKeyUp
        OnMouseDown = EHostMouseDown
      end
      object EAddress: TEdit
        Left = 338
        Top = 61
        Width = 240
        Height = 21
        AutoSize = False
        TabOrder = 0
        OnChange = EAddressChange
        OnExit = EAddressExit
        OnMouseDown = EAddressMouseDown
      end
    end
    object tabPostMaster: TTabSheet
      Caption = 'Post Master'
      TabVisible = False
      OnEnter = tabPostMasterEnter
      object imgPM: TImage
        Left = 0
        Top = 1
        Width = 600
        Height = 420
        AutoSize = True
      end
      object IconViewer: TImage
        Left = 270
        Top = 137
        Width = 40
        Height = 40
        Center = True
        Stretch = True
      end
      object imgNextIcon: TImage
        Left = 316
        Top = 145
        Width = 25
        Height = 28
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image001.bmp>}
        OnMouseDown = imgPMNextIconMouseDown
      end
      object CancelPostMasterImg: TImage
        Left = 475
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = CancelPostMasterImgMouseDown
        OnMouseUp = CancelPostMasterImgMouseUp
      end
      object NextPostMasterImg: TImage
        Left = 304
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        Picture.Data = {<image002.bmp>}
        Visible = False
        OnMouseDown = NextPostMasterImgMouseDown
        OnMouseUp = NextPostMasterImgMouseUp
      end
      object BackPostMasterImg: TImage
        Left = 196
        Top = 362
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = BackPostMasterImgMouseDown
        OnMouseUp = BackPostMasterImgMouseUp
      end
      object NextPressedImg: TImage
        Left = 606
        Top = 22
        Width = 101
        Height = 42
        Picture.Data = {<image003.bmp>}
      end
      object imgNext: TImage
        Left = 607
        Top = 73
        Width = 101
        Height = 42
        Picture.Data = {<image004.bmp>}
        OnMouseUp = NextPostMasterImgMouseUp
      end
      object btnPMNext: TBitBtn
        Left = 218
        Top = 459
        Width = 92
        Height = 25
        Caption = 'Next'
        TabOrder = 0
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333FF3333333333333003333
          3333333333773FF3333333333309003333333333337F773FF333333333099900
          33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
          99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
          33333333337F3F77333333333309003333333333337F77333333333333003333
          3333333333773333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object btnPmCancel: TBitBtn
        Left = 319
        Top = 458
        Width = 92
        Height = 25
        Caption = 'Cancel'
        TabOrder = 1
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
          993337777F777F3377F3393999707333993337F77737333337FF993399933333
          399377F3777FF333377F993339903333399377F33737FF33377F993333707333
          399377F333377FF3377F993333101933399377F333777FFF377F993333000993
          399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
          99333773FF777F777733339993707339933333773FF7FFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object btnPMPrevIcon: TBitBtn
        Left = 604
        Top = 436
        Width = 25
        Height = 25
        TabOrder = 2
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333FF3333333333333744333333333333F773333333333337
          44473333333333F777F3333333333744444333333333F7733733333333374444
          4433333333F77333733333333744444447333333F7733337F333333744444444
          433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
          9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
          C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
          CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
          CCC333333333333777FF33333333333333CC33333333333337730000}
        NumGlyphs = 2
      end
      object btnPMNextIcon: TBitBtn
        Left = 651
        Top = 406
        Width = 25
        Height = 25
        TabOrder = 3
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333FF3333333333333447333333333333377FFF33333333333744473333333
          333337773FF3333333333444447333333333373F773FF3333333334444447333
          33333373F3773FF3333333744444447333333337F333773FF333333444444444
          733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
          999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
          33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
          333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
          33333777333333333333CC3333333333333377333333333333330000}
        NumGlyphs = 2
      end
      object EName: TEdit
        Left = 103
        Top = 97
        Width = 240
        Height = 21
        AutoSize = False
        MaxLength = 18
        TabOrder = 4
        OnChange = ENameChange
        OnKeyDown = ENameKeyDown
        OnKeyUp = ELoginKeyUp
      end
      object IconList: TFileListBox
        Left = 646
        Top = 284
        Width = 41
        Height = 49
        ItemHeight = 13
        Mask = '*.bmp'
        TabOrder = 5
        Visible = False
      end
      object PMIconList: TFileListBox
        Left = 647
        Top = 350
        Width = 41
        Height = 49
        ItemHeight = 13
        Mask = '*.bmp'
        TabOrder = 6
        Visible = False
      end
    end
    object tabUsers: TTabSheet
      Caption = 'Users'
      TabVisible = False
      OnEnter = tabUsersEnter
      object imgUsers: TImage
        Left = 0
        Top = 0
        Width = 600
        Height = 420
      end
      object lblPostMaster: TLabel
        Left = 318
        Top = 164
        Width = 232
        Height = 17
        AutoSize = False
        Color = clYellow
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
      end
      object AddUserImg: TImage
        Left = 375
        Top = 183
        Width = 79
        Height = 33
        Cursor = 18
        OnMouseDown = AddUserImgMouseDown
        OnMouseUp = AddUserImgMouseUp
      end
      object EditUsrImg: TImage
        Left = 376
        Top = 225
        Width = 79
        Height = 33
        Cursor = 18
        OnMouseDown = EditUsrImgMouseDown
        OnMouseUp = EditUsrImgMouseUp
      end
      object RemoveUserImg: TImage
        Left = 376
        Top = 271
        Width = 79
        Height = 33
        Cursor = 18
        OnMouseDown = RemoveUserImgMouseDown
        OnMouseUp = RemoveUserImgMouseUp
      end
      object CancelUsersImg: TImage
        Left = 474
        Top = 364
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = CancelUsersImgMouseDown
        OnMouseUp = CancelUsersImgMouseUp
      end
      object NextUsersImg: TImage
        Left = 304
        Top = 364
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = NextUsersImgMouseDown
        OnMouseUp = NextUsersImgMouseUp
      end
      object BackUsersImg: TImage
        Left = 195
        Top = 363
        Width = 102
        Height = 43
        Cursor = 18
        OnMouseDown = BackUsersImgMouseDown
        OnMouseUp = BackUsersImgMouseUp
      end
      object AddPressedImg: TImage
        Left = 615
        Top = 50
        Width = 79
        Height = 33
        AutoSize = True
        Picture.Data = {<image005.bmp>}
        Visible = False
      end
      object EditPressedImg: TImage
        Left = 604
        Top = 0
        Width = 79
        Height = 33
        Picture.Data = {<image006.bmp>}
        Visible = False
      end
      object RemovePressedImg: TImage
        Left = 617
        Top = 152
        Width = 79
        Height = 33
        Picture.Data = {<image007.bmp>}
        Visible = False
      end
      object ImgFinish: TImage
        Left = 32
        Top = 432
        Width = 101
        Height = 42
        AutoSize = True
        Picture.Data = {<image008.bmp>}
      end
      object listUsers: TListBox
        Left = 204
        Top = 185
        Width = 164
        Height = 152
        ItemHeight = 13
        TabOrder = 0
        OnEnter = listUsersEnter
        OnKeyDown = listUsersKeyDown
      end
    end
    object tabRegistration: TTabSheet
      Caption = 'Registration'
      TabVisible = False
      object ImgDontRegister: TImage
        Left = -1
        Top = 0
        Width = 600
        Height = 420
        AutoSize = True
        Visible = False
      end
      object imgReg: TImage
        Left = 0
        Top = 0
        Width = 601
        Height = 419
      end
      object ImgRegBackBtn: TImage
        Left = 195
        Top = 364
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = ImgRegBackBtnMouseDown
        OnMouseUp = ImgRegBackBtnMouseUp
      end
      object ImgRegFinishBtn: TImage
        Left = 304
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = ImgRegFinishBtnMouseDown
        OnMouseUp = ImgRegFinishBtnMouseUp
      end
      object ImgRegCancelBtn: TImage
        Left = 472
        Top = 364
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = ImgRegCancelBtnMouseDown
        OnMouseUp = ImgRegCancelBtnMouseUp
      end
      object BackPressedImg: TImage
        Left = 605
        Top = 87
        Width = 102
        Height = 43
        Picture.Data = {<image009.bmp>}
        Visible = False
      end
      object CancelPressedImg: TImage
        Left = 604
        Top = 146
        Width = 101
        Height = 42
        Picture.Data = {<image010.bmp>}
        Visible = False
      end
      object Image27: TImage
        Left = 606
        Top = 199
        Width = 101
        Height = 42
        Picture.Data = {<image011.bmp>}
        Visible = False
      end
      object Image1: TImage
        Left = 275
        Top = 245
        Width = 20
        Height = 19
        Cursor = 18
        OnClick = Image1Click
      end
      object FinishPressedImg: TImage
        Left = 604
        Top = 271
        Width = 101
        Height = 42
        Picture.Data = {<image012.bmp>}
        Visible = False
      end
      object chkRegister: TCheckBox
        Left = 5
        Top = 439
        Width = 251
        Height = 21
        Caption = 'Yes, I would like to register via e-mail.'
        State = cbChecked
        TabOrder = 0
        OnClick = chkRegisterClick
      end
    end
    object tabAddUser: TTabSheet
      Caption = 'Add User'
      TabVisible = False
      OnEnter = tabAddUserEnter
      object ImgAddUsrNotMonitored: TImage
        Left = -1
        Top = 0
        Width = 600
        Height = 420
      end
      object imgUserIcon: TImage
        Left = 473
        Top = 211
        Width = 40
        Height = 40
        Center = True
        Stretch = True
      end
      object lblAddUserAddress: TLabel
        Left = 278
        Top = 274
        Width = 290
        Height = 18
        AutoSize = False
        Caption = 'kid1<[e-mail]>'
        Color = clYellow
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
        WordWrap = True
      end
      object lblAddUser: TLabel
        Left = 18
        Top = 424
        Width = 418
        Height = 39
        AutoSize = False
        Caption =
          'Enter the The new user'#39's name also used in creating a unique mai' +
          'l address for this user.'
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object CancelAddUserImg: TImage
        Left = 475
        Top = 364
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = CancelAddUserImgMouseDown
        OnMouseUp = CancelAddUserImgMouseUp
      end
      object Proffestional: TImage
        Left = 272
        Top = 129
        Width = 17
        Height = 17
        Cursor = 18
        OnClick = ProffestionalClick
      end
      object FunImg: TImage
        Left = 271
        Top = 154
        Width = 17
        Height = 17
        Cursor = 18
        Picture.Data = {<image013.bmp>}
        OnClick = FunImgClick
      end
      object ImgAddUserMonitored: TImage
        Left = 262
        Top = 190
        Width = 20
        Height = 20
        Cursor = 18
        Picture.Data = {<image014.bmp>}
        OnMouseDown = ImgAddUserMonitoredMouseDown
      end
      object Image14: TImage
        Left = 412
        Top = 299
        Width = 73
        Height = 31
        Cursor = 18
        Picture.Data = {<image015.bmp>}
        Visible = False
        OnMouseDown = Image14MouseDown
      end
      object imgAddUserDone: TImage
        Left = 491
        Top = 301
        Width = 74
        Height = 32
        Cursor = 18
        Picture.Data = {<image016.bmp>}
        Visible = False
        OnClick = imgAddUserDoneClick
      end
      object imgAddUserNextIcon: TImage
        Left = 516
        Top = 218
        Width = 25
        Height = 28
        Cursor = 18
        Picture.Data = {<image017.bmp>}
        OnMouseDown = imgNextIconMouseDown
      end
      object CheckUPImg: TImage
        Left = 635
        Top = 152
        Width = 17
        Height = 17
        Picture.Data = {<image018.bmp>}
      end
      object CheckDownImg: TImage
        Left = 632
        Top = 194
        Width = 17
        Height = 17
        Picture.Data = {<image019.bmp>}
      end
      object ImgAddUserNext: TImage
        Left = 307
        Top = 362
        Width = 101
        Height = 42
        Cursor = 18
        Picture.Data = {<image020.bmp>}
        Visible = False
        OnMouseDown = ImgAddUserNextMouseDown
        OnMouseUp = ImgAddUserNextMouseUp
      end
      object ImgAddUserBack: TImage
        Left = 197
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        Picture.Data = {<image021.bmp>}
        Visible = False
        OnMouseDown = ImgAddUserBackMouseDown
      end
      object edtAddUserName: TEdit
        Left = 325
        Top = 82
        Width = 240
        Height = 21
        AutoSize = False
        MaxLength = 18
        TabOrder = 0
        OnChange = edtAddUserNameChange
        OnKeyUp = edtAddUserNameKeyUp
      end
      object btnUserPrevIcon: TBitBtn
        Left = 634
        Top = 328
        Width = 25
        Height = 25
        TabOrder = 3
        Visible = False
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333FF3333333333333744333333333333F773333333333337
          44473333333333F777F3333333333744444333333333F7733733333333374444
          4433333333F77333733333333744444447333333F7733337F333333744444444
          433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
          9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
          C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
          CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
          CCC333333333333777FF33333333333333CC33333333333337730000}
        NumGlyphs = 2
      end
      object btnUserNextIcon: TBitBtn
        Left = 672
        Top = 330
        Width = 25
        Height = 25
        TabOrder = 4
        Visible = False
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333FF3333333333333447333333333333377FFF33333333333744473333333
          333337773FF3333333333444447333333333373F773FF3333333334444447333
          33333373F3773FF3333333744444447333333337F333773FF333333444444444
          733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
          999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
          33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
          333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
          33333777333333333333CC3333333333333377333333333333330000}
        NumGlyphs = 2
      end
      object groupInterface: TGroupBox
        Left = 602
        Top = 74
        Width = 114
        Height = 54
        Caption = 'Interface'
        TabOrder = 1
        Visible = False
        object radioGraphic: TRadioButton
          Left = 9
          Top = 19
          Width = 109
          Height = 16
          Caption = 'Graphical'
          Checked = True
          TabOrder = 0
          TabStop = True
          Visible = False
        end
        object radioAdvanced: TRadioButton
          Left = 8
          Top = 36
          Width = 119
          Height = 16
          Caption = 'Advanced'
          TabOrder = 1
          Visible = False
        end
      end
      object chkMonitored: TCheckBox
        Left = 615
        Top = 241
        Width = 134
        Height = 22
        Caption = 'Monitored'
        TabOrder = 2
        Visible = False
      end
      object BitBtn5: TBitBtn
        Left = 534
        Top = 464
        Width = 92
        Height = 25
        Caption = 'Cancel'
        Enabled = False
        TabOrder = 5
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
          993337777F777F3377F3393999707333993337F77737333337FF993399933333
          399377F3777FF333377F993339903333399377F33737FF33377F993333707333
          399377F333377FF3377F993333101933399377F333777FFF377F993333000993
          399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
          99333773FF777F777733339993707339933333773FF7FFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object btnAddUserDone: TButton
        Left = 364
        Top = 468
        Width = 75
        Height = 25
        Caption = 'btnAddUserDone'
        TabOrder = 6
      end
    end
    object TabRegionProf: TTabSheet
      Caption = 'TabRegionProf'
      ParentShowHint = False
      ShowHint = False
      TabVisible = False
      OnEnter = TabRegionProfEnter
      object Image2: TImage
        Left = -1
        Top = 0
        Width = 600
        Height = 420
        AutoSize = True
      end
      object Img_NextPage: TImage
        Left = 305
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image022.bmp>}
        Visible = False
        OnMouseDown = Img_NextPageMouseDown
        OnMouseUp = Img_NextPageMouseUp
      end
      object BackRegion: TImage
        Left = 190
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        AutoSize = True
        OnMouseDown = BackRegionMouseDown
        OnMouseUp = BackRegionMouseUp
      end
      object CancelRegion: TImage
        Left = 472
        Top = 360
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = CancelRegionMouseDown
        OnMouseUp = CancelRegionMouseUp
      end
      object Edt_ZipCode: TEdit
        Left = 295
        Top = 181
        Width = 146
        Height = 21
        TabOrder = 2
        OnChange = Edt_ZipCodeChange
        OnKeyDown = Edt_ZipCodeKeyDown
      end
      object ComBox_Freq: TComboBox
        Left = 456
        Top = 256
        Width = 113
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 3
        Visible = False
        OnChange = ComBox_FreqChange
        OnKeyDown = ComBox_FreqKeyDown
      end
      object CmbBoxCountry: TComboBox
        Left = 296
        Top = 104
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 0
        OnChange = CmbBoxCountryChange
        OnKeyUp = CmbBoxCountryKeyUp
      end
      object EdtOtherCountry: TEdit
        Left = 456
        Top = 104
        Width = 121
        Height = 21
        TabStop = False
        TabOrder = 1
        Visible = False
      end
    end
    object TabPersonalProf: TTabSheet
      Caption = 'TabPersonalProf'
      TabVisible = False
      OnEnter = TabPersonalProfEnter
      object Image3: TImage
        Left = -1
        Top = 0
        Width = 600
        Height = 420
        AutoSize = True
        OnClick = Image3Click
      end
      object ImgFeMale: TImage
        Left = 200
        Top = 65
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image023.bmp>}
        OnClick = ImgFeMaleClick
      end
      object ImgMale: TImage
        Left = 137
        Top = 65
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image024.bmp>}
        OnClick = ImgMaleClick
      end
      object ImgHobbie1: TImage
        Left = 32
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image025.bmp>}
        OnMouseDown = ImgHobbie1MouseDown
      end
      object ImgHobbie2: TImage
        Left = 32
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image026.bmp>}
        OnMouseDown = ImgHobbie2MouseDown
      end
      object ImgHobbie3: TImage
        Left = 32
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image027.bmp>}
        OnMouseDown = ImgHobbie3MouseDown
      end
      object ImgHobbie4: TImage
        Left = 136
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image028.bmp>}
        OnMouseDown = ImgHobbie4MouseDown
      end
      object ImgHobbie5: TImage
        Left = 136
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image029.bmp>}
        OnMouseDown = ImgHobbie5MouseDown
      end
      object ImgHobbie6: TImage
        Left = 136
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image030.bmp>}
        OnMouseDown = ImgHobbie6MouseDown
      end
      object ImgHobbie7: TImage
        Left = 240
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image031.bmp>}
        OnMouseDown = ImgHobbie7MouseDown
      end
      object ImgHobbie8: TImage
        Left = 240
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image032.bmp>}
        OnMouseDown = ImgHobbie8MouseDown
      end
      object ImgHobbie9: TImage
        Left = 352
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image033.bmp>}
        OnMouseDown = ImgHobbie9MouseDown
      end
      object ImgHobbie10: TImage
        Left = 352
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image034.bmp>}
        OnMouseDown = ImgHobbie10MouseDown
      end
      object ImgHobbie11: TImage
        Left = 240
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image035.bmp>}
        OnMouseDown = ImgHobbie11MouseDown
      end
      object ImgPersonalProfDone_Next: TImage
        Left = 312
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image036.bmp>}
        Visible = False
        OnMouseDown = ImgPersonalProfDone_NextMouseDown
      end
      object ImgPersonalProfDone: TImage
        Left = 344
        Top = 432
        Width = 101
        Height = 42
        AutoSize = True
        Picture.Data = {<image037.bmp>}
      end
      object Img_CancelPersonalProf: TImage
        Left = 474
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = Img_CancelPersonalProfMouseDown
        OnMouseUp = Img_CancelPersonalProfMouseUp
      end
      object Img_BackPersonalProf: TImage
        Left = 197
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = Img_BackPersonalProfMouseDown
        OnMouseUp = Img_BackPersonalProfMouseUp
      end
      object LblKidTitle: TLabel
        Left = 384
        Top = 21
        Width = 190
        Height = 33
        AutoSize = False
        Caption = 'Title'
        Font.Color = clBlack
        Font.Height = -24
        Font.Name = 'Comic Sans MS'
        Font.Style = [fsBold, fsItalic]
        ParentFont = False
        Transparent = True
      end
      object CmbBox_AgeGroup: TComboBox
        Left = 128
        Top = 160
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 2
        OnChange = CmbBox_AgeGroupChange
      end
      object CmbBox_Occupation: TComboBox
        Left = 128
        Top = 190
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 3
        OnChange = CmbBox_OccupationChange
        OnKeyUp = CmbBox_OccupationKeyUp
      end
      object CmbBox_Month: TComboBox
        Left = 200
        Top = 120
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 1
        OnChange = CmbBox_MonthChange
      end
      object CmbBox_Day: TComboBox
        Left = 200
        Top = 96
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 0
        OnChange = CmbBox_DayChange
      end
      object Edt_OtherHobbis: TEdit
        Left = 320
        Top = 300
        Width = 120
        Height = 21
        TabStop = False
        Enabled = False
        TabOrder = 5
        OnChange = Edt_OtherHobbisChange
      end
      object Edt_OtherOccupation: TEdit
        Left = 280
        Top = 190
        Width = 105
        Height = 21
        TabStop = False
        TabOrder = 4
        Visible = False
      end
    end
    object TabPMPersonalProf: TTabSheet
      Caption = 'TabPMPersonalProf'
      TabVisible = False
      OnEnter = TabPMPersonalProfEnter
      object ImgPMPersonalProf: TImage
        Left = 0
        Top = 0
        Width = 600
        Height = 420
        AutoSize = True
      end
      object ImgPMMale: TImage
        Left = 137
        Top = 65
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image038.bmp>}
        OnClick = ImgPMMaleClick
      end
      object ImgPMFeMale: TImage
        Left = 200
        Top = 65
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image039.bmp>}
        OnClick = ImgPMFeMaleClick
      end
      object ImgPm1: TImage
        Left = 32
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image040.bmp>}
        OnClick = ImgPm1Click
      end
      object ImgPm4: TImage
        Left = 136
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image041.bmp>}
        OnClick = ImgPm4Click
      end
      object ImgPm2: TImage
        Left = 32
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image042.bmp>}
        OnClick = ImgPm2Click
      end
      object ImgPm5: TImage
        Left = 136
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image043.bmp>}
        OnClick = ImgPm5Click
      end
      object ImgPm6: TImage
        Left = 136
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image044.bmp>}
        OnClick = ImgPm6Click
      end
      object ImgPm8: TImage
        Left = 240
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image045.bmp>}
        OnClick = ImgPm8Click
      end
      object ImgPm9: TImage
        Left = 352
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image046.bmp>}
        OnClick = ImgPm9Click
      end
      object ImgPm11: TImage
        Left = 240
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image047.bmp>}
        OnClick = ImgPm11Click
      end
      object ImgPm10: TImage
        Left = 352
        Top = 277
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image048.bmp>}
        OnClick = ImgPm10Click
      end
      object ImgPm7: TImage
        Left = 240
        Top = 253
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image049.bmp>}
        OnClick = ImgPm7Click
      end
      object ImgPm3: TImage
        Left = 32
        Top = 302
        Width = 17
        Height = 17
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image050.bmp>}
        OnClick = ImgPm3Click
      end
      object ImgPmNextDone: TImage
        Left = 313
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        AutoSize = True
        Picture.Data = {<image051.bmp>}
        Visible = False
        OnMouseDown = ImgPmNextDoneMouseDown
        OnMouseUp = ImgPmNextDoneMouseUp
      end
      object ImgPmProfBack: TImage
        Left = 197
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = ImgPmProfBackMouseDown
        OnMouseUp = ImgPmProfBackMouseUp
      end
      object ImgPmProfCancel: TImage
        Left = 474
        Top = 363
        Width = 101
        Height = 42
        Cursor = 18
        OnMouseDown = ImgPmProfCancelMouseDown
        OnMouseUp = ImgPmProfCancelMouseUp
      end
      object LblPmTitle: TLabel
        Left = 384
        Top = 22
        Width = 190
        Height = 33
        AutoSize = False
        Caption = 'Title'
        Font.Color = clBlack
        Font.Height = -24
        Font.Name = 'Comic Sans MS'
        Font.Style = [fsBold, fsItalic]
        ParentFont = False
        Transparent = True
      end
      object CmBxPmDay: TComboBox
        Left = 200
        Top = 96
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 0
        OnChange = CmBxPmDayChange
      end
      object CmBxPmMonth: TComboBox
        Left = 200
        Top = 120
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 1
        OnChange = CmBxPmMonthChange
      end
      object EdtPMOtherOccupation: TEdit
        Left = 280
        Top = 190
        Width = 105
        Height = 21
        TabStop = False
        TabOrder = 2
        Visible = False
      end
      object CmBxPmAgeGroup: TComboBox
        Left = 128
        Top = 160
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 3
        OnChange = CmBxPmAgeGroupChange
      end
      object CmBxPmOccupation: TComboBox
        Left = 128
        Top = 190
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 4
        OnChange = CmBxPmOccupationChange
        OnKeyUp = CmBxPmOccupationKeyUp
      end
      object EdtOtherHobbie: TEdit
        Left = 328
        Top = 300
        Width = 120
        Height = 21
        TabStop = False
        Enabled = False
        TabOrder = 5
        OnChange = EdtOtherHobbieChange
      end
    end
  end
  object gridUsersInfo: TStringGrid
    Left = 134
    Top = 506
    Width = 195
    Height = 122
    ColCount = 12
    FixedCols = 0
    FixedRows = 0
    TabOrder = 1
  end
end