object FontForm: TFontForm
  Left = 229
  Top = 24
  Width = 255
  Height = 382
  ActiveControl = FLB
  Caption = 'Vybrat font'
  Color = clBtnFace
  Constraints.MinHeight = 191
  Constraints.MinWidth = 205
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object FLB: TListBox
    Left = 0
    Top = 0
    Width = 247
    Height = 316
    Align = alClient
    ItemHeight = 16
    MultiSelect = True
    Style = lbOwnerDrawVariable
    TabOrder = 0
    OnDrawItem = DrawItem
    OnMeasureItem = FLBMeasureItem
  end
  object Panel1: TPanel
    Left = 0
    Top = 316
    Width = 247
    Height = 39
    Align = alBottom
    TabOrder = 1
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 245
      Height = 37
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object OKButton: TButton
        Left = 63
        Top = 7
        Width = 75
        Height = 25
        Anchors = [akRight, akBottom]
        Caption = 'OK'
        Default = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ModalResult = 1
        ParentFont = False
        TabOrder = 0
      end
      object CancelButton: TButton
        Left = 151
        Top = 7
        Width = 75
        Height = 25
        Anchors = [akRight, akBottom]
        Cancel = True
        Caption = 'Storno'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ModalResult = 2
        ParentFont = False
        TabOrder = 1
      end
    end
  end
  object FormPlacement1: TFormPlacement
    IniSection = '\Software\DRHTML\FontWin'
    UseRegistry = True
    Left = 16
    Top = 16
  end
end