object MainForm: TMainForm
  Left = 216
  Top = 168
  ActiveControl = FontListBox
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Font Sampler'
  ClientHeight = 263
  ClientWidth = 346
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Bevel1: TBevel
    Left = 216
    Top = 8
    Width = 17
    Height = 241
    Shape = bsLeftLine
  end
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 96
    Height = 16
    Caption = 'Installed fonts:'
  end
  object FontListBox: TListBox
    Left = 16
    Top = 24
    Width = 185
    Height = 212
    IntegralHeight = True
    ItemHeight = 16
    MultiSelect = True
    Sorted = True
    TabOrder = 3
  end
  object SelectAllBitBtn: TBitBtn
    Left = 240
    Top = 48
    Width = 89
    Height = 33
    Caption = '&Select all'
    TabOrder = 0
    OnClick = SelectAllBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333FFF33FFFFF33333300033000
      00333337773377777333333330333300033333337FF33777F333333330733300
      0333333377FFF777F33333333700000073333333777777773333333333033000
      3333333337FF777F333333333307300033333333377F777F3333333333703007
      33333333377F7773333333333330000333333333337777F33333333333300003
      33333333337777F3333333333337007333333333337777333333333333330033
      3333333333377333333333333333033333333333333733333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object PrintBitBtn: TBitBtn
    Left = 240
    Top = 128
    Width = 89
    Height = 33
    Caption = '&Print...'
    TabOrder = 1
    OnClick = PrintBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object CloseBitBtn: TBitBtn
    Left = 240
    Top = 216
    Width = 89
    Height = 33
    TabOrder = 2
    Kind = bkClose
  end
  object PreviewBitBtn: TBitBtn
    Left = 240
    Top = 88
    Width = 89
    Height = 33
    Caption = 'Pre&view'
    TabOrder = 4
    OnClick = PreviewBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
      0000333377777777777733330FFFFFFFFFF033337F3FFF3F3FF733330F000F0F
      00F033337F777373773733330FFFFFFFFFF033337F3FF3FF3FF733330F00F00F
      00F033337F773773773733330FFFFFFFFFF033337FF3333FF3F7333300FFFF00
      F0F03333773FF377F7373330FB00F0F0FFF0333733773737F3F7330FB0BF0FB0
      F0F0337337337337373730FBFBF0FB0FFFF037F333373373333730BFBF0FB0FF
      FFF037F3337337333FF700FBFBFB0FFF000077F333337FF37777E0BFBFB000FF
      0FF077FF3337773F7F37EE0BFB0BFB0F0F03777FF3733F737F73EEE0BFBF00FF
      00337777FFFF77FF7733EEEE0000000003337777777777777333}
    NumGlyphs = 2
  end
  object MainMenu1: TMainMenu
    Left = 40
    Top = 48
    object File1: TMenuItem
      Caption = '&File'
      object PrintPreview1: TMenuItem
        Caption = 'Print Pre&view'
        OnClick = PreviewBitBtnClick
      end
      object PrintSetup1: TMenuItem
        Caption = 'Print &Setup...'
        OnClick = PrintSetup1Click
      end
      object Print1: TMenuItem
        Caption = '&Print...'
        OnClick = PrintBitBtnClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object About1: TMenuItem
        Caption = '&About...'
        OnClick = About1Click
      end
    end
  end
  object PrintDialog1: TPrintDialog
    Options = [poPageNums, poWarning]
    Left = 120
    Top = 48
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 80
    Top = 112
  end
end