Desabilitar alt f4 e permiti o close

Delphi

15/04/2003

Ola,

como que eu faço para desabilitar alt+f4 e permiti o comando [b:3214065c8f]close;[/b:3214065c8f]

agradeço!!


Coppola

Coppola

Curtidas 0

Respostas

Vmotta

Vmotta

15/04/2003

defina uma variável Ffechar : boolean (global)

no onCreate do form digite:
Ffechar := false;

no OnCloseQuery do Form digite:
CanClose := Ffechar;

no OnClick do botao que fecha o formulario digite:
Ffechar := true;
Close;

falow

Vitor Hugo


GOSTEI 0
POSTAR