home K2»Infoservis»Diskusní fórum»Potlačení nápovědy

Infoservis

Potlačení nápovědy

Diskusní fórum


Téma založil Tommek Petr
Poslední příspěvek přidal Kovařčík Mikuláš 23. února 2021 13:03:12. Téma obsahuje 1 odpověď.
Modul: Proces:
23. února 2021 9:32:55
  • Tommek Petr
  • Registrován14.2.2005
  • Naposledy přihlášen 2.6.2025
Dobrý den,

jak ve skriptu potlačím u formuláře TK2DDfm vyvolání nápovědy při stisknutí klávesy F1 ?
Potřebuji klávesu F1 použít pro něco jiného.

Děkuji za nasměrování.

Tommek

23. února 2021 13:03:12
Dobrý den, jde to udělat následující konstrukcí. Každý formulář má obsluhu kláves, kterou je potřeba přepsat:

function TDfmForm.UserKeyDown(var Key: Word; Shift: TShiftState; PouzeStr: Boolean): String;
begin
  if not PouzeStr then begin
    if (Key = VK_F1) and (Shift = []) then begin
      HlasOK('Moje obsluha F1');
      Key := 0;
      Exit;
    end;
    ...


Za tým K2
Mikuláš Kovařčík
Příspěvek byl změněn: Kovařčík Mikuláš, dne: 23.2.2021 13:03:39.
Soubory cookies

Soubory cookie používáme ke shromažďování a analýze informací o výkonu a používání webu, zajištění fungování funkcí ze sociálních médií a ke zlepšení a přizpůsobení obsahu a reklam.

Nastavení cookies

Soubory cookies

Soubory cookie používáme ke shromažďování a analýze informací o výkonu a používání webu, zajištění fungování funkcí ze sociálních médií a ke zlepšení a přizpůsobení obsahu a reklam.