Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue29/system/LibExp/LibTestForm.dfm/LibTestForm.txt

Text File | 1997-11-27 | 8.8 KB | 374 lines

object LibExTest: TLibExTest
  Left = 203
  Top = 307
  Width = 498
  Height = 250
  Caption = 'The Amazing LibIntf Exerciser Expert'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object TabSet1: TTabSet
    Left = 0
    Top = 202
    Width = 490
    Height = 21
    Align = alBottom
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnChange = TabSet1Change
  end
  object Notebook1: TNotebook
    Left = 0
    Top = 0
    Width = 490
    Height = 202
    Align = alClient
    TabOrder = 1
    object TPage
      Left = 0
      Top = 0
      Caption = 'Miscellaneous'
      object GroupBox1: TGroupBox
        Left = 10
        Top = 10
        Width = 471
        Height = 183
        Caption = ' Miscellaneous IDE Info '
        TabOrder = 0
        object Label1: TLabel
          Left = 12
          Top = 24
          Width = 131
          Height = 13
          Caption = 'Delphi 3 Base Registry Key:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label5: TLabel
          Left = 12
          Top = 83
          Width = 104
          Height = 13
          Caption = 'Path and Base Name:'
        end
        object PathAndBaseName: TLabel
          Left = 12
          Top = 99
          Width = 109
          Height = 13
          Caption = 'PathAndBaseName'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label7: TLabel
          Left = 12
          Top = 131
          Width = 133
          Height = 13
          Caption = 'Delphi IDE Window Handle:'
        end
        object AppHandle: TLabel
          Left = 12
          Top = 147
          Width = 63
          Height = 13
          Caption = 'AppHandle'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label8: TLabel
          Left = 268
          Top = 83
          Width = 63
          Height = 13
          Caption = 'Current Time:'
        end
        object IDETime: TLabel
          Left = 268
          Top = 99
          Width = 49
          Height = 13
          Caption = 'IDETime'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label9: TLabel
          Left = 268
          Top = 131
          Width = 124
          Height = 13
          Caption = 'Delphi Main Window Size:'
        end
        object WinSize: TLabel
          Left = 268
          Top = 147
          Width = 47
          Height = 13
          Caption = 'WinSize'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object BaseReg: TEdit
          Left = 12
          Top = 41
          Width = 245
          Height = 21
          TabOrder = 0
          Text = 'BaseReg'
        end
        object cbLockState: TCheckBox
          Left = 324
          Top = 43
          Width = 97
          Height = 17
          Caption = 'Lock State'
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Form Designer'
      object GroupBox2: TGroupBox
        Left = 10
        Top = 10
        Width = 471
        Height = 183
        Caption = ' Form Designer Options '
        TabOrder = 0
        object Label6: TLabel
          Left = 246
          Top = 30
          Width = 52
          Height = 13
          Caption = 'Grid Size &X'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 246
          Top = 56
          Width = 52
          Height = 13
          Caption = 'Grid Size &Y'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object DisplayGrid: TCheckBox
          Left = 11
          Top = 22
          Width = 97
          Height = 17
          Caption = 'Display &grid'
          TabOrder = 0
        end
        object SnapToGrid: TCheckBox
          Left = 11
          Top = 42
          Width = 97
          Height = 17
          Caption = 'Sna&p to grid'
          TabOrder = 1
        end
        object ShowComponentCaptions: TCheckBox
          Left = 11
          Top = 62
          Width = 150
          Height = 17
          Caption = 'Sho&w component captions'
          TabOrder = 2
        end
        object GridSizeX: TEdit
          Left = 311
          Top = 26
          Width = 66
          Height = 21
          TabOrder = 3
          Text = 'GridSizeX'
        end
        object GridSizeY: TEdit
          Left = 311
          Top = 53
          Width = 66
          Height = 21
          TabOrder = 4
          Text = 'GridSizeY'
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Palette Info'
      object GroupBox5: TGroupBox
        Left = 9
        Top = 9
        Width = 240
        Height = 184
        Caption = ' Palette Item Bitmaps '
        TabOrder = 0
        object Image2: TImage
          Left = 191
          Top = 28
          Width = 28
          Height = 28
          Visible = False
        end
        object Label4: TLabel
          Left = 19
          Top = 83
          Width = 149
          Height = 13
          Caption = 'Currently Selected Palette Icon:'
        end
        object Image1: TImage
          Left = 191
          Top = 75
          Width = 28
          Height = 28
        end
        object ComboBox1: TComboBox
          Left = 20
          Top = 32
          Width = 145
          Height = 21
          ItemHeight = 13
          Items.Strings = (
            'TMainMenu'
            'TPopupMenu'
            'TLabel'
            'TEdit'
            'TMemo'
            'TButton'
            'TCheckBox'
            'TRadioButton'
            'TListBox'
            'TComboBox'
            'TScrollBar'
            'TGroupBox'
            'TRadioGroup'
            'TPanel')
          TabOrder = 0
          OnChange = ComboBox1Change
        end
      end
      object GroupBox4: TGroupBox
        Left = 257
        Top = 9
        Width = 224
        Height = 184
        Caption = ' Palette Class Help '
        TabOrder = 1
        object Label2: TLabel
          Left = 12
          Top = 26
          Width = 157
          Height = 13
          Caption = 'Enter a class name and click OK:'
        end
        object HelpClassName: TEdit
          Left = 11
          Top = 49
          Width = 198
          Height = 21
          TabOrder = 0
          OnChange = HelpClassNameChange
        end
        object ClassHelpOK: TButton
          Left = 134
          Top = 140
          Width = 75
          Height = 21
          Caption = '&OK'
          Enabled = False
          TabOrder = 1
          OnClick = ClassHelpOKClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Standard Dialogs'
      object GroupBox3: TGroupBox
        Left = 9
        Top = 9
        Width = 472
        Height = 184
        Caption = ' Delphi IDE Standard Dialogs '
        TabOrder = 0
        object Label10: TLabel
          Left = 20
          Top = 40
          Width = 101
          Height = 13
          Caption = 'Wanted Dialog Type:'
        end
        object ComboBox2: TComboBox
          Left = 132
          Top = 36
          Width = 145
          Height = 21
          ItemHeight = 13
          Items.Strings = (
            'Align'
            'Size'
            'Scale'
            'Tab Order'
            'Creation Order'
            'Save Template')
          TabOrder = 0
        end
        object Button1: TButton
          Left = 135
          Top = 80
          Width = 146
          Height = 25
          Caption = 'E&xecute Dialog'
          TabOrder = 1
          OnClick = Button1Click
        end
      end
    end
  end
end