home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
LISTER
/
MAIN.dfm
/
MAIN.txt
Wrap
Text File
|
1998-03-10
|
4KB
|
126 lines
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