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' 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 = {} 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 = {} 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 = {} 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 = {} end object imgNext: TImage Left = 607 Top = 73 Width = 101 Height = 42 Picture.Data = {} 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 = {} Visible = False end object EditPressedImg: TImage Left = 604 Top = 0 Width = 79 Height = 33 Picture.Data = {} Visible = False end object RemovePressedImg: TImage Left = 617 Top = 152 Width = 79 Height = 33 Picture.Data = {} Visible = False end object ImgFinish: TImage Left = 32 Top = 432 Width = 101 Height = 42 AutoSize = True Picture.Data = {} 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 = {} Visible = False end object CancelPressedImg: TImage Left = 604 Top = 146 Width = 101 Height = 42 Picture.Data = {} Visible = False end object Image27: TImage Left = 606 Top = 199 Width = 101 Height = 42 Picture.Data = {} 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 = {} 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' 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 = {} OnClick = FunImgClick end object ImgAddUserMonitored: TImage Left = 262 Top = 190 Width = 20 Height = 20 Cursor = 18 Picture.Data = {} OnMouseDown = ImgAddUserMonitoredMouseDown end object Image14: TImage Left = 412 Top = 299 Width = 73 Height = 31 Cursor = 18 Picture.Data = {} Visible = False OnMouseDown = Image14MouseDown end object imgAddUserDone: TImage Left = 491 Top = 301 Width = 74 Height = 32 Cursor = 18 Picture.Data = {} Visible = False OnClick = imgAddUserDoneClick end object imgAddUserNextIcon: TImage Left = 516 Top = 218 Width = 25 Height = 28 Cursor = 18 Picture.Data = {} OnMouseDown = imgNextIconMouseDown end object CheckUPImg: TImage Left = 635 Top = 152 Width = 17 Height = 17 Picture.Data = {} end object CheckDownImg: TImage Left = 632 Top = 194 Width = 17 Height = 17 Picture.Data = {} end object ImgAddUserNext: TImage Left = 307 Top = 362 Width = 101 Height = 42 Cursor = 18 Picture.Data = {} Visible = False OnMouseDown = ImgAddUserNextMouseDown OnMouseUp = ImgAddUserNextMouseUp end object ImgAddUserBack: TImage Left = 197 Top = 363 Width = 101 Height = 42 Cursor = 18 Picture.Data = {} 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 = {} 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 = {} OnClick = ImgFeMaleClick end object ImgMale: TImage Left = 137 Top = 65 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgMaleClick end object ImgHobbie1: TImage Left = 32 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie1MouseDown end object ImgHobbie2: TImage Left = 32 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie2MouseDown end object ImgHobbie3: TImage Left = 32 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie3MouseDown end object ImgHobbie4: TImage Left = 136 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie4MouseDown end object ImgHobbie5: TImage Left = 136 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie5MouseDown end object ImgHobbie6: TImage Left = 136 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie6MouseDown end object ImgHobbie7: TImage Left = 240 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie7MouseDown end object ImgHobbie8: TImage Left = 240 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie8MouseDown end object ImgHobbie9: TImage Left = 352 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie9MouseDown end object ImgHobbie10: TImage Left = 352 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie10MouseDown end object ImgHobbie11: TImage Left = 240 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnMouseDown = ImgHobbie11MouseDown end object ImgPersonalProfDone_Next: TImage Left = 312 Top = 363 Width = 101 Height = 42 Cursor = 18 AutoSize = True Picture.Data = {} Visible = False OnMouseDown = ImgPersonalProfDone_NextMouseDown end object ImgPersonalProfDone: TImage Left = 344 Top = 432 Width = 101 Height = 42 AutoSize = True Picture.Data = {} 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 = {} OnClick = ImgPMMaleClick end object ImgPMFeMale: TImage Left = 200 Top = 65 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPMFeMaleClick end object ImgPm1: TImage Left = 32 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm1Click end object ImgPm4: TImage Left = 136 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm4Click end object ImgPm2: TImage Left = 32 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm2Click end object ImgPm5: TImage Left = 136 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm5Click end object ImgPm6: TImage Left = 136 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm6Click end object ImgPm8: TImage Left = 240 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm8Click end object ImgPm9: TImage Left = 352 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm9Click end object ImgPm11: TImage Left = 240 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm11Click end object ImgPm10: TImage Left = 352 Top = 277 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm10Click end object ImgPm7: TImage Left = 240 Top = 253 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm7Click end object ImgPm3: TImage Left = 32 Top = 302 Width = 17 Height = 17 Cursor = 18 AutoSize = True Picture.Data = {} OnClick = ImgPm3Click end object ImgPmNextDone: TImage Left = 313 Top = 363 Width = 101 Height = 42 Cursor = 18 AutoSize = True Picture.Data = {} 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