home *** CD-ROM | disk | FTP | other *** search
- object FrmSetupWizard: TFrmSetupWizard
- Left = 342
- Top = 158
- BorderIcons = []
- BorderStyle = bsSingle
- ClientHeight = 410
- ClientWidth = 525
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Image: TImage
- Left = 0
- Top = 0
- Width = 107
- Height = 410
- AutoSize = True
- end
- object BtnFinish: TButton
- Left = 405
- Top = 368
- Width = 109
- Height = 35
- Cancel = True
- Caption = '&Finish'
- TabOrder = 2
- OnClick = BtnFinishClick
- end
- object BtnNext: TButton
- Left = 281
- Top = 368
- Width = 109
- Height = 35
- Caption = '&Next >'
- Default = True
- TabOrder = 0
- OnClick = BtnNextClick
- end
- object pc: TElPageControl
- Left = 113
- Top = 6
- Width = 405
- Height = 353
- BorderWidth = 0
- DrawFocus = False
- Flat = False
- Multiline = False
- RaggedRight = False
- ScrollOpposite = False
- ShowBorder = False
- ShowTabs = False
- Style = etsTabs
- TabIndex = 0
- TabPosition = etpTop
- HotTrackFont.Charset = DEFAULT_CHARSET
- HotTrackFont.Color = clBlue
- HotTrackFont.Height = -13
- HotTrackFont.Name = 'MS Sans Serif'
- HotTrackFont.Style = []
- TabBkColor = clWhite
- ActivePage = Tab1
- ActiveTabFont.Charset = DEFAULT_CHARSET
- ActiveTabFont.Color = clWindowText
- ActiveTabFont.Height = -13
- ActiveTabFont.Name = 'MS Sans Serif'
- ActiveTabFont.Style = []
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- TabOrder = 1
- DockOrientation = doNoOrient
- object Tab1: TElTabSheet
- PageControl = pc
- UseTabColor = True
- Color = clWhite
- object Label8: TLabel
- Left = 16
- Top = 324
- Width = 336
- Height = 16
- Caption = 'Proceed to Step 2, or press Finish to start the application.'
- Transparent = True
- end
- object LblThankYou: TLabel
- Left = 12
- Top = 2
- Width = 5
- Height = 19
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object LabelUpgrade: TElHTMLLabel
- Left = 12
- Top = 100
- Width = 252
- Height = 32
- Cursor = crDefault
- IsHTML = True
- WordWrap = False
- Caption =
- 'If you are upgrading from another version of <br>'#13#10'PocoMail or B' +
- 'arca please <a href="upgrade">proceed here</a>.'
- LinkStyle = [fsUnderline]
- OnLinkClick = LabelUpgradeLinkClick
- Alignment = taCenter
- end
- object Label16: TLabel
- Left = 12
- Top = 34
- Width = 338
- Height = 32
- Caption =
- 'Please fill in your basic personal information to setup your '#13#10'e' +
- 'mail account.'
- end
- object gb1: TElGroupBox
- Left = 12
- Top = 151
- Width = 380
- Height = 102
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Personal Information '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- object Label2: TLabel
- Left = 20
- Top = 30
- Width = 73
- Height = 16
- Caption = '&Your name:'
- FocusControl = EditFullName
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 20
- Top = 64
- Width = 130
- Height = 16
- Caption = 'Your &e-mail address:'
- FocusControl = EditEmail
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object EditEmail: TElAdvancedEdit
- Left = 191
- Top = 60
- Width = 170
- Height = 24
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- TabOrder = 1
- OnChange = EditEmailChange
- end
- object EditFullName: TElAdvancedEdit
- Left = 191
- Top = 26
- Width = 170
- Height = 24
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- TabOrder = 0
- end
- end
- end
- object Tab1a: TElTabSheet
- TabColor = clWindow
- PageControl = pc
- Color = clWhite
- Visible = False
- object Label9: TLabel
- Left = 16
- Top = 324
- Width = 336
- Height = 16
- Caption = 'Proceed to Step 3, or press Finish to start the application.'
- Transparent = True
- end
- object gb2: TElGroupBox
- Left = 12
- Top = 119
- Width = 380
- Height = 200
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Email Account Information '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- object Label5: TLabel
- Left = 20
- Top = 104
- Width = 157
- Height = 16
- Caption = 'Incoming Server &Password:'
- FocusControl = EditPOPPass
- Transparent = True
- end
- object Label7: TLabel
- Left = 20
- Top = 22
- Width = 279
- Height = 16
- Caption = 'Some of the fields are guessed, correct if wrong:'
- Transparent = True
- end
- object Label4: TLabel
- Left = 20
- Top = 78
- Width = 159
- Height = 16
- Caption = 'Incoming Server &Username:'
- FocusControl = EditPOPAccount
- Transparent = True
- end
- object Label3: TLabel
- Left = 20
- Top = 52
- Width = 96
- Height = 16
- Caption = '&Incoming Server:'
- FocusControl = EditPOPServer
- Transparent = True
- end
- object Label6: TLabel
- Left = 20
- Top = 164
- Width = 141
- Height = 16
- Caption = '&SMTP (outgoing) Server:'
- FocusControl = EditSMTP
- Transparent = True
- end
- object Label15: TLabel
- Left = 20
- Top = 130
- Width = 110
- Height = 16
- Caption = 'Incoming Server Is:'
- Transparent = True
- end
- object EditPOPPass: TElEdit
- Left = 199
- Top = 100
- Width = 170
- Height = 24
- Cursor = crIBeam
- UseCustomScrollBars = True
- NotifyUserChangeOnly = True
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- PasswordChar = #8226
- RightMargin = 5
- TopMargin = 2
- BorderStyle = bsSingle
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- MaxUndoLevel = 0
- Ctl3D = True
- ParentColor = False
- ParentCtl3D = False
- TabOrder = 2
- end
- object EditPOPAccount: TElAdvancedEdit
- Left = 199
- Top = 74
- Width = 170
- Height = 24
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- TabOrder = 1
- end
- object EditPOPServer: TElAdvancedEdit
- Left = 199
- Top = 48
- Width = 170
- Height = 24
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- TabOrder = 0
- end
- object EditSMTP: TElAdvancedEdit
- Left = 199
- Top = 160
- Width = 170
- Height = 24
- ActiveBorderType = fbtColorLineBorder
- Flat = True
- InactiveBorderType = fbtColorLineBorder
- LineBorderActiveColor = clSilver
- LineBorderInactiveColor = clSilver
- TabOrder = 5
- end
- object cbPOP: TElRadioButton
- Left = 198
- Top = 128
- Width = 53
- Height = 20
- Cursor = crDefault
- Checked = True
- Caption = 'POP'
- TabOrder = 3
- DoubleBuffered = False
- end
- object cbIMAP: TElRadioButton
- Left = 290
- Top = 128
- Width = 57
- Height = 20
- Cursor = crDefault
- Caption = 'IMAP'
- TabOrder = 4
- DoubleBuffered = False
- end
- end
- object Memo2: TMemo
- Left = 8
- Top = 10
- Width = 393
- Height = 105
- TabStop = False
- BorderStyle = bsNone
- Lines.Strings = (
- 'Please fill in the basic email account settings from your '
- 'email provider to setup your first email account.'
- 'Feel free to override any automatically filled up fields.'
- ''
- 'If you are upgrading from another version just press Next.')
- ParentColor = True
- ReadOnly = True
- TabOrder = 1
- end
- end
- object Tab2: TElTabSheet
- PageControl = pc
- Color = clWhite
- Visible = False
- object Label12: TLabel
- Left = 172
- Top = 316
- Width = 210
- Height = 16
- Alignment = taRightJustify
- Caption = 'Press Finish to start the application.'
- Transparent = True
- end
- object cbJunk: TElCheckBox
- Left = 25
- Top = 216
- Width = 169
- Height = 20
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatActiveColor = clBlack
- MoneyFlatInactiveColor = clBlack
- MoneyFlatDownColor = clBlack
- Caption = 'Enable Junk Mail filtering'
- TabOrder = 2
- Color = clWhite
- ParentColor = False
- DoubleBuffered = False
- end
- object cbLMOS: TElCheckBox
- Left = 25
- Top = 188
- Width = 264
- Height = 20
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatActiveColor = clBlack
- MoneyFlatInactiveColor = clBlack
- MoneyFlatDownColor = clBlack
- Caption = 'When checking mail, leave mail on server'
- TabOrder = 1
- Color = clWhite
- ParentColor = False
- DoubleBuffered = False
- end
- object gb3: TElGroupBox
- Left = 12
- Top = 9
- Width = 380
- Height = 162
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Import Data '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- object Label14: TLabel
- Left = 50
- Top = 98
- Width = 212
- Height = 16
- Caption = 'address books from another program'
- Transparent = True
- end
- object Label13: TLabel
- Left = 50
- Top = 52
- Width = 162
- Height = 16
- Caption = 'from another e-mail program'
- Transparent = True
- end
- object cbPWizard: TElCheckBox
- Left = 25
- Top = 124
- Width = 232
- Height = 20
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatActiveColor = clBlack
- MoneyFlatInactiveColor = clBlack
- MoneyFlatDownColor = clBlack
- Caption = 'Import data from another installation'
- TabOrder = 2
- Color = clWhite
- ParentColor = False
- OnClick = cbPWizardClick
- DoubleBuffered = False
- end
- object cbAWizard: TElCheckBox
- Left = 25
- Top = 78
- Width = 274
- Height = 20
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatActiveColor = clBlack
- MoneyFlatInactiveColor = clBlack
- MoneyFlatDownColor = clBlack
- Caption = 'Run Address Book Import Wizard to import'
- TabOrder = 1
- Color = clWhite
- ParentColor = False
- OnClick = cbMWizardClick
- DoubleBuffered = False
- end
- object cbMWizard: TElCheckBox
- Left = 25
- Top = 32
- Width = 309
- Height = 20
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatActiveColor = clBlack
- MoneyFlatInactiveColor = clBlack
- MoneyFlatDownColor = clBlack
- Caption = 'Run Message Import Wizard to import messages'
- TabOrder = 0
- Color = clWhite
- ParentColor = False
- OnClick = cbMWizardClick
- DoubleBuffered = False
- end
- end
- end
- end
- object BtnBack: TButton
- Left = 157
- Top = 368
- Width = 109
- Height = 35
- Caption = '< Back'
- Enabled = False
- TabOrder = 3
- OnClick = BtnBackClick
- end
- object Welcome: TIStrings
- Duplicates = dupIgnore
- Left = 118
- Top = 368
- SStr = (
- 'From <welcome@pocomail.com>'
- 'From: Poco Systems <welcome@pocomail.com>'
- 'Subject: PocoMail 3 Welcome Message'
- 'Mime-Version: 1.0'
- 'Content-Type: text/html; charset="us-ascii"'
- 'Content-Transfer-Encoding: quoted-printable'
- 'Status: U'
- ''
- '<html>'
- '<head>'
- '<style type="text/css">'
- ' .sanserif { Font-family: Verdana }'
- '</style>'
- '</head>'
- ''
- '<body>'
- ''
-
- '<table class="framed" width="100%" cellpadding="10" class="sanse' +
- 'rif"><tr>'
- '<td width="60%" valign="top">'
- '<font size="+1">Welcome to</font> <font size="+2">PocoMail'
- '3!</font>'
- '<p>'
-
- 'PocoMail is single-mindedly focused on one thing: to help you wi' +
- 'th your email. Developed from the ground up with the end user in' +
- ' mind, award-winning PocoMail is fast, functional and flexible.'
- '<p>'
- ''
-
- 'PocoMail 3 raises the bar once again and will help you manage yo' +
- 'ur email in ways you didn'#39't even think were possible. So take a ' +
- 'moment to look at our <a '#160
-
- 'href="pococommand:helpon">help file</a> to get started. Take adv' +
- 'antage of some of our many features, from powerful email filters' +
- ', intelligent junk mail filters, an array of program appearance ' +
- 'options all the way to our advanced scripting language for email' +
- ': PocoScript.'
- '<p>'
- ''
- 'You can also visit our web site at <a'
-
- 'href="http://www.pocomail.com">pocomail.com</a>'#160'for additional h' +
- 'elp,'
- 'program skins, ControlStrips, scripts and more.'
- '<p>'
- ''
- '<i>Enjoy your stay,</i>'
- '<p>'
- ''
- '<i>Poco Systems Inc.</i>'
- '</td>'
- ''
- '<td bgcolor="#ffffff" width="40%" valign="top">'
- '<font size="+1">Do <i><u>more</u></i>'#160'with'
- 'PocoMail:</font>'
- '<p>'
- '<ul>'
-
- '<li>Need help? Visit our <a href="http://www.pocosystems.com/sup' +
- 'port.html">support pages</a> for access to our frequently asked ' +
- 'questions, tips on using PocoMail and our support forum.'
- '<p>'
- '<li>Sign up for <a'
-
- 'href="http://pocomail.com/report.html">PocoReport</a>'#160'newsletter' +
- '.'
- '<p>'
- '<li>Change PocoMail'#39's appearance by downloading additional <a'
- 'href="http://pocomail.com/skins">program skins</a>.'
- '<p>'
- '<li>Add functionality to PocoMail by downloading <a'
- 'href="http://pocomail.com/scripts">PocoScripts</a>.'
- '<p>'
- ''
- '</ul>'
- '</td>'
- ''
- '</tr></table>'
- '<br>'
- '<div align="right"><font face="Courier New" size="-2">'
- 'PocoMail is Copyright © 1999-2004 by <a'
- 'href="http://www.pocosystems.com">Poco Systems Inc</a>.'
- '</font></div>'
- ''
- '</font>'
- '</body>'
- '</html>')
- end
- object FlatController: TElFlatMultiController
- Entries = <
- item
- Active = True
- BorderSides = []
- FlatFocusedScrollbars = False
- DesignActive = True
- Control = BtnFinish
- ActiveBorderType = fbtFlat
- InactiveBorderType = fbtFlat
- LineBorderActiveColor = clBlack
- LineBorderInactiveColor = clBlack
- UseXPThemes = True
- end
- item
- Active = True
- BorderSides = []
- FlatFocusedScrollbars = False
- DesignActive = True
- Control = BtnNext
- ActiveBorderType = fbtFlat
- InactiveBorderType = fbtFlat
- LineBorderActiveColor = clBlack
- LineBorderInactiveColor = clBlack
- UseXPThemes = True
- end>
- AutoAddControls = False
- FlatFocusedScrollbars = False
- ActiveBorderType = fbtFlat
- InactiveBorderType = fbtFlat
- LineBorderActiveColor = clBlack
- LineBorderInactiveColor = clBlack
- BorderSides = []
- Left = 150
- Top = 367
- end
- end
-