Chip 1999 January/Chip_1999-01_cd.bin/zkuste/delphi/QDB/ANIMALS.ZIP/ani_main.dfm/ani_main.txt

Text File | 1998-06-28 | 4KB | 191 lines

object ani_form: Tani_form
  Left = 244
  Top = 152
  Width = 583
  Height = 348
  BorderIcons = [biMinimize]
  Caption = 'Animals Demo'
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 120
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  TextHeight = 20
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 575
    Height = 51
    Hint = 'As adapted from dBASE for Windows'
    Align = alTop
    Caption = 'Animals of the World'
    Font.Color = clNavy
    Font.Height = -30
    Font.Name = 'Arial'
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 0
    Top = 51
    Width = 575
    Height = 222
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object Label1: TLabel
      Left = 38
      Top = 18
      Width = 49
      Height = 20
      Caption = 'Name'
      Font.Color = clNavy
      Font.Height = -17
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 51
      Top = 55
      Width = 38
      Height = 20
      Caption = 'Size'
      Font.Color = clNavy
      Font.Height = -17
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 29
      Top = 95
      Width = 59
      Height = 20
      Caption = 'Weight'
      Font.Color = clNavy
      Font.Height = -17
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 15
      Top = 135
      Width = 72
      Height = 20
      Caption = 'Found in'
      Font.Color = clNavy
      Font.Height = -17
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Image1: TImage
      Left = 340
      Top = 20
      Width = 211
      Height = 181
      Stretch = True
    end
    object Panel3: TPanel
      Left = 9
      Top = 174
      Width = 309
      Height = 40
      Hint = 'Navigator'
      BevelInner = bvRaised
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      object QDBNavigator1: TQDBNavigator
        Left = 32
        Top = 8
        Width = 248
        Height = 25
        Ctl3D = True
        ParentCtl3D = False
        QDB = QDB1
        TabOrder = 0
        VisibleButtons = [nbFirst, nbPrev, nbNext, nbLast]
      end
    end
    object Edit1: TEdit
      Left = 100
      Top = 10
      Width = 151
      Height = 28
      ReadOnly = True
      TabOrder = 1
    end
    object Edit2: TEdit
      Left = 100
      Top = 50
      Width = 151
      Height = 28
      ReadOnly = True
      TabOrder = 2
    end
    object Edit3: TEdit
      Left = 100
      Top = 90
      Width = 151
      Height = 28
      ReadOnly = True
      TabOrder = 3
    end
    object Edit4: TEdit
      Left = 100
      Top = 130
      Width = 201
      Height = 28
      ReadOnly = True
      TabOrder = 4
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 273
    Width = 575
    Height = 51
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    object BitBtn1: TBitBtn
      Left = 421
      Top = 8
      Width = 75
      Height = 36
      Caption = 'E&xit'
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Kind = bkClose
    end
  end
  object QDB1: TQDB
    AboutAuthor = 'Robert R. Marsh, SJ -- [e-mail]'
    AboutVersion = '2.10'
    AggressiveUpdate = False
    CacheFrequency = 0
    CacheSize = 16384
    Compression = False
    ReadOnly = True
    SaveOnClose = True
    ExpandedFileNames = True
    UseGrepMatch = False
    OnNavigate = QDB1Navigate
    Left = 272
    Top = 65
  end
end