object Fdruhy: TFdruhy
  Left = 200
  Top = 108
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'N�zvy druh� transakc�'
  ClientHeight = 273
  ClientWidth = 427
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  PixelsPerInch = 96
  TextHeight = 13
  object LBdruhy: TListBox
    Left = 208
    Top = 8
    Width = 185
    Height = 105
    Hint = 'vyberte druh, jeho� n�zev chcete zm�nit'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Courier'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnClick = LBdruhyClick
  end
  object Edruh: TEdit
    Left = 16
    Top = 16
    Width = 169
    Height = 21
    Hint = 'zde zadejte nov� n�zev vybran�ho druhu'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Courier'
    Font.Style = []
    MaxLength = 20
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
  end
  object Bpouzit: TButton
    Left = 16
    Top = 48
    Width = 121
    Height = 25
    Hint = 'pou��t nov� n�zev pro vybran� druh'
    Caption = '&P�ejmenovat druh '
    Default = True
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    TabStop = False
    OnClick = BpouzitClick
  end
  object Bulozit: TButton
    Left = 16
    Top = 80
    Width = 121
    Height = 25
    Hint = 'ulo�it v�echny zm�ny, kter� jste provedli'
    Caption = '&Ulo�it n�zvy druh� '
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    TabStop = False
    OnClick = BulozitClick
  end
  object Memo1: TMemo
    Left = 8
    Top = 128
    Width = 401
    Height = 113
    TabStop = False
    Color = clBtnFace
    Lines.Strings = (
      
        'Jednotliv� druhy pom�haj� rozt��dit transakce a zji��ovat celkov' +
        '� ��stky za ur�it� '
      'druhy.'
      'M�te k dispozici 26 druh� (A a� Z).'
      
        'Pro snadn�j�� orientaci a vy��� p�ehlednost je mo�n� jednotliv�m' +
        ' druh�m p�idat '
      'jm�na.'
      '(nap�. j�dlo, j�zdn�, v�plata, n�jem, benzin, kredit...)'
      
        'Pokud chcete zachovat kompatibilitu s DOSov�m p�edch�dcem tohoto' +
        ' programu '
      '(kasa.exe), nepou��vejte �esk� znaky.'
      '')
    ReadOnly = True
    TabOrder = 4
  end
end