De C++ a Delphi

[Ledian_Fdez]

Hola amigos en una ocación utilize este codigo en C++ para evitar que me cerraran el formulario de login pulsando la tecla ALT y F4. Ahora lo he intentado en delphi pero la verdad no logro hacerlo.

Este es el codigo en c++

if (Shift.Contains(ssAlt)&& Key == VK_F4) Abort();

en espera de su ayuda,
mil gracias de entemano.

[maeyanes]

Hola...

En Delphi sería algo así:


if (ssAlt in Shift) and (Key = VK_F4) then
Abort // o Close



Saludos...

[Ledian_Fdez]

Mil gracias, ya me funciono !!!