PC World Komputer 1998 January/Pcwk0198.iso/Zadarmo/BITMAP/_SETUP.1/Bitmap.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1997-08-17 | 5KB | 249 lines

object Form1: TForm1
  Left = 192
  Top = 108
  BorderStyle = bsSingle
  Caption = 'Bitmap Browser v1.00 - Created by Stefan de Zeeuw'
  ClientHeight = 464
  ClientWidth = 592
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object Label7: TLabel
    Left = 240
    Top = 376
    Width = 20
    Height = 13
    Caption = '25%'
  end
  object Label9: TLabel
    Left = 304
    Top = 376
    Width = 26
    Height = 13
    Caption = '100%'
  end
  object Label11: TLabel
    Left = 368
    Top = 376
    Width = 26
    Height = 13
    Caption = '400%'
  end
  object AVIControl1: TAVIControl
    Left = 400
    Top = 344
    Width = 193
    Height = 49
    FrameTo = 12
    ZStatus = 'OK'
  end
  object Panel1: TPanel
    Left = 344
    Top = 392
    Width = 249
    Height = 73
    TabOrder = 11
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 45
      Height = 13
      Caption = 'Filename:'
    end
    object Label2: TLabel
      Left = 8
      Top = 24
      Width = 37
      Height = 13
      Caption = 'Filesize:'
    end
    object Label4: TLabel
      Left = 72
      Top = 8
      Width = 56
      Height = 13
      Caption = 'Unavailable'
    end
    object Label5: TLabel
      Left = 72
      Top = 24
      Width = 56
      Height = 13
      Caption = 'Unavailable'
    end
    object Label6: TLabel
      Left = 72
      Top = 40
      Width = 56
      Height = 13
      Caption = 'Unavailable'
    end
    object Label3: TLabel
      Left = 8
      Top = 40
      Width = 53
      Height = 13
      Caption = 'Image size:'
    end
    object Label8: TLabel
      Left = 8
      Top = 56
      Width = 56
      Height = 13
      Caption = 'Zoomed by:'
    end
    object Label10: TLabel
      Left = 72
      Top = 56
      Width = 56
      Height = 13
      Caption = 'Unavailable'
    end
  end
  object ScrollBox1: TScrollBox
    Left = 160
    Top = 8
    Width = 425
    Height = 329
    AutoScroll = False
    Color = clNavy
    ParentColor = False
    TabOrder = 0
    object Image1: TImage
      Left = 0
      Top = 0
      Width = 421
      Height = 325
      AutoSize = True
      Picture.Data = {<image001.bmp>}
      Stretch = True
      OnMouseDown = Image1MouseDown
      OnMouseMove = Image1MouseMove
      OnMouseUp = Image1MouseUp
    end
  end
  object DriveComboBox1: TDriveComboBox
    Left = 8
    Top = 8
    Width = 145
    Height = 19
    DirList = DirectoryListBox1
    TabOrder = 1
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 8
    Top = 32
    Width = 145
    Height = 193
    FileList = FileListBox1
    ItemHeight = 16
    TabOrder = 2
  end
  object FileListBox1: TFileListBox
    Left = 8
    Top = 232
    Width = 145
    Height = 177
    ItemHeight = 13
    Mask =
      '*.jpg;*.jif;*.gif;*.bmp;*.dib;*.rle;*.tga;*.pcx;*.ico;*.emf;*.wm' +
      'f'
    TabOrder = 3
    OnClick = FileListBox1Click
  end
  object FilterComboBox1: TFilterComboBox
    Left = 8
    Top = 416
    Width = 145
    Height = 21
    FileList = FileListBox1
    Filter =
      'Supported Bitmaps|*.jpg;*.jif;*.gif;*.bmp;*.dib;*.rle;*.tga;*.pc' +
      'x;*.ico;*.emf;*.wmf|All Files|*.*|JPG Files|*.jpg|JIF Files|*.ji' +
      'f|GIF Files|*.gif|BMP Files|*.bmp|DIB Files|*.dib|RLE Files|*.rl' +
      'e|TGA Files|*.tga|PCX Files|*.pcx|ICO Files|*.ico|WMF Files|*.wm' +
      'f|EMF Files|*.emf'
    TabOrder = 4
  end
  object Button1: TButton
    Left = 160
    Top = 352
    Width = 75
    Height = 25
    Caption = 'F&ullscreen'
    Enabled = False
    TabOrder = 5
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 160
    Top = 384
    Width = 75
    Height = 25
    Caption = '&About'
    TabOrder = 6
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 160
    Top = 416
    Width = 75
    Height = 25
    Caption = 'E&xit'
    TabOrder = 7
    OnClick = Button3Click
  end
  object CheckBox1: TCheckBox
    Left = 248
    Top = 392
    Width = 65
    Height = 17
    Caption = '&Stretch'
    Enabled = False
    TabOrder = 8
    OnClick = CheckBox1Click
  end
  object TrackBar1: TTrackBar
    Left = 240
    Top = 344
    Width = 150
    Height = 33
    Enabled = False
    Max = 6
    Orientation = trHorizontal
    PageSize = 1
    Frequency = 1
    Position = 3
    SelEnd = 0
    SelStart = 0
    TabOrder = 9
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = TrackBar1Change
  end
  object TitleBar1: TTitleBar
    Alignment = taCenter
    ApplicationInfo.FontStyle = [fsBold]
    CompanyInfo.FontStyle = [fsBold, fsItalic]
    NbOfColors = 0
    Left = 264
    Top = 432
  end
  object DropFile1: TDropFile
    DropTarget = ScrollBox1
    OnDropFile = DropFile1DropFile
    Left = 296
    Top = 432
  end
end