home *** CD-ROM | disk | FTP | other *** search
Text File | 2004-05-18 | 48.7 KB | 1,847 lines |
- object FrmEnterAddress: TFrmEnterAddress
- Left = 370
- Top = 139
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Contact'
- ClientHeight = 416
- ClientWidth = 516
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = False
- Position = poDefault
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnKeyPress = FormKeyPress
- OnKeyUp = FormKeyUp
- DesignSize = (
- 516
- 416)
- PixelsPerInch = 120
- TextHeight = 15
- object PnlOK: TPanel
- Left = 381
- Top = 387
- Width = 131
- Height = 25
- Anchors = [akRight, akBottom]
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 2
- end
- object PnlButtons: TPanel
- Left = 179
- Top = 387
- Width = 102
- Height = 25
- Anchors = [akRight, akBottom]
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 3
- end
- object PnlBottom: TElPanel
- Left = 0
- Top = 365
- Width = 516
- Height = 51
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- DockOrientation = doNoOrient
- DesignSize = (
- 516
- 51)
- object BtnOK: TButton
- Left = 295
- Top = 9
- Width = 100
- Height = 30
- Anchors = [akTop, akRight]
- Caption = '&OK'
- Default = True
- TabOrder = 0
- OnClick = BtnOKClick
- end
- object BtnCancel: TButton
- Left = 404
- Top = 9
- Width = 100
- Height = 30
- Anchors = [akTop, akRight]
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- OnClick = BtnCancelClick
- end
- end
- object PC: TElPageControl
- Left = 0
- Top = 0
- Width = 516
- Height = 365
- ActiveTabColor = clWindow
- BorderWidth = 0
- DrawFocus = False
- Flat = False
- HotTrack = False
- Multiline = False
- RaggedRight = False
- ScrollOpposite = False
- Style = etsFlatTabs
- TabHeight = 28
- TabIndex = 0
- TabPosition = etpTop
- HotTrackFont.Charset = DEFAULT_CHARSET
- HotTrackFont.Color = clBlue
- HotTrackFont.Height = -13
- HotTrackFont.Name = 'MS Sans Serif'
- HotTrackFont.Style = []
- ActivePage = Tab1
- ActiveTabFont.Charset = DEFAULT_CHARSET
- ActiveTabFont.Color = clWindowText
- ActiveTabFont.Height = -13
- ActiveTabFont.Name = 'MS Sans Serif'
- ActiveTabFont.Style = []
- OnDrawTab = PCDrawTab
- Align = alClient
- ParentColor = False
- TabOrder = 0
- UseXPThemes = False
- DockOrientation = doNoOrient
- object Tab1: TElTabSheet
- PageControl = PC
- Caption = '&General'
- Color = clWhite
- object Label7: TLabel
- Left = 10
- Top = 16
- Width = 24
- Height = 15
- Caption = 'F&irst'
- FocusControl = EditFirst
- Transparent = True
- end
- object Label8: TLabel
- Left = 252
- Top = 16
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Middle'
- Transparent = True
- end
- object Label9: TLabel
- Left = 10
- Top = 44
- Width = 24
- Height = 15
- Caption = '&Last'
- FocusControl = EditLast
- Transparent = True
- end
- object Image: TImage
- Left = 294
- Top = 311
- Width = 17
- Height = 16
- end
- object Label3: TLabel
- Left = 10
- Top = 100
- Width = 36
- Height = 15
- Caption = '&E-mail'
- FocusControl = EditEmail
- Transparent = True
- end
- object Label28: TLabel
- Left = 10
- Top = 72
- Width = 30
- Height = 15
- Caption = 'Prefix'
- FocusControl = EditLast
- Transparent = True
- end
- object Label29: TLabel
- Left = 252
- Top = 72
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Suffix'
- FocusControl = EditLast
- Transparent = True
- end
- object Label17: TLabel
- Left = 10
- Top = 212
- Width = 36
- Height = 15
- Caption = 'Mo&bile'
- FocusControl = EditMobile
- Transparent = True
- end
- object Label14: TLabel
- Left = 10
- Top = 184
- Width = 17
- Height = 15
- Caption = '&Tel'
- FocusControl = EditTel
- Transparent = True
- end
- object Label13: TLabel
- Left = 10
- Top = 130
- Width = 53
- Height = 15
- Caption = '&Company'
- FocusControl = EditCompany
- Transparent = True
- end
- object Label1: TLabel
- Left = 10
- Top = 158
- Width = 23
- Height = 15
- Caption = 'Tit&le'
- FocusControl = EditTitle
- Transparent = True
- end
- object Label15: TLabel
- Left = 252
- Top = 186
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'F&ax'
- FocusControl = EditFax
- Transparent = True
- end
- object Label43: TLabel
- Left = 252
- Top = 214
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Pager'
- FocusControl = EditPager
- Transparent = True
- end
- object Label40: TLabel
- Left = 10
- Top = 240
- Width = 22
- Height = 15
- Caption = 'IM 1'
- FocusControl = EditIM1
- Transparent = True
- end
- object Label44: TLabel
- Left = 252
- Top = 242
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'IM 2'
- FocusControl = EditIM2
- Transparent = True
- end
- object Label47: TLabel
- Left = 252
- Top = 44
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Display As'
- Transparent = True
- end
- object EditFirst: TElAdvancedEdit
- Left = 108
- Top = 12
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditMiddle: TElAdvancedEdit
- Left = 350
- Top = 12
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- end
- object EditLast: TElAdvancedEdit
- Left = 108
- Top = 40
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 2
- end
- object BtnIcon: TButton
- Left = 316
- Top = 307
- Width = 123
- Height = 24
- Caption = '&Change Icon'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 19
- OnClick = BtnIconClick
- end
- object cbFavourite: TElCheckBox
- Left = 293
- Top = 280
- Width = 52
- Height = 20
- Cursor = crDefault
- Transparent = True
- Flat = True
- Caption = 'V.I.P.'
- TabOrder = 18
- Color = clBtnFace
- ParentColor = False
- DoubleBuffered = False
- end
- object cbStyled: TElCheckBox
- Left = 108
- Top = 307
- Width = 101
- Height = 20
- Cursor = crDefault
- Transparent = True
- Flat = True
- Caption = 'Prefers Styled'
- TabOrder = 17
- Color = clBtnFace
- ParentColor = False
- OnClick = cbStyledClick
- DoubleBuffered = False
- end
- object EditEmail: TElAdvancedEdit
- Left = 108
- Top = 96
- Width = 358
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 6
- end
- object cbPlain: TElCheckBox
- Left = 108
- Top = 280
- Width = 96
- Height = 20
- Cursor = crDefault
- Transparent = True
- Flat = True
- Caption = 'Prefers Plain'
- TabOrder = 16
- Color = clBtnFace
- ParentColor = False
- OnClick = cbPlainClick
- DoubleBuffered = False
- end
- object BtnActE1: TButton
- Left = 470
- Top = 96
- Width = 21
- Height = 23
- Caption = '>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- OnClick = BtnActE1Click
- end
- object cbPrefix: TElAdvancedComboBox
- Left = 108
- Top = 68
- Width = 140
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 4
- UseXPThemes = False
- Items.Strings = (
- 'Dr.'
- 'Miss'
- 'Mr.'
- 'Mrs.'
- 'Ms.'
- 'Prof.')
- end
- object cbSuffix: TElAdvancedComboBox
- Left = 350
- Top = 68
- Width = 140
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 5
- UseXPThemes = False
- Items.Strings = (
- 'I'
- 'II'
- 'III'
- 'IV'
- 'Jr.'
- 'Sr.')
- end
- object EditMobile: TElAdvancedEdit
- Left = 108
- Top = 208
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 12
- end
- object EditTel: TElAdvancedEdit
- Left = 108
- Top = 180
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 10
- end
- object EditCompany: TElAdvancedEdit
- Left = 108
- Top = 124
- Width = 382
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 8
- end
- object EditTitle: TElAdvancedEdit
- Left = 108
- Top = 152
- Width = 382
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 9
- end
- object EditFax: TElAdvancedEdit
- Left = 350
- Top = 180
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 11
- end
- object EditPager: TElAdvancedEdit
- Left = 350
- Top = 208
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 13
- end
- object EditIM1: TElAdvancedEdit
- Left = 108
- Top = 236
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 14
- end
- object EditIM2: TElAdvancedEdit
- Left = 350
- Top = 236
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 15
- end
- object EditName: TElAdvancedEdit
- Left = 350
- Top = 40
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 3
- end
- end
- object Tab2: TElTabSheet
- PageControl = PC
- Caption = '&Business'
- Color = clWhite
- Visible = False
- object Label6: TLabel
- Left = 10
- Top = 46
- Width = 92
- Height = 15
- Caption = 'Company E-mail'
- FocusControl = EditEmail2
- Transparent = True
- end
- object Label31: TLabel
- Left = 10
- Top = 16
- Width = 65
- Height = 15
- Caption = 'Department'
- FocusControl = EditDept
- Transparent = True
- end
- object Label11: TLabel
- Left = 10
- Top = 76
- Width = 81
- Height = 15
- Caption = 'Company &URL'
- FocusControl = EditURL1
- Transparent = True
- end
- object ElGroupBox1: TElGroupBox
- Left = 16
- Top = 176
- Width = 465
- Height = 140
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Business Address '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 5
- object Label22: TLabel
- Left = 12
- Top = 112
- Width = 42
- Height = 15
- Caption = 'Country'
- FocusControl = EditCountry
- Transparent = True
- end
- object Label23: TLabel
- Left = 226
- Top = 112
- Width = 106
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Postal Code'
- FocusControl = EditZIP
- Transparent = True
- end
- object Label18: TLabel
- Left = 226
- Top = 84
- Width = 106
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'State/Prov'
- FocusControl = EditState
- Transparent = True
- end
- object Label5: TLabel
- Left = 12
- Top = 84
- Width = 20
- Height = 15
- Caption = 'City'
- FocusControl = EditCity
- Transparent = True
- end
- object Label2: TLabel
- Left = 12
- Top = 28
- Width = 32
- Height = 15
- Caption = 'Street'
- FocusControl = EditStreet1
- Transparent = True
- end
- object Label30: TLabel
- Left = 12
- Top = 56
- Width = 32
- Height = 15
- Caption = 'Street'
- FocusControl = EditStreet2
- Transparent = True
- end
- object EditCountry: TElAdvancedEdit
- Left = 112
- Top = 108
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 4
- end
- object EditZIP: TElAdvancedEdit
- Left = 341
- Top = 108
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 5
- end
- object EditState: TElAdvancedEdit
- Left = 341
- Top = 80
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 3
- end
- object EditCity: TElAdvancedEdit
- Left = 112
- Top = 80
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 2
- end
- object EditStreet1: TElAdvancedEdit
- Left = 112
- Top = 24
- Width = 339
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditStreet2: TElAdvancedEdit
- Left = 112
- Top = 52
- Width = 339
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- end
- end
- object EditEmail2: TElAdvancedEdit
- Left = 166
- Top = 42
- Width = 296
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- end
- object BtnActE2: TButton
- Left = 466
- Top = 42
- Width = 21
- Height = 23
- Caption = '>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = BtnActE1Click
- end
- object EditDept: TElAdvancedEdit
- Left = 166
- Top = 12
- Width = 319
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditURL1: TElAdvancedEdit
- Left = 166
- Top = 72
- Width = 296
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 3
- end
- object BtnActU1: TButton
- Left = 466
- Top = 72
- Width = 21
- Height = 23
- Caption = '>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = BtnActE1Click
- end
- end
- object Tab5: TElTabSheet
- PageControl = PC
- Caption = '&Personal'
- Color = clWhite
- Visible = False
- object Label10: TLabel
- Left = 10
- Top = 104
- Width = 89
- Height = 15
- Caption = 'Personal E-mail'
- Transparent = True
- end
- object Label12: TLabel
- Left = 10
- Top = 136
- Width = 78
- Height = 15
- Caption = 'Personal URL'
- Transparent = True
- end
- object Label41: TLabel
- Left = 10
- Top = 44
- Width = 43
- Height = 15
- Caption = 'Spouse'
- Transparent = True
- end
- object Label16: TLabel
- Left = 10
- Top = 72
- Width = 54
- Height = 15
- Caption = 'Home Tel'
- Transparent = True
- end
- object Label42: TLabel
- Left = 252
- Top = 72
- Width = 90
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Mobile'
- Transparent = True
- end
- object Label4: TLabel
- Left = 10
- Top = 16
- Width = 56
- Height = 15
- Caption = 'N&ickname'
- FocusControl = EditNick
- Transparent = True
- end
- object Label39: TLabel
- Left = 252
- Top = 16
- Width = 110
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Birthday'
- Transparent = True
- end
- object Label38: TLabel
- Left = 252
- Top = 44
- Width = 110
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Anniversary'
- Transparent = True
- end
- object EditEmail3: TElAdvancedEdit
- Left = 166
- Top = 100
- Width = 300
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 6
- end
- object BtnActE3: TButton
- Left = 470
- Top = 100
- Width = 21
- Height = 23
- Caption = '>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- OnClick = BtnActE1Click
- end
- object EditURL2: TElAdvancedEdit
- Left = 166
- Top = 132
- Width = 300
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 8
- end
- object BtnActU2: TButton
- Left = 470
- Top = 132
- Width = 21
- Height = 23
- Caption = '>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- OnClick = BtnActE1Click
- end
- object EditSpouse: TElAdvancedEdit
- Left = 108
- Top = 40
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 2
- end
- object EditHome: TElAdvancedEdit
- Left = 108
- Top = 68
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 4
- end
- object EditMobile2: TElAdvancedEdit
- Left = 350
- Top = 68
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 5
- end
- object EditNick: TElAdvancedEdit
- Left = 108
- Top = 12
- Width = 140
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditBday: TElDateTimePicker
- Left = 370
- Top = 12
- Width = 120
- Height = 23
- Format = edfShortDate
- FormatString = 'c'
- DateTime = 29221.000000000000000000
- ActiveBorderType = fbtColorLineBorder
- InactiveBorderType = fbtColorLineBorder
- Flat = True
- ShowPopupCalendar = True
- AltChangeMethod = False
- ShowCheckBox = False
- Modified = False
- CalendarLineColorDark = clWindow
- UseSystemStartOfWeek = True
- WeekEndDays = [Sun, Sat]
- CalendarUseLineColors = False
- CalendarWeekendColor = clRed
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- CalendarCurrentDayBorder = fbtSunken
- CalendarDayCellBorder = fbtLine
- CalendarSelectionBorder = fbtSunken
- MinDate = 2.000000000000000000
- MaxDate = 999999.000000000000000000
- ButtonDir = sbdUpDown
- ButtonType = sbtUpDown
- ButtonWidth = 21
- ParentColor = False
- TabOrder = 1
- TabStop = True
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Unassigned = True
- UnassignedColor = clNavy
- UnassignedAllowed = True
- UseCurrentDate = False
- ButtonThinFrame = False
- UnassignedChar = ' '
- TranslateDays = True
- end
- object EditAnniv: TElDateTimePicker
- Left = 370
- Top = 40
- Width = 120
- Height = 23
- Format = edfShortDate
- FormatString = 'c'
- DateTime = 29221.000000000000000000
- ActiveBorderType = fbtColorLineBorder
- InactiveBorderType = fbtColorLineBorder
- Flat = True
- ShowPopupCalendar = True
- AltChangeMethod = False
- ShowCheckBox = False
- Modified = False
- CalendarLineColorDark = clWindow
- UseSystemStartOfWeek = True
- WeekEndDays = [Sun, Sat]
- CalendarUseLineColors = False
- CalendarWeekendColor = clRed
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- CalendarCurrentDayBorder = fbtSunken
- CalendarDayCellBorder = fbtLine
- CalendarSelectionBorder = fbtSunken
- MinDate = 2.000000000000000000
- MaxDate = 999999.000000000000000000
- ButtonDir = sbdUpDown
- ButtonType = sbtUpDown
- ButtonWidth = 21
- ParentColor = False
- TabOrder = 3
- TabStop = True
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Unassigned = True
- UnassignedColor = clNavy
- UnassignedAllowed = True
- UseCurrentDate = False
- ButtonThinFrame = False
- UnassignedChar = ' '
- TranslateDays = True
- end
- object ElGroupBox2: TElGroupBox
- Left = 16
- Top = 176
- Width = 465
- Height = 140
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Home Address '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 10
- object Label32: TLabel
- Left = 12
- Top = 112
- Width = 42
- Height = 15
- Caption = 'Country'
- FocusControl = EditHCountry
- Transparent = True
- end
- object Label35: TLabel
- Left = 12
- Top = 84
- Width = 20
- Height = 15
- Caption = 'City'
- FocusControl = EditHCity
- Transparent = True
- end
- object Label36: TLabel
- Left = 12
- Top = 28
- Width = 32
- Height = 15
- Caption = 'Street'
- FocusControl = EditHStreet1
- Transparent = True
- end
- object Label37: TLabel
- Left = 12
- Top = 56
- Width = 32
- Height = 15
- Caption = 'Street'
- FocusControl = EditHStreet2
- Transparent = True
- end
- object Label33: TLabel
- Left = 226
- Top = 112
- Width = 106
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Postal Code'
- FocusControl = EditZIP
- Transparent = True
- end
- object Label34: TLabel
- Left = 226
- Top = 84
- Width = 106
- Height = 15
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'State/Prov'
- FocusControl = EditState
- Transparent = True
- end
- object EditHCountry: TElAdvancedEdit
- Left = 112
- Top = 108
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 4
- end
- object EditHZip: TElAdvancedEdit
- Left = 341
- Top = 108
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 5
- end
- object EditHState: TElAdvancedEdit
- Left = 341
- Top = 80
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 3
- end
- object EditHCity: TElAdvancedEdit
- Left = 112
- Top = 80
- Width = 110
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 2
- end
- object EditHStreet1: TElAdvancedEdit
- Left = 112
- Top = 24
- Width = 339
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditHStreet2: TElAdvancedEdit
- Left = 112
- Top = 52
- Width = 339
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- end
- end
- end
- object TabG1: TElTabSheet
- PageControl = PC
- Caption = 'G&roup'
- Color = clWindow
- Visible = False
- object Label21: TLabel
- Left = 10
- Top = 47
- Width = 167
- Height = 15
- Caption = '&List of addresses in the group:'
- Transparent = True
- end
- object Label26: TLabel
- Left = 10
- Top = 16
- Width = 69
- Height = 15
- Caption = 'Group name'
- Transparent = True
- end
- object Label27: TLabel
- Left = 112
- Top = 282
- Width = 237
- Height = 15
- Caption = 'This item is just a link and cannot be edited'
- Transparent = True
- Visible = False
- end
- object PnlGEdit: TElPanel
- Left = 0
- Top = 268
- Width = 512
- Height = 34
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- DockOrientation = doNoOrient
- object Label19: TLabel
- Left = 6
- Top = 10
- Width = 34
- Height = 15
- Caption = 'N&ame'
- FocusControl = EditNameG
- Transparent = True
- Visible = False
- end
- object Label20: TLabel
- Left = 238
- Top = 10
- Width = 36
- Height = 15
- Caption = 'E-ma&il'
- FocusControl = EditEmailG
- Transparent = True
- Visible = False
- end
- object EditNameG: TElAdvancedEdit
- Left = 85
- Top = 6
- Width = 145
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- Visible = False
- end
- object EditEmailG: TElAdvancedEdit
- Left = 310
- Top = 6
- Width = 166
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- Visible = False
- end
- end
- object PnlGButtons: TElPanel
- Left = 0
- Top = 302
- Width = 512
- Height = 31
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- DockOrientation = doNoOrient
- DesignSize = (
- 512
- 31)
- object ImageG: TImage
- Left = 8
- Top = 6
- Width = 16
- Height = 16
- end
- object Button2: TButton
- Left = 32
- Top = 1
- Width = 129
- Height = 26
- Caption = '&Change Icon'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = BtnIconClick
- end
- object BtnAdd: TButton
- Left = 266
- Top = 1
- Width = 115
- Height = 26
- Anchors = [akTop, akRight]
- Caption = 'Add to Gro&up'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Visible = False
- OnClick = BtnAddClick
- end
- object BtnDelete: TButton
- Left = 384
- Top = 1
- Width = 115
- Height = 26
- Anchors = [akTop, akRight]
- Caption = '&Delete'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = BtnDeleteClick
- end
- end
- object ElPanel1: TElPanel
- Left = 26
- Top = 70
- Width = 467
- Height = 223
- Align = alNone
- BevelOuter = bvNone
- TabOrder = 3
- DockOrientation = doNoOrient
- object GroupTree: TElTree
- Left = 0
- Top = 0
- Width = 467
- Height = 223
- Align = alClient
- AlwaysKeepFocus = True
- AutoLookup = True
- Flat = True
- FullRowSelect = False
- HeaderHeight = 19
- HeaderHotTrack = False
- HeaderSections.Data = {
- F4FFFFFF030000000000000000000000FFFFFFFF000001010100696FD2000000
- 00000000102700000001000094DCD60300000000010000000000000000000100
- 0000000000000000000100000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000050000004E616D6500010000
- 000000000000000000000000000000000000FFFFFFFF000001010100696FFD00
- 000000000000102700000001000024B393030100000001000000000000000000
- 0100000000000000000000010000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000007000000452D6D61696C
- 00010000000000000000000000000000000000000000FFFFFFFF000000010100
- 696F7800000000000000102700000001000058FC87050200000001000000FFFF
- FFFF000001000000000000000000000100000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000040000005549
- 440001000000000000000000000000}
- HeaderFlat = True
- HideHintOnTimer = True
- HorzScrollBarStyles.MinThumbSize = 16
- HorzScrollBarStyles.NoSunkenThumb = True
- HorzScrollBarStyles.ShowTrackHint = False
- HorzScrollBarStyles.Width = 21
- HorzScrollBarStyles.ButtonSize = 21
- InactiveBorderType = fbtFlat
- LineHeight = 17
- LinesStyle = psSolid
- MultiSelect = False
- ShowButtons = False
- ShowColumns = True
- ShowLeafButton = False
- SortMode = smClick
- SortType = stCustom
- StoragePath = 'Tree'
- StickyHeaderSections = True
- TabOrder = 0
- TabStop = True
- Tracking = False
- UnderlineTracked = False
- UseCustomScrollBars = False
- VertScrollBarStyles.MinThumbSize = 6
- VertScrollBarStyles.NoSunkenThumb = True
- VertScrollBarStyles.ShowTrackHint = True
- VertScrollBarStyles.Width = 17
- VertScrollBarStyles.ButtonSize = 21
- OnItemSelectedChange = GroupTreeItemSelectedChange
- end
- end
- object EditGName: TElAdvancedEdit
- Left = 156
- Top = 12
- Width = 320
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- end
- object Tab6: TElTabSheet
- PageControl = PC
- Caption = '&Templates'
- Color = clWindow
- Visible = False
- object ElGroupBox3: TElGroupBox
- Left = 16
- Top = 20
- Width = 469
- Height = 140
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Templates '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- object Label45: TLabel
- Left = 12
- Top = 112
- Width = 97
- Height = 15
- Caption = 'Bounce Template'
- Transparent = True
- end
- object Label48: TLabel
- Left = 12
- Top = 84
- Width = 100
- Height = 15
- Caption = 'Forward Template'
- Transparent = True
- end
- object Label49: TLabel
- Left = 12
- Top = 28
- Width = 134
- Height = 15
- Caption = 'New Message Template'
- Transparent = True
- end
- object Label50: TLabel
- Left = 12
- Top = 56
- Width = 86
- Height = 15
- Caption = 'Reply Template'
- Transparent = True
- end
- object cbTemplateN: TElAdvancedComboBox
- Left = 226
- Top = 24
- Width = 233
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Style = csDropDownList
- TabOrder = 0
- UseXPThemes = False
- Items.Strings = (
- 'Dr.'
- 'Miss'
- 'Mr.'
- 'Mrs.'
- 'Ms.'
- 'Prof.')
- end
- object cbTemplateR: TElAdvancedComboBox
- Left = 226
- Top = 52
- Width = 233
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Style = csDropDownList
- TabOrder = 1
- UseXPThemes = False
- Items.Strings = (
- 'Dr.'
- 'Miss'
- 'Mr.'
- 'Mrs.'
- 'Ms.'
- 'Prof.')
- end
- object cbTemplateF: TElAdvancedComboBox
- Left = 226
- Top = 80
- Width = 233
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Style = csDropDownList
- TabOrder = 2
- UseXPThemes = False
- Items.Strings = (
- 'Dr.'
- 'Miss'
- 'Mr.'
- 'Mrs.'
- 'Ms.'
- 'Prof.')
- end
- object cbTemplateB: TElAdvancedComboBox
- Left = 226
- Top = 108
- Width = 233
- Height = 23
- ActiveBorderType = fbtColorLineBorder
- AutoCompletion = False
- Flat = True
- HandleDialogKeys = False
- HorizontalScroll = False
- InactiveBorderType = fbtColorLineBorder
- ItemIndex = -1
- ItemHeight = 15
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- Style = csDropDownList
- TabOrder = 3
- UseXPThemes = False
- Items.Strings = (
- 'Dr.'
- 'Miss'
- 'Mr.'
- 'Mrs.'
- 'Ms.'
- 'Prof.')
- end
- end
- end
- object Tab4: TElTabSheet
- PageControl = PC
- Caption = '&Custom'
- Color = clWindow
- Visible = False
- object gb4: TElGroupBox
- Left = 16
- Top = 232
- Width = 453
- Height = 92
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Data Utilities '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- Visible = False
- object Label46: TLabel
- Left = 164
- Top = 32
- Width = 147
- Height = 15
- Caption = 'Export Contact to a VCF file'
- Transparent = True
- end
- object Button1: TButton
- Left = 26
- Top = 26
- Width = 118
- Height = 25
- Caption = 'Save VCF'
- TabOrder = 0
- end
- end
- object ElGroupBox5: TElGroupBox
- Left = 16
- Top = 16
- Width = 453
- Height = 205
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Custom Fields '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 1
- object Label25: TLabel
- Left = 204
- Top = 22
- Width = 70
- Height = 15
- Caption = 'Field content'
- Transparent = True
- end
- object Label24: TLabel
- Left = 16
- Top = 22
- Width = 91
- Height = 15
- Caption = 'Field description'
- Transparent = True
- end
- object EditCustDesc5: TElAdvancedEdit
- Left = 16
- Top = 168
- Width = 173
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 8
- end
- object EditCustData5: TElAdvancedEdit
- Left = 204
- Top = 168
- Width = 235
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 9
- end
- object EditCustData4: TElAdvancedEdit
- Left = 204
- Top = 138
- Width = 235
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 7
- end
- object EditCustDesc4: TElAdvancedEdit
- Left = 16
- Top = 138
- Width = 173
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 6
- end
- object EditCustDesc3: TElAdvancedEdit
- Left = 16
- Top = 108
- Width = 173
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 4
- end
- object EditCustData3: TElAdvancedEdit
- Left = 204
- Top = 108
- Width = 235
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 5
- end
- object EditCustData2: TElAdvancedEdit
- Left = 204
- Top = 78
- Width = 235
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 3
- end
- object EditCustDesc2: TElAdvancedEdit
- Left = 16
- Top = 78
- Width = 173
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 2
- end
- object EditCustDesc1: TElAdvancedEdit
- Left = 16
- Top = 48
- Width = 173
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 0
- end
- object EditCustData1: TElAdvancedEdit
- Left = 204
- Top = 48
- Width = 235
- Height = 23
- UseXPThemes = False
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clGray
- LineBorderInactiveColor = clGray
- TabOrder = 1
- end
- end
- end
- object Tab3: TElTabSheet
- PageControl = PC
- Caption = '&Notes'
- Color = clWindow
- Visible = False
- object MemoNotes: TElAdvancedMemo
- Left = 0
- Top = 0
- Width = 516
- Height = 337
- Align = alClient
- BorderStyle = bsNone
- TabOrder = 0
- end
- end
- end
- end
-