[Delphi] Blokowanie Alt+F4

0

Czy mógłby mi ktoś wkleić procedure która blokuje zamknęcie formy poprzez skrót ALT+F4 ??? Bo ta porada o przeprawienie blokady ctrl+alt+del nie za bardzo pomogła ...

Za pomoc z góry dziękuje. :-)

0

Ale pojawiły się także inne odpowiedzi. Podałem kod do blokowania klawisza F4, który działa na 100%. Także pq (chyba) się dołączył i podał rozwiązanie blokujące klawisz F4 tylko wtedy, gdy jest wciśnięty alt. Nie rozumiem więc, dlaczego ci to nie wystarczy.

0

A czy mógłbyś wkleić gotową procedure ??? BO to też by było dobre rozwiązanie a obawam się że do mnie nie doszło ...

0

Masz. leniwcze!!!

Ustaw KeyPreview formy na True i daj w OnKeyDown tejże formy:

if (Key=VK_F4) and (ssAlt in Shift) then Key:=0;

0

hhehe ja tam bym walił ostro ehhe zablokuj cała klawiature sktutów:
SystemParametersInfo(97,Word(True),@l,0); wlonczone
SystemParametersInfo(97,Word(True),@l,0); wylonczone skróty
a bym zapomniał do zmiennej VAR dodaj L:longbool;

0

Ale to chyba wysiada prze NTkach.

1 użytkowników online, w tym zalogowanych: 0, gości: 1