home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 282
- Top = 111
- Width = 455
- Height = 492
- ActiveControl = Memo1
- Caption = 'DaNiElSoFt editor'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- Menu = MainMenu1
- Position = poDefaultPosOnly
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 16
- object Memo1: TMemo
- Left = 0
- Top = 0
- Width = 447
- Height = 446
- Align = alClient
- BorderStyle = bsNone
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = []
- HideSelection = False
- Lines.Strings = (
- '')
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 0
- WantTabs = True
- WordWrap = False
- OnChange = Memo1Change
- OnKeyDown = FormKeyDown
- end
- object pomocneMemo: TMemo
- Left = 264
- Top = 112
- Width = 49
- Height = 25
- TabOrder = 1
- Visible = False
- WordWrap = False
- end
- object pomocneMemo2: TMemo
- Left = 184
- Top = 64
- Width = 41
- Height = 17
- Lines.Strings = (
- '')
- TabOrder = 2
- Visible = False
- WordWrap = False
- end
- object MainMenu1: TMainMenu
- Left = 288
- Top = 16
- object Soubor: TMenuItem
- Caption = '&Soubor'
- ShortCut = 32858
- object Novy: TMenuItem
- Caption = 'Nov�'
- ShortCut = 16462
- OnClick = NovyClick
- end
- object Otevrit: TMenuItem
- Caption = 'Otev��t...'
- ShortCut = 114
- OnClick = OtevritClick
- end
- object Ulozit: TMenuItem
- Caption = 'Ulo�it'
- ShortCut = 113
- OnClick = UlozitClick
- end
- object UlozitJako: TMenuItem
- Caption = 'Ulo�it jako...'
- ShortCut = 16497
- OnClick = UlozitJakoClick
- end
- object ZnovuNacist: TMenuItem
- Caption = 'Znovu na��st'
- ShortCut = 16474
- OnClick = ZnovuNacistClick
- end
- object Daloknoeditoru1: TMenuItem
- Caption = 'Dal�� okno editoru'
- ShortCut = 16463
- OnClick = Daloknoeditoru1Click
- end
- object Konec: TMenuItem
- Caption = 'Konec'
- ShortCut = 121
- OnClick = KonecClick
- end
- end
- object Upravy: TMenuItem
- Caption = '�&pravy'
- OnClick = UpravyClick
- object Kopiruj: TMenuItem
- Caption = 'Kop�ruj'
- ShortCut = 16429
- OnClick = KopirujClick
- end
- object Vystrihni: TMenuItem
- Caption = 'Vyst�ihni'
- ShortCut = 8238
- OnClick = VystrihniClick
- end
- object pridej: TMenuItem
- Caption = 'P�idej'
- ShortCut = 32813
- OnClick = pridejClick
- end
- object Prilep: TMenuItem
- Caption = 'P�ilep'
- ShortCut = 8237
- OnClick = PrilepClick
- end
- object Pilepzesouboru1: TMenuItem
- Caption = 'P�ilep ze souboru...'
- OnClick = Pilepzesouboru1Click
- end
- object Vybervse: TMenuItem
- Caption = 'Vyber v�e'
- ShortCut = 16449
- OnClick = VybervseClick
- end
- object zacatekvyberu: TMenuItem
- Caption = 'Za��tek SuperV�b�ru'
- ShortCut = 16450
- OnClick = zacatekvyberuClick
- end
- object konecvyberu: TMenuItem
- Caption = 'Konec SuperV�b�ru'
- ShortCut = 16453
- OnClick = konecvyberuClick
- end
- end
- object Formt1: TMenuItem
- Caption = '&Form�t'
- object smazradek: TMenuItem
- Caption = 'Sma� ��dek'
- ShortCut = 32814
- OnClick = smazradekClick
- end
- object Zalamovani: TMenuItem
- Caption = 'Zalamov�n� ��dk�'
- ShortCut = 16466
- OnClick = ZalamovaniClick
- end
- object odsadblok: TMenuItem
- Caption = 'Posu� blok doprava'
- ShortCut = 49191
- OnClick = odsadblokClick
- end
- object ododsad: TMenuItem
- Caption = 'Posu� blok doleva'
- ShortCut = 49189
- OnClick = ododsadClick
- end
- object srovnejblok: TMenuItem
- Caption = 'Srovnej blok'
- ShortCut = 49235
- OnClick = srovnejblokClick
- end
- object inshtml: TMenuItem
- Caption = 'Vlo� standardn� hlavi�ku HTML'
- OnClick = inshtmlClick
- end
- end
- object cestina: TMenuItem
- Caption = '�&e�tina'
- object Ukldatnahrvatv1: TMenuItem
- Caption = 'Ukl�dat / nahr�vat v :'
- end
- object CP1250W: TMenuItem
- Caption = 'CP 1250 (Win)'
- Checked = True
- OnClick = CP1250WClick
- end
- object ISO8859: TMenuItem
- Caption = 'ISO-8859-2 (Unix)'
- OnClick = ISO8859Click
- end
- object PCLatin2: TMenuItem
- Caption = 'PC Latin 2 (DOS,OS/2)'
- OnClick = PCLatin2Click
- end
- object Kamenicti1: TMenuItem
- Caption = 'Kameni�t� (DOS)'
- OnClick = Kamenicti1Click
- end
- end
- object Hledej: TMenuItem
- Caption = '&Hledej'
- object Hledej1: TMenuItem
- Caption = 'Hledej...'
- ShortCut = 16454
- OnClick = Hledej1Click
- end
- object Nahrad: TMenuItem
- Caption = 'Nahra�...'
- ShortCut = 16466
- OnClick = NahradClick
- end
- end
- object Jdina1: TMenuItem
- Caption = '&Jdi na...'
- object Zateksouboru1: TMenuItem
- Caption = 'Za��tek souboru'
- ShortCut = 16420
- OnClick = Zateksouboru1Click
- end
- object Konecsouboru1: TMenuItem
- Caption = 'Konec souboru'
- ShortCut = 16419
- OnClick = Konecsouboru1Click
- end
- object dekslo1: TMenuItem
- Caption = '��dek ��slo...'
- OnClick = dekslo1Click
- end
- object Znakslo1: TMenuItem
- Caption = 'Znak ��slo...'
- OnClick = Znakslo1Click
- end
- object PredchoziSoubor: TMenuItem
- Caption = 'P�edchoz� soubor'
- Enabled = False
- ShortCut = 32805
- OnClick = PredchoziSouborClick
- end
- object DalsiSoubor: TMenuItem
- Caption = 'Dal�� soubor'
- Enabled = False
- ShortCut = 32807
- OnClick = DalsiSouborClick
- end
- end
- object Zobraz1: TMenuItem
- Caption = '&Zobraz...'
- object zhtml: TMenuItem
- Caption = 'Soubor jako HTML str�nku'
- ShortCut = 16456
- OnClick = zhtmlClick
- end
- object Poetdkvtextu1: TMenuItem
- Caption = 'Po�et ��dk� v textu'
- OnClick = Poetdkvtextu1Click
- end
- object pocetslov: TMenuItem
- Caption = 'Po�et slov v textu'
- OnClick = pocetslovClick
- end
- object Poetznakvtextu1: TMenuItem
- Caption = 'Po�et znak� v textu'
- OnClick = Poetznakvtextu1Click
- end
- end
- object Napoveda1: TMenuItem
- Caption = '&N�pov�da'
- OnClick = Napoveda1Click
- object Obsah: TMenuItem
- Caption = 'Obsah'
- ShortCut = 112
- OnClick = ObsahClick
- end
- object Oaplikaci: TMenuItem
- Caption = 'O aplikaci...'
- OnClick = OaplikaciClick
- end
- end
- end
- object loud: TOpenDialog
- Filter =
- 'v�echny soubory|*.*|texty|*.txt;*.doc;*.me|Pascal|*.pas|C & C++|' +
- '*.c;*.cpp|Assembler|*.asm|Haskell|*.hs|v�echny zdroj�ky|*.asm;*.' +
- 'pas;*.c;*.c++;*.asm;*.hs;*.cpp;*.pl;*.bas;*.bat|HTML str�nky|*.h' +
- 'tm;*.html|INI soubory|*.ini'
- FilterIndex = 7
- Options = [ofHideReadOnly, ofNoReadOnlyReturn]
- Left = 200
- Top = 16
- end
- object Sejf: TSaveDialog
- Filter = 'jak�koli soubor|*.*'
- Left = 328
- Top = 24
- end
- object FindDialog1: TFindDialog
- OnFind = FindDialog1Find
- Left = 152
- Top = 16
- end
- object ReplaceDialog1: TReplaceDialog
- OnFind = FindDialog1Find
- OnReplace = ReplaceDialog1Replace
- Left = 248
- Top = 16
- end
- end
-