home *** CD-ROM | disk | FTP | other *** search
/ Delphi 4 Bible / Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso / source / FONTSAMP / MAIN.dfm / MAIN.txt < prev   
Text File  |  1998-04-23  |  5KB  |  165 lines

  1. object MainForm: TMainForm
  2.   Left = 216
  3.   Top = 168
  4.   ActiveControl = FontListBox
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsSingle
  7.   Caption = 'Font Sampler'
  8.   ClientHeight = 263
  9.   ClientWidth = 346
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -13
  13.   Font.Name = 'System'
  14.   Font.Style = []
  15.   Icon.Data = {<image000.ico>}
  16.   Menu = MainMenu1
  17.   OnCreate = FormCreate
  18.   PixelsPerInch = 96
  19.   TextHeight = 16
  20.   object Bevel1: TBevel
  21.     Left = 216
  22.     Top = 8
  23.     Width = 17
  24.     Height = 241
  25.     Shape = bsLeftLine
  26.   end
  27.   object Label1: TLabel
  28.     Left = 16
  29.     Top = 8
  30.     Width = 96
  31.     Height = 16
  32.     Caption = 'Installed fonts:'
  33.   end
  34.   object FontListBox: TListBox
  35.     Left = 16
  36.     Top = 24
  37.     Width = 185
  38.     Height = 212
  39.     IntegralHeight = True
  40.     ItemHeight = 16
  41.     MultiSelect = True
  42.     Sorted = True
  43.     TabOrder = 3
  44.   end
  45.   object SelectAllBitBtn: TBitBtn
  46.     Left = 240
  47.     Top = 48
  48.     Width = 89
  49.     Height = 33
  50.     Caption = '&Select all'
  51.     TabOrder = 0
  52.     OnClick = SelectAllBitBtnClick
  53.     Glyph.Data = {
  54.       76010000424D7601000000000000760000002800000020000000100000000100
  55.       04000000000000010000130B0000130B00001000000000000000000000000000
  56.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  57.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  58.       3333333333333333333333333333333333333333FFF33FFFFF33333300033000
  59.       00333337773377777333333330333300033333337FF33777F333333330733300
  60.       0333333377FFF777F33333333700000073333333777777773333333333033000
  61.       3333333337FF777F333333333307300033333333377F777F3333333333703007
  62.       33333333377F7773333333333330000333333333337777F33333333333300003
  63.       33333333337777F3333333333337007333333333337777333333333333330033
  64.       3333333333377333333333333333033333333333333733333333333333333333
  65.       3333333333333333333333333333333333333333333333333333}
  66.     NumGlyphs = 2
  67.   end
  68.   object PrintBitBtn: TBitBtn
  69.     Left = 240
  70.     Top = 128
  71.     Width = 89
  72.     Height = 33
  73.     Caption = '&Print...'
  74.     TabOrder = 1
  75.     OnClick = PrintBitBtnClick
  76.     Glyph.Data = {
  77.       76010000424D7601000000000000760000002800000020000000100000000100
  78.       04000000000000010000130B0000130B00001000000000000000000000000000
  79.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  80.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  81.       00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
  82.       8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
  83.       8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
  84.       8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
  85.       03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  86.       03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  87.       33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
  88.       33333337FFFF7733333333300000033333333337777773333333}
  89.     NumGlyphs = 2
  90.   end
  91.   object CloseBitBtn: TBitBtn
  92.     Left = 240
  93.     Top = 216
  94.     Width = 89
  95.     Height = 33
  96.     TabOrder = 2
  97.     Kind = bkClose
  98.   end
  99.   object PreviewBitBtn: TBitBtn
  100.     Left = 240
  101.     Top = 88
  102.     Width = 89
  103.     Height = 33
  104.     Caption = 'Pre&view'
  105.     TabOrder = 4
  106.     OnClick = PreviewBitBtnClick
  107.     Glyph.Data = {
  108.       76010000424D7601000000000000760000002800000020000000100000000100
  109.       04000000000000010000120B0000120B00001000000000000000000000000000
  110.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  111.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
  112.       0000333377777777777733330FFFFFFFFFF033337F3FFF3F3FF733330F000F0F
  113.       00F033337F777373773733330FFFFFFFFFF033337F3FF3FF3FF733330F00F00F
  114.       00F033337F773773773733330FFFFFFFFFF033337FF3333FF3F7333300FFFF00
  115.       F0F03333773FF377F7373330FB00F0F0FFF0333733773737F3F7330FB0BF0FB0
  116.       F0F0337337337337373730FBFBF0FB0FFFF037F333373373333730BFBF0FB0FF
  117.       FFF037F3337337333FF700FBFBFB0FFF000077F333337FF37777E0BFBFB000FF
  118.       0FF077FF3337773F7F37EE0BFB0BFB0F0F03777FF3733F737F73EEE0BFBF00FF
  119.       00337777FFFF77FF7733EEEE0000000003337777777777777333}
  120.     NumGlyphs = 2
  121.   end
  122.   object MainMenu1: TMainMenu
  123.     Left = 40
  124.     Top = 48
  125.     object File1: TMenuItem
  126.       Caption = '&File'
  127.       object PrintPreview1: TMenuItem
  128.         Caption = 'Print Pre&view'
  129.         OnClick = PreviewBitBtnClick
  130.       end
  131.       object PrintSetup1: TMenuItem
  132.         Caption = 'Print &Setup...'
  133.         OnClick = PrintSetup1Click
  134.       end
  135.       object Print1: TMenuItem
  136.         Caption = '&Print...'
  137.         OnClick = PrintBitBtnClick
  138.       end
  139.       object N1: TMenuItem
  140.         Caption = '-'
  141.       end
  142.       object Exit1: TMenuItem
  143.         Caption = 'E&xit'
  144.         OnClick = Exit1Click
  145.       end
  146.     end
  147.     object Help1: TMenuItem
  148.       Caption = '&Help'
  149.       object About1: TMenuItem
  150.         Caption = '&About...'
  151.         OnClick = About1Click
  152.       end
  153.     end
  154.   end
  155.   object PrintDialog1: TPrintDialog
  156.     Options = [poPageNums, poWarning]
  157.     Left = 120
  158.     Top = 48
  159.   end
  160.   object PrinterSetupDialog1: TPrinterSetupDialog
  161.     Left = 80
  162.     Top = 112
  163.   end
  164. end
  165.