PC World Plus! (NZ) 2001 June/HDC50.iso/Runimage/Delphi50/Demos/Imagview/IMAGEWIN.DFM/IMAGEWIN.txt

Text File | 1999-08-11 | 4KB | 207 lines

object ImageForm: TImageForm
  Left = 193
  Top = 107
  ActiveControl = FileEdit
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Image Viewer'
  ClientHeight = 315
  ClientWidth = 502
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  Position = poDefaultPosOnly
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 316
    Top = 5
    Width = 171
    Height = 121
  end
  object Bevel2: TBevel
    Left = 317
    Top = 132
    Width = 170
    Height = 177
  end
  object Label1: TLabel
    Left = 325
    Top = 11
    Width = 147
    Height = 13
    AutoSize = False
    Caption = 'Label1'
  end
  object Label2: TLabel
    Left = 324
    Top = 290
    Width = 117
    Height = 13
    Caption = 'Number of Glyphs - '
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 8
    Top = 12
    Width = 148
    Height = 260
    FileList = FileListBox1
    IntegralHeight = True
    ItemHeight = 16
    TabOrder = 1
  end
  object DriveComboBox1: TDriveComboBox
    Left = 9
    Top = 277
    Width = 148
    Height = 19
    DirList = DirectoryListBox1
    TabOrder = 3
  end
  object FileEdit: TEdit
    Left = 166
    Top = 13
    Width = 139
    Height = 21
    TabOrder = 0
    Text = '*.bmp;*.ico;*.wmf;*.emf'
    OnKeyPress = FileEditKeyPress
  end
  object UpDownGroup: TGroupBox
    Left = 323
    Top = 158
    Width = 154
    Height = 60
    Caption = 'Up / Down'
    TabOrder = 5
    object SpeedButton1: TSpeedButton
      Left = 116
      Top = 26
      Width = 25
      Height = 25
      AllowAllUp = True
      GroupIndex = 1
    end
    object BitBtn1: TBitBtn
      Left = 12
      Top = 18
      Width = 92
      Height = 33
      Caption = 'BitBtn1'
      TabOrder = 0
    end
  end
  object DisabledGrp: TGroupBox
    Left = 323
    Top = 220
    Width = 154
    Height = 60
    Caption = 'Disabled'
    TabOrder = 7
    object SpeedButton2: TSpeedButton
      Left = 116
      Top = 25
      Width = 25
      Height = 25
      Enabled = False
    end
    object BitBtn2: TBitBtn
      Left = 11
      Top = 18
      Width = 92
      Height = 33
      Caption = 'BitBtn2'
      Enabled = False
      TabOrder = 0
    end
  end
  object Panel1: TPanel
    Left = 324
    Top = 27
    Width = 153
    Height = 68
    BevelInner = bvLowered
    TabOrder = 8
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 149
      Height = 64
      Align = alClient
      IncrementalDisplay = False
    end
  end
  object FileListBox1: TFileListBox
    Left = 166
    Top = 41
    Width = 139
    Height = 227
    FileEdit = FileEdit
    ItemHeight = 13
    Mask = '*.bmp;*.ico;*.wmf;*.emf'
    TabOrder = 2
    OnClick = FileListBox1Click
  end
  object ViewBtn: TBitBtn
    Left = 325
    Top = 98
    Width = 63
    Height = 24
    Caption = '&Full View'
    TabOrder = 6
    OnClick = ViewBtnClick
  end
  object FilterComboBox1: TFilterComboBox
    Left = 166
    Top = 275
    Width = 140
    Height = 21
    FileList = FileListBox1
    Filter =
      'Image Files (*.bmp, *.ico, *.wmf, *.emf)|*.bmp;*.ico;*.wmf;*.emf' +
      '|Bitmap Files (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Metafiles (*.wmf' +
      ', *.emf)|*.wmf;*.emf|All files (*.*)|*.*'
    TabOrder = 4
  end
  object GlyphCheck: TCheckBox
    Left = 327
    Top = 137
    Width = 104
    Height = 17
    Caption = 'View as Glyph'
    TabOrder = 9
    OnClick = GlyphCheckClick
  end
  object StretchCheck: TCheckBox
    Left = 413
    Top = 96
    Width = 64
    Height = 17
    Caption = 'Stretch'
    TabOrder = 11
    OnClick = StretchCheckClick
  end
  object UpDownEdit: TEdit
    Left = 439
    Top = 286
    Width = 24
    Height = 21
    TabOrder = 10
    Text = '1'
    OnChange = UpDownEditChange
  end
  object UpDown1: TUpDown
    Left = 463
    Top = 286
    Width = 11
    Height = 21
    Associate = UpDownEdit
    Min = 0
    Position = 1
    TabOrder = 12
    Wrap = False
  end
end