home *** CD-ROM | disk | FTP | other *** search
- object frmCreatePackage: TfrmCreatePackage
- Left = 327
- Top = 402
- ActiveControl = btnNext
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Create Icon Package'
- ClientHeight = 364
- ClientWidth = 557
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = False
- Position = poMainFormCenter
- Scaled = False
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object pnlBottomNav: TPanel
- Left = 0
- Top = 319
- Width = 557
- Height = 45
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- DesignSize = (
- 557
- 45)
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 557
- Height = 2
- Align = alTop
- BevelOuter = bvLowered
- TabOrder = 3
- end
- object btnNext: TButton
- Left = 385
- Top = 12
- Width = 75
- Height = 23
- Anchors = [akRight, akBottom]
- Caption = '&Next >'
- Default = True
- TabOrder = 1
- OnClick = btnNextClick
- end
- object btnCancel: TButton
- Left = 470
- Top = 12
- Width = 75
- Height = 23
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = btnCancelClick
- end
- object btnBack: TButton
- Left = 310
- Top = 12
- Width = 75
- Height = 23
- Anchors = [akRight, akBottom]
- Caption = '< &Back'
- Enabled = False
- TabOrder = 0
- OnClick = btnBackClick
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 0
- Width = 557
- Height = 319
- Align = alClient
- BevelOuter = bvNone
- Color = clWhite
- TabOrder = 0
- object imgWiz: TImage
- Left = 0
- Top = 0
- Width = 210
- Height = 319
- Align = alLeft
- end
- object Image1: TImage
- Left = 36
- Top = 171
- Width = 128
- Height = 128
- Picture.Data = {<image001.TPNGImage>}
- end
- object PageControl1: TPageControl
- Left = 210
- Top = 0
- Width = 347
- Height = 319
- ActivePage = tsDesc
- Align = alClient
- Style = tsFlatButtons
- TabOrder = 0
- object tsWelcome: TTabSheet
- Caption = 'Welcome'
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label5: TLabel
- Left = 8
- Top = 40
- Width = 318
- Height = 42
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'You can use this wizard to create your own icon package from the' +
- ' current TuneUp WinStyler configuration. '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label12: TLabel
- Left = 8
- Top = 8
- Width = 319
- Height = 25
- AutoSize = False
- Caption = 'Welcome'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label19: TLabel
- Left = 8
- Top = 84
- Width = 318
- Height = 53
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'You can send this icon package to your friends per e-mail, or ca' +
- 'n install it again at a later time.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label20: TLabel
- Left = 8
- Top = 156
- Width = 318
- Height = 20
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'Click Next to continue.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object chkNoShowWelcome: TCheckBox
- Left = 8
- Top = 275
- Width = 305
- Height = 17
- Anchors = [akLeft, akBottom]
- Caption = 'Do not show introduction at next start'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = chkNoShowWelcomeClick
- end
- end
- object tsAuthor: TTabSheet
- Caption = 'Author'
- ImageIndex = 1
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label3: TLabel
- Left = 8
- Top = 207
- Width = 98
- Height = 13
- Caption = '&Website (optional):'
- FocusControl = txtWebSite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 8
- Top = 151
- Width = 123
- Height = 13
- Caption = '&E-mail address (optional):'
- FocusControl = txtEmail
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 8
- Top = 95
- Width = 135
- Height = 13
- Caption = '&Author (optional):'
- FocusControl = txtAuthor
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Label6: TLabel
- Left = 8
- Top = 40
- Width = 318
- Height = 41
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'You can provide information about yourself here, which will be s' +
- 'aved in the icon package. This information is optional.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label13: TLabel
- Left = 8
- Top = 8
- Width = 337
- Height = 25
- AutoSize = False
- Caption = 'Information on the author'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label21: TLabel
- Left = 8
- Top = 276
- Width = 297
- Height = 29
- AutoSize = False
- Caption = 'Click Next to specify a name and description for the package.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object txtWebSite: TEdit
- Left = 8
- Top = 223
- Width = 302
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 2
- end
- object txtEmail: TEdit
- Left = 8
- Top = 167
- Width = 302
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 1
- end
- object txtAuthor: TEdit
- Left = 8
- Top = 112
- Width = 301
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- end
- object tsDesc: TTabSheet
- Caption = 'Description'
- ImageIndex = 2
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label4: TLabel
- Left = 8
- Top = 151
- Width = 117
- Height = 13
- Caption = '&Description (optional):'
- FocusControl = Memo1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Label7: TLabel
- Left = 8
- Top = 40
- Width = 318
- Height = 41
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'Enter a descriptive name for your icon package in the box Packag' +
- 'e name. You can also enter a description for the package in the ' +
- 'Description box.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label14: TLabel
- Left = 8
- Top = 8
- Width = 337
- Height = 25
- AutoSize = False
- Caption = 'Package name and description'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label9: TLabel
- Left = 8
- Top = 95
- Width = 139
- Height = 13
- Caption = '&Package name:'
- FocusControl = txtPackageName
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Memo1: TMemo
- Left = 8
- Top = 167
- Width = 302
- Height = 131
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 1000
- TabOrder = 1
- end
- object txtPackageName: TEdit
- Left = 8
- Top = 112
- Width = 302
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- end
- object tsGeneral: TTabSheet
- Caption = 'General'
- ImageIndex = 3
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label8: TLabel
- Left = 8
- Top = 40
- Width = 324
- Height = 47
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'Specify whether you want to have the size of the package optimiz' +
- 'ed by automatically excluding non-standard icons and icon sizes ' +
- 'here.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label10: TLabel
- Left = 27
- Top = 174
- Width = 293
- Height = 62
- AutoSize = False
- Caption =
- 'All icons that are not in a standard size (16x16, 24x24, 32x32 a' +
- 'nd 48x48 in 16 colors, 256 colors and 16.7 million colors with s' +
- 'hadow) will not be added to the icon package.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label15: TLabel
- Left = 8
- Top = 8
- Width = 363
- Height = 23
- AutoSize = False
- Caption = 'Optimize package size'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label23: TLabel
- Left = 27
- Top = 116
- Width = 288
- Height = 30
- AutoSize = False
- Caption =
- 'All icons that have not been changed will not be added to the ic' +
- 'on package.'
- WordWrap = True
- end
- object CheckBox2: TCheckBox
- Left = 8
- Top = 156
- Width = 311
- Height = 15
- Caption = 'Exclude non-standard icon sizes'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 3487029
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- State = cbChecked
- TabOrder = 1
- OnClick = CheckBox2Click
- end
- object CheckBox3: TTUCheckBox
- Left = 8
- Top = 99
- Width = 304
- Height = 17
- Caption = 'Exclude standard icons'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 3487029
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- State = cbChecked
- TabOrder = 0
- OnClick = CheckBox3Click
- end
- end
- object tsProgress: TTabSheet
- Caption = 'Progress'
- ImageIndex = 4
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label16: TLabel
- Left = 8
- Top = 8
- Width = 324
- Height = 25
- AutoSize = False
- Caption = 'Creating icon package...'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label18: TLabel
- Left = 8
- Top = 40
- Width = 318
- Height = 41
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'Please wait while the icon package is created. This will take a ' +
- 'few moments depending on the speed of your computer.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label24: TLabel
- Left = 8
- Top = 92
- Width = 318
- Height = 18
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'Tasks:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 526344
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object lblCreationFinishedIntro: TLabel
- Left = 8
- Top = 276
- Width = 321
- Height = 24
- AutoSize = False
- Caption = 'Please click Next to continue.'
- Visible = False
- WordWrap = True
- end
- object Progress: TProgressBar
- Left = 7
- Top = 201
- Width = 324
- Height = 16
- Min = 0
- Max = 100
- Position = 100
- TabOrder = 0
- end
- object SearchList: TListView
- Left = 8
- Top = 113
- Width = 321
- Height = 82
- BorderStyle = bsNone
- Columns = <
- item
- Caption = 'Area'
- Width = 307
- end>
- HideSelection = False
- IconOptions.WrapText = False
- ReadOnly = True
- ShowColumnHeaders = False
- TabOrder = 1
- ViewStyle = vsReport
- end
- end
- object tsFinal: TTabSheet
- Caption = 'Final'
- ImageIndex = 5
- TabVisible = False
- DesignSize = (
- 339
- 309)
- object Label11: TLabel
- Left = 8
- Top = 40
- Width = 314
- Height = 41
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption =
- 'The icon package was created successfully. Click Finish to close' +
- ' the wizard.'
- WordWrap = True
- end
- object Label17: TLabel
- Left = 8
- Top = 8
- Width = 337
- Height = 25
- AutoSize = False
- Caption = 'Complete the wizard'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label22: TLabel
- Left = 8
- Top = 256
- Width = 205
- Height = 45
- AutoSize = False
- Caption = 'Click Open Folder to show the location of the new package.'
- WordWrap = True
- end
- object btnShowFolder: TButton
- Left = 220
- Top = 257
- Width = 105
- Height = 23
- Caption = 'Open &Folder...'
- TabOrder = 0
- Visible = False
- OnClick = btnShowFolderClick
- end
- end
- end
- end
- object BlinkTimer: TTimer
- Enabled = False
- OnTimer = BlinkTimerTimer
- Left = 63
- Top = 331
- end
- end
-