home *** CD-ROM | disk | FTP | other *** search
- object AccountWizard: TAccountWizard
- Left = 306
- Top = 184
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Create New User Account'
- ClientHeight = 348
- ClientWidth = 408
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 296
- Width = 390
- Height = 2
- Shape = bsTopLine
- end
- object bBack: TButton
- Left = 96
- Top = 312
- Width = 89
- Height = 25
- HelpContext = 12006
- Caption = '< &Back'
- Enabled = False
- TabOrder = 1
- OnClick = bBackClick
- end
- object bNext: TButton
- Left = 192
- Top = 312
- Width = 89
- Height = 25
- HelpContext = 12005
- Caption = '&Next >'
- Default = True
- TabOrder = 2
- OnClick = bNextClick
- end
- object bCancel: TButton
- Left = 304
- Top = 312
- Width = 89
- Height = 25
- HelpContext = 12016
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- end
- object Book: TNotebook
- Left = 8
- Top = 8
- Width = 393
- Height = 281
- PageIndex = 2
- TabOrder = 0
- object TPage
- Left = 0
- Top = 0
- Caption = 'Default'
- object Bevel2: TBevel
- Left = 5
- Top = 8
- Width = 380
- Height = 81
- Shape = bsFrame
- end
- object lGeneral: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'Enter user name and the account'#39's home directory. Make sure that' +
- ' the name is not used by other account. If there are account con' +
- 'figuration files in the home directory already, the data from th' +
- 'ose files will be used for defaults for next steps.'
- WordWrap = True
- end
- object Label2: TLabel
- Left = 8
- Top = 100
- Width = 72
- Height = 13
- Caption = 'Account name:'
- FocusControl = eName
- end
- object eName: TEdit
- Left = 8
- Top = 116
- Width = 377
- Height = 21
- HelpContext = 12001
- TabOrder = 0
- end
- object bBrowse: TButton
- Left = 104
- Top = 206
- Width = 129
- Height = 27
- HelpContext = 12003
- Caption = 'Browse'
- TabOrder = 1
- OnClick = bBrowseClick
- end
- object bClear: TButton
- Left = 248
- Top = 206
- Width = 129
- Height = 27
- HelpContext = 12004
- Caption = 'Clear'
- TabOrder = 2
- OnClick = bClearClick
- end
- object gbHomeDir: TGroupBox
- Left = 8
- Top = 156
- Width = 377
- Height = 41
- Caption = '&Home directory:'
- TabOrder = 3
- object eDir: TEdit
- Left = 8
- Top = 17
- Width = 361
- Height = 20
- HelpContext = 12002
- BorderStyle = bsNone
- ParentColor = True
- ReadOnly = True
- TabOrder = 0
- Text = '<default>'
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'E-mail'
- object Bevel3: TBevel
- Left = 5
- Top = 4
- Width = 380
- Height = 85
- Shape = bsFrame
- end
- object lEmail: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'Enter your e-mail data. This information will appear by default ' +
- 'in your messages as originator'#39's data'
- WordWrap = True
- end
- object Label1: TLabel
- Left = 8
- Top = 108
- Width = 70
- Height = 13
- Caption = '&Your full name:'
- FocusControl = eFrom
- end
- object Label4: TLabel
- Left = 8
- Top = 148
- Width = 71
- Height = 13
- Caption = '&E-mail address:'
- end
- object Label5: TLabel
- Left = 8
- Top = 180
- Width = 62
- Height = 13
- Caption = '&Organisation:'
- FocusControl = eOrg
- end
- object leg: TLabel
- Left = 8
- Top = 121
- Width = 93
- Height = 13
- Caption = '(e.g. John G. Smith)'
- end
- object eFrom: TEdit
- Left = 112
- Top = 112
- Width = 273
- Height = 21
- HelpContext = 12007
- TabOrder = 0
- end
- object eAddress: TEdit
- Left = 112
- Top = 144
- Width = 273
- Height = 21
- HelpContext = 12008
- TabOrder = 1
- end
- object eOrg: TEdit
- Left = 112
- Top = 176
- Width = 273
- Height = 21
- HelpContext = 12009
- TabOrder = 2
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Servers'
- object Bevel4: TBevel
- Left = 5
- Top = 4
- Width = 380
- Height = 85
- Shape = bsFrame
- end
- object Label6: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'Enter your mail servers'#39' addresses - they must be provided by yo' +
- 'ur Network Administrator or the Internet Service Provider. SMTP ' +
- 'server is used for sending mail out, POP3 server is used for mai' +
- 'l retrieval.'
- WordWrap = True
- end
- object ServersPanel: TPanel
- Left = 2
- Top = 90
- Width = 388
- Height = 192
- BevelOuter = bvNone
- TabOrder = 0
- object lSMTP: TLabel
- Left = 6
- Top = 126
- Width = 208
- Height = 13
- Caption = '&SMTP server address (e.g. smtp.domain.tld):'
- FocusControl = eSMTP
- end
- object lMailServer: TLabel
- Left = 6
- Top = 83
- Width = 238
- Height = 13
- Caption = '&Incoming mail server address (e.g. mail.domain.tld):'
- FocusControl = ePOP
- end
- object eSMTP: TEdit
- Left = 6
- Top = 142
- Width = 376
- Height = 21
- HelpContext = 12010
- TabOrder = 1
- end
- object ePOP: TEdit
- Left = 6
- Top = 99
- Width = 376
- Height = 21
- HelpContext = 12011
- TabOrder = 0
- end
- object cbSMTPAuth: TCheckBox
- Left = 8
- Top = 166
- Width = 377
- Height = 17
- Caption = 'My SMTP server requires authentication for sending mail'
- TabOrder = 2
- end
- object rgProtocol: TRadioGroup
- Left = 5
- Top = 1
- Width = 378
- Height = 71
- Caption = '&To access mail server, use protocol:'
- Items.Strings = (
- 'POP3 - Post Office Protocol v3 '
- 'IMAP4 - Internet Message Access Protocol'
- 'MAPI - Microsoft Exchange Server')
- TabOrder = 3
- OnClick = rgProtocolClick
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'POP data'
- object Bevel5: TBevel
- Left = 5
- Top = 4
- Width = 380
- Height = 85
- Shape = bsFrame
- end
- object Label9: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- WordWrap = True
- end
- object Label10: TLabel
- Left = 8
- Top = 108
- Width = 51
- Height = 13
- Caption = '&Username:'
- FocusControl = ePOPuser
- end
- object Label11: TLabel
- Left = 8
- Top = 140
- Width = 49
- Height = 13
- Caption = '&Password:'
- end
- object ePOPuser: TEdit
- Left = 120
- Top = 104
- Width = 264
- Height = 21
- HelpContext = 12012
- TabOrder = 0
- end
- object ePassword: TEdit
- Left = 120
- Top = 136
- Width = 264
- Height = 21
- HelpContext = 12013
- PasswordChar = '*'
- TabOrder = 1
- end
- object cbAPOP: TCheckBox
- Left = 24
- Top = 176
- Width = 361
- Height = 17
- HelpContext = 12014
- Caption = 'Use &secure login method (APOP)'
- TabOrder = 2
- end
- object cbLeaveMail: TCheckBox
- Left = 24
- Top = 200
- Width = 361
- Height = 17
- HelpContext = 12015
- Caption = '&Leave copy of messages on the server'
- TabOrder = 3
- end
- object cbImapAuto: TCheckBox
- Left = 24
- Top = 176
- Width = 329
- Height = 17
- Caption = 'Connect to the server automatically'
- Checked = True
- State = cbChecked
- TabOrder = 4
- Visible = False
- end
- object cbImapNoTrash: TCheckBox
- Left = 24
- Top = 200
- Width = 329
- Height = 17
- Caption = 'Do not use the Trash folder for deletion'
- Checked = True
- State = cbChecked
- TabOrder = 5
- Visible = False
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Connection'
- object Bevel6: TBevel
- Left = 5
- Top = 4
- Width = 380
- Height = 85
- Shape = bsFrame
- end
- object Label12: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'Specify the method you are connecting to the Internet. Make sure' +
- ' that TCP/IP protocol is installed on your machine and configure' +
- 'd properly.'
- WordWrap = True
- end
- object rbLAN: TRadioButton
- Left = 16
- Top = 112
- Width = 313
- Height = 17
- Caption = '&Local Area Network or manual connection'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rbLANClick
- end
- object rbDUN: TRadioButton
- Left = 16
- Top = 152
- Width = 193
- Height = 17
- Caption = '&Dial-up connection:'
- TabOrder = 1
- OnClick = rbLANClick
- end
- object lDUN: TComboBox
- Left = 216
- Top = 150
- Width = 169
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Sorted = True
- TabOrder = 2
- end
- object cbAutoHangup: TCheckBox
- Left = 40
- Top = 192
- Width = 345
- Height = 17
- Caption = 'Disconnect &automatically after completion of mail transfer'
- TabOrder = 3
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Finish'
- object Bevel7: TBevel
- Left = 5
- Top = 4
- Width = 380
- Height = 101
- Shape = bsFrame
- end
- object Label14: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'The initial account setup is complete. You may check all other s' +
- 'ettings such as message templates, message management options an' +
- 'd preferences right now or leave this for later. Click Finish bu' +
- 'tton to add this account to The Bat! account list.'
- WordWrap = True
- end
- object Label15: TLabel
- Left = 24
- Top = 128
- Width = 235
- Height = 13
- Caption = 'Do you want to check all account'#39's settings now?'
- end
- object rbNo: TRadioButton
- Left = 64
- Top = 152
- Width = 113
- Height = 17
- Caption = 'No'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rbNoClick
- end
- object rbYes: TRadioButton
- Left = 64
- Top = 176
- Width = 113
- Height = 17
- Caption = 'Yes'
- TabOrder = 1
- OnClick = rbNoClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Install'
- object Bevel8: TBevel
- Left = 5
- Top = 8
- Width = 380
- Height = 81
- Shape = bsFrame
- end
- object Label13: TLabel
- Left = 16
- Top = 16
- Width = 361
- Height = 65
- AutoSize = False
- Caption =
- 'Please make the last step to finish installation! You can either' +
- ' create a new account as for a completely new installation or ch' +
- 'oose to restore data from previously made backup archive.'
- WordWrap = True
- end
- object rbCreate: TRadioButton
- Left = 40
- Top = 136
- Width = 297
- Height = 17
- Caption = 'I want to create a new account'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rbRestoreClick
- end
- object rbRestore: TRadioButton
- Left = 40
- Top = 168
- Width = 337
- Height = 25
- Caption = 'I want to restore data from a backup archive:'
- TabOrder = 1
- OnClick = rbRestoreClick
- end
- object eRestoreFile: TEdit
- Left = 64
- Top = 192
- Width = 225
- Height = 21
- Enabled = False
- TabOrder = 2
- end
- object bRestoreBrowse: TButton
- Left = 292
- Top = 190
- Width = 91
- Height = 25
- Caption = 'Browse'
- Enabled = False
- TabOrder = 3
- OnClick = bRestoreBrowseClick
- end
- end
- end
- end
-