Chip 2001 December/Chip_2001-12_cd1.bin/ctenari/Vachtl/mobydict171.exe/MobyDict.exe/0/RCDATA/TFHLAVNI/TFHLAVNI.txt

Text File | 2001-10-14 | 6KB | 270 lines

object fHlavni: TfHlavni
  Left = 55
  Top = 43
  Anchors = [akLeft, akTop, akRight, akBottom]
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'MobyDict'
  ClientHeight = 442
  ClientWidth = 482
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 32
    Width = 91
    Height = 13
    Caption = 'Dostupn� slovn�ky:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 8
    Top = 8
    Width = 37
    Height = 13
    Caption = 'Soubor:'
  end
  object btnKonec: TButton
    Left = 384
    Top = 408
    Width = 75
    Height = 25
    Caption = 'Konec'
    TabOrder = 5
    OnClick = btnKonecClick
  end
  object lbSlovniky: TListBox
    Left = 8
    Top = 48
    Width = 169
    Height = 353
    ItemHeight = 13
    TabOrder = 0
    OnClick = lbSlovnikyClick
    OnDblClick = ZkousejExecute
  end
  object GroupBox1: TGroupBox
    Left = 184
    Top = 40
    Width = 289
    Height = 337
    Caption = 'P�ezkou�en�'
    TabOrder = 1
    object LCelkemSlov: TLabel
      Left = 75
      Top = 64
      Width = 6
      Height = 13
      Caption = '_'
    end
    object Label2: TLabel
      Left = 8
      Top = 64
      Width = 65
      Height = 13
      Caption = 'Po�et v�raz�:'
    end
    object Label3: TLabel
      Left = 8
      Top = 24
      Width = 77
      Height = 13
      Caption = 'N�zev slovn�ku:'
    end
    object LNazev: TLabel
      Left = 96
      Top = 24
      Width = 185
      Height = 41
      AutoSize = False
      Caption = '_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      WordWrap = True
    end
    object lUsek: TLabel
      Left = 24
      Top = 192
      Width = 94
      Height = 13
      Caption = 'Po�et slov na �sek:'
    end
    object Label5: TLabel
      Left = 24
      Top = 226
      Width = 91
      Height = 13
      Caption = 'Nutno zodpov�d�t:'
    end
    object Label6: TLabel
      Left = 158
      Top = 226
      Width = 21
      Height = 13
      Caption = 'kr�t.'
    end
    object btnPrezkouset: TButton
      Left = 190
      Top = 288
      Width = 75
      Height = 25
      Action = Zkousej
      Caption = 'P�ezkou�et'
      Default = True
      TabOrder = 1
    end
    object rgPoradi: TRadioGroup
      Left = 168
      Top = 96
      Width = 89
      Height = 73
      Caption = 'Po�ad�'
      TabOrder = 0
    end
    object rbVzestupne: TRadioButton
      Left = 176
      Top = 130
      Width = 73
      Height = 17
      Caption = 'Vzestupn�'
      TabOrder = 2
    end
    object rbSestupne: TRadioButton
      Left = 176
      Top = 148
      Width = 73
      Height = 17
      Caption = 'Sestupn�'
      TabOrder = 3
    end
    object rbNahodne: TRadioButton
      Left = 176
      Top = 112
      Width = 65
      Height = 17
      Caption = 'N�hodn�'
      Checked = True
      TabOrder = 4
      TabStop = True
    end
    object cbPoUsecich: TCheckBox
      Left = 16
      Top = 168
      Width = 129
      Height = 17
      Action = NastavUsek
      Checked = True
      State = cbChecked
      TabOrder = 5
    end
    object edtDelkaUseku: TEdit
      Left = 120
      Top = 189
      Width = 33
      Height = 21
      Hint = 'Po�et slov, kter� budou opakov�na dokud se je u�ivatel nenau��.'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      Text = '6'
      OnChange = NastavUsekExecute
    end
    object rgRezimZkouseni: TRadioGroup
      Left = 8
      Top = 256
      Width = 137
      Height = 73
      Caption = 'Re�im zkou�en�'
      Items.Strings = (
        'Nutno vypisovat'
        'Zobrazovat'
        'Pln� automaticky')
      TabOrder = 7
    end
    object edtPocetOprav: TEdit
      Left = 120
      Top = 224
      Width = 33
      Height = 21
      Hint =
        'Kolikr�t je nutno spr�vn� zodpov�d�t v�raz, ve kter�m bylo chybo' +
        'v�no..'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 8
      Text = '2'
    end
  end
  object rgSmer: TRadioGroup
    Left = 192
    Top = 136
    Width = 137
    Height = 57
    Caption = 'Sm�r'
    ItemIndex = 0
    Items.Strings = (
      'Zleva -> Doprava'
      'Zprava -> Doleva')
    TabOrder = 2
  end
  object brnZmenit: TButton
    Left = 303
    Top = 4
    Width = 73
    Height = 25
    Caption = 'Zm�nit'
    TabOrder = 3
    OnClick = Otevi1Click
  end
  object edtJmeno: TEdit
    Left = 49
    Top = 6
    Width = 249
    Height = 21
    ReadOnly = True
    TabOrder = 4
    Text = 'edtJmeno'
  end
  object ActionList1: TActionList
    Left = 400
    object Zkousej: TAction
      Caption = 'P�ezkou�ej'
      OnExecute = ZkousejExecute
    end
    object NastavUsek: TAction
      Caption = 'Zkou�et po �sec�ch'
      OnExecute = NastavUsekExecute
    end
  end
  object MainMenu1: TMainMenu
    Left = 368
    object info: TMenuItem
      Caption = 'O Programu'
      OnClick = infoClick
    end
  end
  object FDSlovnik: TOpenDialog
    Filter = 'Textov� soubory|*.txt|V�echny soubory|*.*'
    InitialDir = '.\slovniky'
    Left = 336
  end
end