Autor Téma: Odoslanie "znaku" stlačenia Enter ako parameter rutiny  (Přečteno 438 krát)

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6046
  • Karma: 44
    • Verze Delphi: W10 + D11
Kód: Delphi [Vybrat]
  1. procedure EditDayKeyPress(Sender: TObject; var Key: Char);
  2. .
  3.   if FEditDay.Focused then
  4.     EditDayKeyPress(FEditDay,)
  5.  
Neviem čo tam mám napísať. Moje pokusy skončili neúspechom.
« Poslední změna: 14-08-2021, 14:40:09 od Stanislav Hruška »
W10 64b, Delphi 10.4, FireBird 3.05
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6046
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Odoslanie "znaku" stlačenia Enter ako parameter rutiny
« Odpověď #1 kdy: 14-08-2021, 14:58:18 »
Podarilo sa mi to nájsť
Kód: Delphi [Vybrat]
  1.   MyChar := #13;
W10 64b, Delphi 10.4, FireBird 3.05
Expert na kladenie nejasne formulovaných otázok.

Offline Jan Fiala

  • Plnoletý
  • ***
  • Příspěvků: 237
  • Karma: 3
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:Odoslanie "znaku" stlačenia Enter ako parameter rutiny
« Odpověď #2 kdy: 14-08-2021, 19:37:22 »
A nevadí ti, že když bude focused, že se ti to zacyklí, protože to budeš rekurzivně volat pořád dokola?

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6046
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Odoslanie "znaku" stlačenia Enter ako parameter rutiny
« Odpověď #3 kdy: 14-08-2021, 21:04:10 »
Nemám to zaseknuté v cykle. Ak do KeyPress pošlem ten enter, tak sa focus prenesie na ďalší komponent. A toto mi robilo veľký problém.  Ale už som všetko vyriešil. Nateraz to vyzerá v poriadku.
W10 64b, Delphi 10.4, FireBird 3.05
Expert na kladenie nejasne formulovaných otázok.