object MainForm: TMainForm
  Left = 201
  Top = 97
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Text File Lister'
  ClientHeight = 273
  ClientWidth = 467
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 16
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 353
    Height = 273
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 0
  end
  object SetupBitBtn: TBitBtn
    Left = 368
    Top = 48
    Width = 89
    Height = 33
    Caption = '&Setup...'
    TabOrder = 1
    OnClick = SetupBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333300333
      33333333333773FF333333333330F0033333333333373773FF333333330FFFF0
      03333333337F333773FF3333330FFFFFF003333333733FF33773333330FF00FF
      FF80333337F3773F3337333330FFFF0FFFF03FFFF7FFF3733F3700000000FFFF
      0FF0777777773FF373370000000000FFFFF07FFFFFF377FFF3370CCCCC000000
      FF037777773337773F7300CCC000003300307F77733337F37737000C00000033
      33307F373333F7F333370000007B703333307FFFF337F7F33337099900BBB033
      33307777F37777FF33370999007B700333037777F3373773FF73099900000030
      00337777FFFFF7F7773300000000003333337777777777333333}
    NumGlyphs = 2
  end
  object PrintBitBtn: TBitBtn
    Left = 368
    Top = 88
    Width = 89
    Height = 33
    Caption = '&Print...'
    TabOrder = 2
    OnClick = PrintBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object CloseBitBtn: TBitBtn
    Left = 368
    Top = 224
    Width = 89
    Height = 33
    TabOrder = 3
    Kind = bkClose
  end
  object OpenBitBtn: TBitBtn
    Left = 368
    Top = 8
    Width = 89
    Height = 33
    Caption = '&Open...'
    TabOrder = 4
    OnClick = OpenBitBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
      07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
      0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
  end
  object OpenDialog1: TOpenDialog
    Filter = 
      'Pascal files (*.Pas)|*.Pas|Text files (*.Txt)|*.Txt|All files (*' +
      '.*)|*.*'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Left = 32
    Top = 24
  end
  object PrintDialog1: TPrintDialog
    Left = 120
    Top = 24
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 232
    Top = 24
  end
end