home *** CD-ROM | disk | FTP | other *** search
- object MailboxImporter: TMailboxImporter
- Left = 196
- Top = 117
- BorderStyle = bsDialog
- Caption = 'Import Mailboxes'
- ClientHeight = 313
- ClientWidth = 316
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 9
- Top = 248
- Width = 297
- Height = 9
- Shape = bsBottomLine
- end
- object Book: TNotebook
- Left = 0
- Top = 0
- Width = 316
- Height = 241
- Align = alTop
- TabOrder = 0
- object TPage
- Left = 0
- Top = 0
- Caption = 'Mailer'
- object Label1: TLabel
- Left = 16
- Top = 16
- Width = 281
- Height = 57
- AutoSize = False
- Caption =
- 'Please choose the e-mail client you want to convert mailboxes fr' +
- 'om. (Make sure that boxes are compressed so you won'#39't restore un' +
- 'wanted messages)'
- WordWrap = True
- end
- object bClient: TGroupBox
- Left = 18
- Top = 72
- Width = 281
- Height = 161
- TabOrder = 0
- object bNetscape: TRadioButton
- Left = 16
- Top = 88
- Width = 249
- Height = 17
- Caption = '&Netscape Mail v2.xx or 3.xx'
- TabOrder = 3
- end
- object bMessenger: TRadioButton
- Tag = 1
- Left = 16
- Top = 64
- Width = 249
- Height = 17
- Caption = 'Netscape &Communicator v4.xx'
- TabOrder = 2
- end
- object bEudora: TRadioButton
- Tag = 2
- Left = 16
- Top = 112
- Width = 257
- Height = 17
- Caption = '&Eudora Lite/Pro'
- TabOrder = 4
- end
- object bAnyPegas: TRadioButton
- Tag = 4
- Left = 16
- Top = 136
- Width = 257
- Height = 17
- Caption = '&Pegasus Mail v2.xx or 3.xx'
- TabOrder = 5
- end
- object bMSIM: TRadioButton
- Tag = 5
- Left = 16
- Top = 16
- Width = 257
- Height = 17
- Caption = '&Microsoft Outlook Express or MS Mail v4.xx'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object cbOE50: TRadioButton
- Tag = 10
- Left = 16
- Top = 40
- Width = 249
- Height = 17
- Caption = 'Microsoft Outlook Express 5.0'
- TabOrder = 1
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Client search'
- object lInfo: TLabel
- Left = 16
- Top = 32
- Width = 284
- Height = 33
- AutoSize = False
- Caption = 'Retrieving mailbox information of '
- WordWrap = True
- end
- object Label7: TLabel
- Left = 14
- Top = 120
- Width = 289
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Please wait...'
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Mailbox'
- object Label2: TLabel
- Left = 17
- Top = 8
- Width = 281
- Height = 25
- AutoSize = False
- Caption = 'Please select the mailboxes you want to import'
- WordWrap = True
- end
- object lBoxes: TListBox
- Left = 13
- Top = 40
- Width = 290
- Height = 137
- ItemHeight = 16
- MultiSelect = True
- Style = lbOwnerDrawFixed
- TabOrder = 0
- OnDrawItem = lBoxesDrawItem
- OnKeyDown = lBoxesKeyDown
- OnMouseDown = lBoxesMouseDown
- OnMouseUp = lBoxesMouseUp
- end
- object cbPrompt: TCheckBox
- Left = 24
- Top = 218
- Width = 273
- Height = 17
- Caption = '&Prompt me whenever a new mailbox is created'
- TabOrder = 3
- end
- object bSelectAll: TButton
- Left = 14
- Top = 188
- Width = 115
- Height = 25
- Caption = '&Select all'
- TabOrder = 1
- OnClick = bSelectAllClick
- end
- object bDeAll: TButton
- Tag = 1
- Left = 190
- Top = 188
- Width = 115
- Height = 25
- Caption = '&Unselect all'
- TabOrder = 2
- OnClick = bSelectAllClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Confirm'
- object Label4: TLabel
- Left = 14
- Top = 16
- Width = 288
- Height = 41
- AutoSize = False
- Caption =
- 'Import is in progress. Please be patient - this process may take' +
- ' a long time...'
- WordWrap = True
- end
- object Label5: TLabel
- Left = 16
- Top = 64
- Width = 105
- Height = 13
- Alignment = taRightJustify
- Caption = 'Processing mailbox: '
- end
- object lBox: TLabel
- Left = 128
- Top = 64
- Width = 177
- Height = 13
- Cursor = crDrag
- AutoSize = False
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 22
- Top = 144
- Width = 79
- Height = 13
- Caption = 'Overall progress:'
- end
- object pBar: TProgressBar
- Left = 22
- Top = 96
- Width = 273
- Height = 25
- Min = 0
- Max = 100
- TabOrder = 0
- end
- object AllBar: TProgressBar
- Left = 22
- Top = 168
- Width = 273
- Height = 25
- Min = 0
- Max = 100
- TabOrder = 1
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Finished'
- object Label8: TLabel
- Left = 14
- Top = 84
- Width = 289
- Height = 65
- AutoSize = False
- Caption =
- 'Import finished. Press Close button to close Import Wizard or pr' +
- 'ess Back button to Import another portion of mailboxes.'
- WordWrap = True
- end
- end
- end
- object bBack: TButton
- Left = 72
- Top = 280
- Width = 71
- Height = 25
- Caption = '< &Back'
- Enabled = False
- TabOrder = 1
- OnClick = bBackClick
- end
- object bNext: TButton
- Left = 152
- Top = 280
- Width = 75
- Height = 25
- Caption = '&Next >'
- Default = True
- TabOrder = 2
- OnClick = bNextClick
- end
- object bCancel: TButton
- Left = 232
- Top = 280
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- OnClick = bCancelClick
- end
- end
-