Chip Hitware 6 A/CHIP_HITWARE6_A.iso/internet/JVDEicq/jvdeicqb.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1999-02-03 | 12.4 KB | 522 lines

object Form1: TForm1
  Left = 165
  Top = 167
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'JVDE ICQ Backup 1.01'
  ClientHeight = 234
  ClientWidth = 361
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object ProgressBar1: TProgressBar
    Left = 0
    Top = 217
    Width = 361
    Height = 17
    Align = alBottom
    Min = 0
    Max = 100
    ParentShowHint = False
    Smooth = True
    ShowHint = True
    TabOrder = 1
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 361
    Height = 217
    ActivePage = TabSheet1
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    HotTrack = True
    MultiLine = True
    ParentFont = False
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '&Welcome'
      OnMouseMove = TabSheet1MouseMove
      object Label6: TLabel
        Left = 128
        Top = 56
        Width = 3
        Height = 13
      end
      object Image1: TImage
        Left = 0
        Top = 0
        Width = 353
        Height = 81
        Picture.Data = {<image001.jpg>}
      end
      object Image2: TImage
        Left = 59
        Top = 96
        Width = 22
        Height = 20
        Cursor = crHandPoint
        Picture.Data = {<image002.jpg>}
        OnClick = Image2Click
        OnMouseMove = Image2MouseMove
      end
      object Label1: TLabel
        Left = 88
        Top = 98
        Width = 73
        Height = 13
        Cursor = crHandPoint
        Caption = 'Report a bug'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        OnClick = Label1Click
        OnMouseMove = Label1MouseMove
      end
      object Image3: TImage
        Left = 59
        Top = 120
        Width = 22
        Height = 20
        Cursor = crHandPoint
        Picture.Data = {<image003.jpg>}
        OnClick = Image3Click
        OnMouseMove = Image3MouseMove
      end
      object Label7: TLabel
        Left = 88
        Top = 122
        Width = 162
        Height = 13
        Cursor = crHandPoint
        Caption = 'Visit JVDE Software webpage'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        OnClick = Label7Click
        OnMouseMove = Label7MouseMove
      end
      object Image4: TImage
        Left = 59
        Top = 144
        Width = 22
        Height = 20
        Cursor = crHandPoint
        Picture.Data = {<image004.jpg>}
        OnClick = Image4Click
        OnMouseMove = Image4MouseMove
      end
      object Label8: TLabel
        Left = 88
        Top = 146
        Width = 47
        Height = 13
        Cursor = crHandPoint
        Caption = 'Help File'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        OnClick = Label8Click
        OnMouseMove = Label8MouseMove
      end
      object Label9: TLabel
        Left = 200
        Top = 176
        Width = 151
        Height = 13
        Caption = 'Created by Jeroen van de Erve'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = '&ICQ Directory'
      ImageIndex = 1
      object Label2: TLabel
        Left = 24
        Top = 8
        Width = 93
        Height = 16
        Caption = 'ICQ Directory'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 24
        Top = 160
        Width = 130
        Height = 13
        Caption = 'No ICQ Directory Found'
        Font.Charset = ANSI_CHARSET
        Font.Color = clTeal
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object DriveComboBox1: TDriveComboBox
        Left = 24
        Top = 40
        Width = 177
        Height = 19
        DirList = DirectoryListBox1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object DirectoryListBox1: TDirectoryListBox
        Left = 24
        Top = 64
        Width = 257
        Height = 89
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ItemHeight = 16
        ParentFont = False
        TabOrder = 1
        OnChange = DirectoryListBox1Change
      end
    end
    object TabSheet3: TTabSheet
      Caption = '&Backup Directory'
      ImageIndex = 2
      object Label4: TLabel
        Left = 24
        Top = 8
        Width = 111
        Height = 16
        Caption = 'Backup Directory'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object DriveComboBox2: TDriveComboBox
        Left = 24
        Top = 40
        Width = 177
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object DirectoryListBox2: TDirectoryListBox
        Left = 24
        Top = 64
        Width = 249
        Height = 89
        FileList = FileListBox1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ItemHeight = 16
        ParentFont = False
        TabOrder = 1
      end
      object Button1: TButton
        Left = 24
        Top = 160
        Width = 89
        Height = 25
        Hint = 'Create a Directory'
        Caption = 'Create Directory'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 120
        Top = 160
        Width = 97
        Height = 25
        Hint = 'Remove a Directory'
        Caption = 'Remove Directory'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = Button2Click
      end
      object FileListBox1: TFileListBox
        Left = 288
        Top = 64
        Width = 49
        Height = 81
        ItemHeight = 13
        TabOrder = 4
        Visible = False
      end
    end
    object TabSheet4: TTabSheet
      Caption = '&Start'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ImageIndex = 3
      ParentFont = False
      object Button3: TButton
        Left = 96
        Top = 160
        Width = 145
        Height = 25
        Caption = 'Backup It !'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button3Click
      end
      object GroupBox1: TGroupBox
        Left = 184
        Top = 8
        Width = 161
        Height = 57
        Caption = 'ICQ 98 or 99'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        object RadioButton1: TRadioButton
          Left = 16
          Top = 16
          Width = 113
          Height = 17
          Caption = 'ICQ 98'
          TabOrder = 0
        end
        object RadioButton2: TRadioButton
          Left = 16
          Top = 32
          Width = 97
          Height = 17
          Caption = 'ICQ 99'
          TabOrder = 1
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 8
        Width = 161
        Height = 57
        Caption = 'Backup Filename:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        object Edit1: TEdit
          Left = 16
          Top = 24
          Width = 137
          Height = 21
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          Text = 'icqbackup.zip'
        end
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 72
        Width = 161
        Height = 73
        Caption = 'Compression Level:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        object Label5: TLabel
          Left = 56
          Top = 32
          Width = 90
          Height = 13
          Caption = '(max = 9  min = 0)'
        end
        object UpDown1: TUpDown
          Left = 33
          Top = 32
          Width = 16
          Height = 21
          Associate = Edit2
          Min = 0
          Max = 9
          Position = 9
          TabOrder = 0
          Wrap = False
        end
        object Edit2: TEdit
          Left = 16
          Top = 32
          Width = 17
          Height = 21
          MaxLength = 1
          TabOrder = 1
          Text = '9'
        end
      end
      object GroupBox4: TGroupBox
        Left = 184
        Top = 72
        Width = 161
        Height = 73
        Caption = 'Backup'
        TabOrder = 4
        object CheckBox1: TCheckBox
          Left = 16
          Top = 16
          Width = 113
          Height = 17
          Caption = 'UIN(s)'
          TabOrder = 0
        end
        object CheckBox2: TCheckBox
          Left = 16
          Top = 32
          Width = 113
          Height = 17
          Caption = 'Contact List(s)'
          TabOrder = 1
        end
        object CheckBox3: TCheckBox
          Left = 16
          Top = 48
          Width = 129
          Height = 17
          Caption = 'Bookmarks'
          TabOrder = 2
        end
      end
      object FileListBox2: TFileListBox
        Left = 312
        Top = 160
        Width = 25
        Height = 9
        ItemHeight = 13
        TabOrder = 5
        Visible = False
      end
    end
  end
  object ZipMaster1: TZipMaster
    Verbose = False
    Trace = False
    AddCompLevel = 9
    AddOptions = [AddZipTime]
    ExtrOptions = [ExtrOverWrite]
    Unattended = False
    SFXOverWriteMode = OvrConfirm
    SFXCaption = 'Self-extracting Archive'
    KeepFreeOnDisk1 = 0
    OnProgress = ZipMaster1Progress
    Left = 8
    Top = 184
  end
  object MainMenu1: TMainMenu
    Left = 32
    Top = 184
    object File1: TMenuItem
      Caption = '&File'
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Tools1: TMenuItem
      Caption = '&Tools'
      object RestoreWizard1: TMenuItem
        Caption = '&Restore WiZard'
        OnClick = RestoreWizard1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object Contents1: TMenuItem
        Caption = '&Contents'
        ShortCut = 112
        OnClick = Contents1Click
      end
      object About1: TMenuItem
        Caption = '&About...'
        OnClick = About1Click
      end
    end
  end
end