PC World Komputer 1999 January/pcwk_01_1999.iso/Top100sh/Internet/Htmltool/HTMLTOOL.exe/0/RCDATA/TFRMOPTIONS/TFRMOPTIONS.txt

Text File | 1998-01-30 | 11.0 KB | 442 lines

object FrmOptions: TFrmOptions
  Left = 241
  Top = 202
  BorderStyle = bsDialog
  Caption = 'Options'
  ClientHeight = 233
  ClientWidth = 313
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnOK: TButton
    Left = 120
    Top = 200
    Width = 89
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object btnCancel: TButton
    Left = 216
    Top = 200
    Width = 89
    Height = 25
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object tnbOptions: TTabbedNotebook
    Left = 8
    Top = 8
    Width = 297
    Height = 185
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 2
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'General'
      object cbTipAssistant: TCheckBox
        Left = 8
        Top = 88
        Width = 161
        Height = 17
        Hint = 'Do you want to see the Tip Assistant every startup ?'
        Caption = ' Show &Tip Assistant at startup'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object cbNewDoc: TCheckBox
        Left = 8
        Top = 64
        Width = 163
        Height = 17
        Hint = 'Open a new document at startup ?'
        Caption = ' &New document at startup'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object cbLowerCase: TCheckBox
        Left = 8
        Top = 40
        Width = 153
        Height = 17
        Hint = 'Indicates whether to insert all tags lowercase or not'
        Caption = ' Insert tags &lowercase'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object cbWordWrap: TCheckBox
        Left = 8
        Top = 16
        Width = 81
        Height = 17
        Caption = ' &Word wrap'
        ParentShowHint = False
        ShowHint = False
        TabOrder = 3
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Toolbars'
      object cbStandard: TCheckBox
        Left = 8
        Top = 16
        Width = 113
        Height = 17
        Hint = 'Indicates whether to show the Standard Speedbar or not'
        Caption = ' &Standard Speedbar'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object cbQuickHTML: TCheckBox
        Left = 8
        Top = 40
        Width = 137
        Height = 17
        Hint = 'Indicates whether to show the Quick HTML Toolbar or not'
        Caption = ' &Quick HTML Toolbar'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object cbTags: TCheckBox
        Left = 8
        Top = 64
        Width = 121
        Height = 17
        Hint = 'Indicates whether to show the Tags Toolbar or not'
        Caption = ' HTML &Tags'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object cbColors: TCheckBox
        Left = 8
        Top = 88
        Width = 97
        Height = 17
        Hint = 'Indicates whether to show the Color Speedbar or not'
        Caption = ' &Color Speedbar'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
      object cbStatusLine: TCheckBox
        Left = 8
        Top = 112
        Width = 80
        Height = 17
        Hint = 'Indicates whether to show the Status Line or not'
        Caption = ' Status &Line'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Browser'
      object lblBrowserPath: TLabel
        Left = 8
        Top = 16
        Width = 22
        Height = 13
        Caption = 'Path'
        FocusControl = EditBrowser
      end
      object EditBrowser: TEdit
        Left = 8
        Top = 40
        Width = 273
        Height = 21
        Hint = 'Path of browser to use with '#39'Preview'#39' funtion'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object btnBrowse: TBitBtn
        Left = 192
        Top = 72
        Width = 89
        Height = 22
        Hint = 'Browse for a file on the local computer'
        Caption = 'B&rowse ...'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = btnBrowseClick
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000000000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          77777777777777777777000000000007777700333333333077770B0333333333
          07770FB03333333330770BFB0333333333070FBFB000000000000BFBFBFBFB07
          77770FBFBFBFBF0777770BFB0000000777777000777777770007777777777777
          7007777777770777070777777777700077777777777777777777}
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Help File'
      object lblExternalHelpFilePath: TLabel
        Left = 8
        Top = 16
        Width = 22
        Height = 13
        Caption = 'Path'
        FocusControl = EditExternalHelpFile
      end
      object lblCaption: TLabel
        Left = 8
        Top = 100
        Width = 36
        Height = 13
        Caption = 'Caption'
        FocusControl = EditCaption
      end
      object EditExternalHelpFile: TEdit
        Left = 8
        Top = 40
        Width = 273
        Height = 21
        Hint = 'The help file that will be called when F1 is pressed'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnChange = EditExternalHelpFileChange
      end
      object EditCaption: TEdit
        Left = 8
        Top = 124
        Width = 273
        Height = 21
        Hint =
          'Text to appear in the help menu for the menu item that calls the' +
          ' help file'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object btnBrowse2: TBitBtn
        Left = 192
        Top = 72
        Width = 89
        Height = 22
        Caption = 'Browse ...'
        TabOrder = 2
        OnClick = btnBrowse2Click
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000000000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          77777777777777777777000000000007777700333333333077770B0333333333
          07770FB03333333330770BFB0333333333070FBFB000000000000BFBFBFBFB07
          77770FBFBFBFBF0777770BFB0000000777777000777777770007777777777777
          7007777777770777070777777777700077777777777777777777}
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Filer'
      object Align: TLabel
        Left = 8
        Top = 72
        Width = 46
        Height = 13
        Caption = 'Alignment'
      end
      object cbImages: TCheckBox
        Left = 8
        Top = 16
        Width = 161
        Height = 17
        Hint = 'use the <IMG> tag instead of <A> (only for images)'
        Caption = ' Use <&IMG> tag with images'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object cbText: TCheckBox
        Left = 8
        Top = 40
        Width = 97
        Height = 17
        Hint =
          'don'#39't use the <A> tag with text files, but insert their content ' +
          'in the current file'
        Caption = ' Insert &text files'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object rbLeft: TRadioButton
        Left = 64
        Top = 72
        Width = 57
        Height = 17
        Caption = '&Left'
        TabOrder = 2
      end
      object rbRight: TRadioButton
        Left = 64
        Top = 88
        Width = 57
        Height = 17
        Caption = '&Right'
        TabOrder = 3
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Font'
      object btnFont: TButton
        Left = 8
        Top = 16
        Width = 75
        Height = 25
        Caption = '&Font'
        TabOrder = 0
        OnClick = btnFontClick
      end
      object btnColor: TButton
        Left = 8
        Top = 48
        Width = 75
        Height = 25
        Caption = '&Color'
        TabOrder = 1
        OnClick = btnColorClick
      end
      object btnBackground: TButton
        Left = 8
        Top = 80
        Width = 75
        Height = 25
        Caption = 'Background'
        TabOrder = 2
        OnClick = btnBackgroundClick
      end
      object Memo: TMemo
        Left = 96
        Top = 16
        Width = 185
        Height = 129
        TabStop = False
        Lines.Strings = (
          '<HTML><HEAD></HEAD>'
          '<BODY>'
          'This is some sample text to show how '
          'it will look like in every window <BR>'
          '</BODY>'
          '</HTML>')
        ReadOnly = True
        TabOrder = 3
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Other'
      object lblAutoSave: TLabel
        Left = 8
        Top = 16
        Width = 72
        Height = 13
        Caption = ' &Autosave after'
        FocusControl = seMinutes
      end
      object lblMinutes: TLabel
        Left = 149
        Top = 16
        Width = 36
        Height = 13
        Caption = 'minutes'
      end
      object seMinutes: TSpinEdit
        Left = 88
        Top = 16
        Width = 49
        Height = 22
        Hint = 'enter 0 to disable autosaving'
        MaxValue = 1000
        MinValue = 0
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Value = 0
      end
      object cbLimitFileSize: TCheckBox
        Left = 8
        Top = 48
        Width = 97
        Height = 17
        Hint =
          'Indicates whether to limit the maximum size of files to edit. Ch' +
          'eck if you have trouble entering text into douments.'
        Caption = '&Limit File Size'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
    end
  end
  object DlgBrowser: TOpenDialog
    DefaultExt = 'exe'
    FileEditStyle = fsEdit
    FileName = '*.exe'
    Filter = 'Executables|*.exe'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Select a browser'
    Left = 400
    Top = 544
  end
  object DlgHelpFile: TOpenDialog
    DefaultExt = 'hlp'
    FileEditStyle = fsEdit
    FileName = '*.hlp'
    Filter = 'Help files|*.hlp'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Select a help file'
    Left = 472
    Top = 544
  end
  object DlgFont: TFontDialog
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = [fdForceFontExist]
    Left = 20
    Top = 160
  end
  object DlgColor: TColorDialog
    Ctl3D = True
    Left = 52
    Top = 160
  end
end