home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 May / Chip_2002-05_cd1.bin / sharewar / fontlist / UNIT1.DFM / UNIT1.txt
Text File  |  1998-08-24  |  2KB  |  107 lines
  1. object FontForm: TFontForm
  2.   Left = 259
  3.   Top = 111
  4.   Width = 322
  5.   Height = 221
  6.   Caption = 'P∩┐╜ehled instalovan∩┐╜ch font∩┐╜'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   OnShow = FormShow
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Panel1: TPanel
  16.     Left = 0
  17.     Top = 0
  18.     Width = 314
  19.     Height = 65
  20.     Align = alTop
  21.     TabOrder = 0
  22.     object Label2: TLabel
  23.       Left = 175
  24.       Top = 38
  25.       Width = 9
  26.       Height = 13
  27.       Caption = '...'
  28.     end
  29.     object Label3: TLabel
  30.       Left = 16
  31.       Top = 10
  32.       Width = 44
  33.       Height = 13
  34.       Caption = 'Fonty pro'
  35.     end
  36.     object Button1: TButton
  37.       Left = 224
  38.       Top = 4
  39.       Width = 75
  40.       Height = 25
  41.       Caption = 'Start'
  42.       TabOrder = 0
  43.       OnClick = Button1Click
  44.     end
  45.     object ProgressBar1: TProgressBar
  46.       Left = 12
  47.       Top = 36
  48.       Width = 150
  49.       Height = 17
  50.       Min = 0
  51.       Max = 100
  52.       TabOrder = 1
  53.     end
  54.     object RadioButton1: TRadioButton
  55.       Left = 72
  56.       Top = 8
  57.       Width = 65
  58.       Height = 17
  59.       Caption = 'Tisk∩┐╜rnu'
  60.       Checked = True
  61.       TabOrder = 2
  62.       TabStop = True
  63.     end
  64.     object RadioButton2: TRadioButton
  65.       Left = 136
  66.       Top = 8
  67.       Width = 81
  68.       Height = 17
  69.       Caption = 'Obrazovku'
  70.       TabOrder = 3
  71.     end
  72.   end
  73.   object RichEdit1: TRichEdit
  74.     Left = 0
  75.     Top = 65
  76.     Width = 314
  77.     Height = 129
  78.     Align = alClient
  79.     Font.Charset = DEFAULT_CHARSET
  80.     Font.Color = clWindowText
  81.     Font.Height = -13
  82.     Font.Name = 'MS Sans Serif'
  83.     Font.Style = [fsBold]
  84.     Lines.Strings = (
  85.       'Program FontList vygeneruje RTF soubor'
  86.       's p∩┐╜ehledem instalovan∩┐╜ch font∩┐╜.'
  87.       'Tento p∩┐╜ehled je potom mo∩┐╜n∩┐╜ otev∩┐╜∩┐╜t'
  88.       'nap∩┐╜. v Ami Pro nebo p∩┐╜∩┐╜padn∩┐╜ ve Wordu,'
  89.       'upravit dle pot∩┐╜eby a vytisknout.'
  90.       ''
  91.       'Autor: Jan ∩┐╜abl∩┐╜k, 1998')
  92.     ParentFont = False
  93.     TabOrder = 1
  94.     WantTabs = True
  95.     WordWrap = False
  96.   end
  97.   object SaveDialog1: TSaveDialog
  98.     DefaultExt = 'rtf'
  99.     Filter = 'Rich Text|*.rtf'
  100.     FilterIndex = 0
  101.     Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
  102.     Title = 'Ulo∩┐╜it p∩┐╜ehled font∩┐╜ do RTF souboru'
  103.     Left = 96
  104.     Top = 28
  105.   end
  106. end
  107.