Desabilitar ALT F4
Como eu posso desabilitar o uso do ALT+F4 em um determinado form?
Obrigado.
Obrigado.
Mineiro
Curtidas 0
Melhor post
Henry
11/07/2003
Brother, todo form tem um evento onclosequery, nesse evento vc deve bota a seguinte rotina:
canclose:= false;
ai no botao q vc vai usa pra fecha o form vc usa:
var canclose: boolean;
begin
canclose:= true;
form1.close;
Espero ter ajudado Henry.
canclose:= false;
ai no botao q vc vai usa pra fecha o form vc usa:
var canclose: boolean;
begin
canclose:= true;
form1.close;
Espero ter ajudado Henry.
GOSTEI 1
Mais Respostas
Rodrigo_rcp
10/07/2003
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key=vk_f4 then abort; end; end.
GOSTEI 0