object AddressForm: TAddressForm Tag = 168 Left = 67 Top = 63 Width = 515 Height = 345 HelpContext = 9 ActiveControl = ListView1 Caption = 'Phoenix Mail - Address Book' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Menu = MainMenu1 ShowHint = True OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 507 Height = 31 Align = alTop BevelOuter = bvNone TabOrder = 0 object Bevel5: TBevel Left = 196 Top = 4 Width = 13 Height = 25 Shape = bsLeftLine end object Bevel4: TBevel Left = 165 Top = 4 Width = 13 Height = 25 Shape = bsLeftLine end object Bevel3: TBevel Left = 134 Top = 4 Width = 13 Height = 25 Shape = bsLeftLine end object Bevel1: TBevel Left = 0 Top = 0 Width = 507 Height = 2 Align = alTop Shape = bsTopLine end object SpeedButton1: TSpeedButton Tag = -141 Left = 4 Top = 4 Width = 25 Height = 25 Hint = 'New address' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000C40E0000C40E00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDFFFFFFFFFFFFFD000901DD0000000000000DDDD7777777777777FD01 0901DD7888888888880DDDD7FDDDDDDDDDD7FD026202DD7F8F8F8F8F880DDDD7 FDDDDDDDDDD7FD000200DD7FF8F8F8F8F80DDDD7FDDDDDDDDDD7FD000F01DD7F 8F8F8F8F880DDDD7FDDDDDDDDDD7FD00C600DD7FF8F8F8F8F80DDDD7FDDDDDDD DDD7FD014D01DD7F8F8F8F8F880DDDD7FDDFFFFDDDD7FD015001DD7FF44448F8 F80DDDD7FD7777DDDDD7FD006202DD7F8F8F8F8F880DDDD7FDDFFFFDDDD7FD00 0800DD7FF44448F8F80DDDF7FD7777DDDDD7FD0262027D7F878F8F8F880DD7D7 FD7FFFFDDFF7FD026202D77F744448F0000DDD77D77777DD7777DD000200DDBB 8F8F8F88F7DDDDFDDDDFDDDDDD7DDD09B0817DBBF7FFFFF87DDDD7DFFF7FFFFF F7DDDD00AF81D77777777777DDDDDD77777777777DDDDDD7FFFF7DDDD7DDDDDD DDDDD7DDDD7DDDDDDDDDDDD77777} NumGlyphs = 2 OnClick = New1Click end object SpeedButton5: TSpeedButton Tag = -142 Left = 28 Top = 4 Width = 25 Height = 25 Hint = 'Delete address' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000CE0E0000CE0E00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDFFFFFFFFFFFFFD022102DD0000000000000DDDD7777777777777FD00 2003DD9888888888880DDDD7FDDDDDFDDDD7FD00FFFFD99F8F8F9F8F880DDD77 FFDDD7DDDDD7FD010200D999F8F9F8F8F80DDD777FDD7FDDDDD7FD001801DD99 8F998F8F880DDDD77DF77DDDDDD7FD026502DD7F9998F8F8F80DDDD7F777DDDD DDD7FD026202DD79998F8F8F880DDDD7777FFFFDDDD7FD000400DD79999448F8 F80DDDD7777777FDDDD7FD00A700DD998F999F8F880DDDF77DD777FDDDD7FD02 6202997FF44998F8F80DD777FD7777DDDDD7FD013C01997F8F8F8F8F880DD777 FDDFFFFDDFF7FD014901DD7FF44448F0000DDDD7FD7777DD7777DD000600DD7F 8F8F8F88F7DDDDD7FDDDDDDDDD7DDD000400DD7FFFFFFFF87DDDDDD7FFFFFFFF F7DDDD015301DD7777777777DDDDDDD7777777777DDDDD016202DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD010B02} NumGlyphs = 2 OnClick = Delete1Click end object SpeedButton3: TSpeedButton Tag = -143 Left = 52 Top = 4 Width = 25 Height = 25 Hint = 'Edit address' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000900DDDDDDDDDDDDDDDDDDFFFFFFFFFFFFDDDD01 0402000000000000DDDDD777777777777FDDDD0104020FFFFFFFFFF0DDDDD7FD FFDFFFFF7FDDDD0006000F00F00000F0DDDDD7F77D77777D7FDDDD0004000FFF FFFFFFF0DDDDD7FDFFDFFFFF7FDDDD012D010F00F00000F0DDDDD7F77D77777D 7FDDDD014D010FFFFFFFFFF0DDDDD7FDDDDDDDFD7FDDDD0104020FFFFFFF0FF0 DDDDD7FDFFDDD7DF7FDDDD0002000F00FFF080F0DDDDD7F77DFD7D7D7FFDFF7F B0810F080F0808000D44D7F7D7D7D7D777D77F016D010FF0808080888044D7FF 7F7D7D7DDD777F0062020000080808888844D77777D7D7DDDDD77F000200DDDD D08088888844DDDDDD7D7DDDDDD77FBDAF81DDDDDD0888888044DDDDDDD7DFFF FF777F00C400DDDDDDD000000D44DDDDDDDD777777D77D000200DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD7AB081} NumGlyphs = 2 OnClick = Edit1Click end object SpeedButton6: TSpeedButton Tag = -144 Left = 83 Top = 4 Width = 25 Height = 25 Hint = 'Search address' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDDDFFFFFDDDDDFFFFF00 0000D00000DDDDD00000DD77777FDDDD77777F000000D0F000DDDDD0F000DD7F 777FDDDD7F777F000000D0F000DDDDD0F000DD7F777FFFDF7F777F000000D000 0000D0000000DD7777777F7777777F000000D00F000000F00000DD77F777777F 77777F000000D00F000D00F00000DD77F777F77F77777F000000D00F000D00F0 0000DD77F777F77F77777D000000DD0000000000000DDDD7777777777777DD00 0000DDD0F000D0F000DDDDDD7F777F7F777FDD000000DDD00000D00000DDDDDD 77777D77777DDD000000DDDD000DDD000DDDDDDDD777FDD777FDDD000000DDDD 0F0DDD0F0DDDDDDDD7F7FDD7F7FDDD000000DDDD000DDD000DDDDDDDD777DDD7 77DDDD000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000000} NumGlyphs = 2 OnClick = Search1Click end object SpeedButton2: TSpeedButton Tag = -146 Left = 138 Top = 4 Width = 25 Height = 25 Hint = 'Close Address Book' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000CE0E0000CE0E00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000901DDDDDDDDDDDDDDDDDDDDFDDDDDDDDDDFDD01 0901DD0DDDDDDDDDD0DDDDD7FFDDDDDDDD7DDD026202D000DDDDDDDDDDDDDD77 7FFDDDDDDDFDDD000200D0000DDDDDDD0DDDDD7777FDDDDDD7DDDD000F01DD00 0DDDDDD0DDDDDDD777FFDDDD7FDDDD00C600DDD000DDDD00DDDDDDDD777FFDD7 7DDDDD014D01DDDD000DD00DDDDDDDDDD777FF77DDDDDD015001DDDDD00000DD DDDDDDDDDD77777DDDDDDD006202DDDDDD000DDDDDDDDDDDDDD777FFDDDDDD00 0800DDDDD00000DDDDDDDDDDDD77777FFDDDDD026202DDDD000DD00DDDDDDDDD F777DD77FFDDDD026202DD0000DDDD00DDDDDDD7777DDDD77FFDDD000200D000 0DDDDDD00DDDDD7777DDDDDD77DFDD3AB081D000DDDDDDDDD0DDDD777DDDDDDD DD7DDD000400DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000200DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD002003} NumGlyphs = 2 OnClick = Close1Click end object SpeedButton4: TSpeedButton Tag = -147 Left = 169 Top = 4 Width = 25 Height = 25 Hint = 'Write to selected addresses' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00 0000DDDDDDDDDDDDDDDDDDDDFFFFFFFFFFFFFF000000DD70000000000000DDD7 7777777777777F000000DD77777777777770DDD77777777777777F000000DD7B 8B8B8B8B8B70DDD7FFDDDFFFDDD77F000000DD70B8B333B8B070DDD77DFD777F FD777F000000DD7B0B30003B0B70DDD7F7D77777F7D77F000000DD78B008B803 B870DDD7FD77DDD77FF77F000000DD7B808B8B803B70DDD7FD7DDDDD77F77F00 0000DD7808B8B8B80370DDD7F7DDDDDDD7777F000000DD708B8B8B8B8070DDD7 7DDDDDDDDD777F000000DD78B8B8B8B8BB00DDD7FFFFFFFFFFF77F000000DD77 777777777770DDD77777777777777D000000DDDDDDDDDDDDDDDDDDDDDDDDDDDD DDDDDD000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD000000} NumGlyphs = 2 OnClick = MailtoAddresses1Click end object SpeedButton10: TSpeedButton Tag = -145 Left = 107 Top = 4 Width = 25 Height = 25 Hint = 'Move addresses to another book' Flat = True Glyph.Data = { CA010000424DCA01000000000000760000002800000022000000110000000100 04000000000054010000C40E0000C40E00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDFFFFFFFFFFFFF000901DDD0000000000000DDDD7777777777777F01 0901DDD7888888888880DDFF7FFFDDDDDDDD7F026202777777F8F8F8F880D777 777DDDDDDDDD7F000200DDD7FF8F8F8F8F80DDFF7FFFDDDDDDDD7F000F017777 77F8F8F8F880D777777DDDDDDDDD7F00C600DDD7FF8F8F8F8F80DDFF7FFFDDDD DDDD7F014D01777777F8F8F8F880D777777DFFFFDDDD7F015001DDD7FF44448F 8F80DDFF7FF7777DDDDD7F006202777777F8F8F8F880D777777DFFFFDDDD7F00 0800DDD7FF44448F8F80DDFF7FF7777DDDDD7F026202777777F8F8F8F880D777 777DFFFFDDFF7F026202DDD7FF44448F0000DDFF7FF7777DD7777D0002007777 77F8F8F88F7DD777777DDDDDDDD7DD09B081DDD7FFFFFFFF87DDDDDD7FFFFFFF FF7DDD00AF81DDD7777777777DDDDDDD7777777777DDDDD7FFFFDDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDD77777} NumGlyphs = 2 OnClick = Movetoanotherbook1Click end object Image1: TImage Left = 380 Top = 8 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object Bevel2: TBevel Left = 79 Top = 4 Width = 13 Height = 25 Shape = bsLeftLine end object ComboBox1: TComboBoxEx Left = 202 Top = 6 Width = 165 Height = 22 Images = ImageList1 ShowImages = True DropDownCount = 10 ItemHeight = 16 TabOrder = 0 OnChange = ComboBox1Change end end object StatusBar1: TStatusBar Left = 0 Top = 280 Width = 507 Height = 19 Panels = < item Text = '0 Adresses, 0 Selected' Width = 50 end> SimplePanel = False end object ListView1: TExtListView Tag = 148 Left = 0 Top = 31 Width = 507 Height = 249 Columns = < item Width = 20 end item Caption = 'Name' Width = 120 end item Caption = 'Description' Width = 120 end item Caption = 'E-Mail Address' Width = 170 end item Caption = 'Phone' Width = 48 end item Caption = 'Real Address' Width = 120 end> HideSelection = False ExtendedStyles = [lvxFullRowSelect] ColumnsFormat = <> SmallImages = ImageList1 ShowSortArrows = True AutoColumnSort = acsSortToggle AutoSortStyle = assDefault OnDrawHeader = ListView1DrawHeader Align = alClient OnDblClick = MailtoAddresses1Click ReadOnly = True MultiSelect = True OnMouseUp = ListView1MouseUp PopupMenu = PopupMenu1 TabOrder = 2 ViewStyle = vsReport OnKeyDown = ListView1KeyDown end object MainMenu1: TMainMenu Left = 128 Top = 96 object File1: TMenuItem Tag = 154 Caption = '&File' object Close1: TMenuItem Tag = 155 Caption = '&Close' ShortCut = 27 OnClick = Close1Click end end object Address1: TMenuItem Tag = 156 Caption = '&Address' object New1: TMenuItem Tag = 157 Caption = '&New...' ShortCut = 16462 OnClick = New1Click end object Delete1: TMenuItem Tag = 158 Caption = '&Delete' ShortCut = 16430 OnClick = Delete1Click end object N3: TMenuItem Caption = '-' end object MailtoAddresses1: TMenuItem Tag = 159 Caption = '&Write to Addresses' ShortCut = 16461 OnClick = MailtoAddresses1Click end object SelectAllAddresses1: TMenuItem Tag = 160 Caption = '&Select All Addresses' ShortCut = 16449 OnClick = SelectAllAddresses1Click end object Movetoanotherbook1: TMenuItem Tag = 161 Caption = '&Move to another book...' ShortCut = 16463 OnClick = Movetoanotherbook1Click end object N1: TMenuItem Caption = '-' end object Search1: TMenuItem Tag = 162 Caption = '&Search...' ShortCut = 16454 OnClick = Search1Click end object N5: TMenuItem Caption = '-' end object Edit1: TMenuItem Tag = 163 Caption = '&Edit...' ShortCut = 16453 OnClick = Edit1Click end end object Book1: TMenuItem Tag = 164 Caption = '&Book' object New2: TMenuItem Tag = 165 Caption = '&New...' OnClick = New2Click end object Delete2: TMenuItem Tag = 166 Caption = '&Delete' OnClick = Delete2Click end object N7: TMenuItem Caption = '-' end object Rename1: TMenuItem Tag = 167 Caption = '&Rename...' OnClick = Rename1Click end end object Help1: TMenuItem Tag = 55 Caption = '&Help' object Contents1: TMenuItem Tag = 56 Caption = '&Contents...' OnClick = Contents1Click end end end object PopupMenu1: TPopupMenu OnPopup = PopupMenu1Popup Left = 60 Top = 96 object NewAddress1: TMenuItem Tag = 149 Caption = '&New Address...' OnClick = New1Click end object DeleteAddress1: TMenuItem Tag = 150 Caption = '&Delete Address' OnClick = Delete1Click end object N4: TMenuItem Caption = '-' end object MailtoAddresses2: TMenuItem Tag = 151 Caption = '&Write to Addresses' Default = True OnClick = MailtoAddresses1Click end object N2: TMenuItem Caption = '-' end object SelectAll1: TMenuItem Tag = 152 Caption = '&Select All' OnClick = SelectAllAddresses1Click end object N6: TMenuItem Caption = '-' end object EditAddress1: TMenuItem Tag = 153 Caption = '&Edit Address...' OnClick = Edit1Click end end object ImageList1: TImageList Left = 60 Top = 148 end end