Evitar fechamento de janela
Tenho uma janela MDI de baixas de duplicatas, preciso travar a saida desta tela, se as parcelas selecionadas nao estiverem baixadas, nos botoes de pesquisa e saida da janela eu consegui, mas como fazer essa trava quando o usuario clicar no fechar janela ou utilizar o ALT+F4 ?
Abs
Abs
Felipeiw
Curtidas 0
Respostas
Dbergkamps10
18/05/2008
Olá,
Tente assim:
Att
Dalton
Tente assim:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin case key of VK_F4: begin key:=0; end; end; end;
Att
Dalton
GOSTEI 0
Felipeiw
18/05/2008
Funcionou, Obrigado, porem e para travar o botao X (fechar) da janela ?
Abs
Abs
GOSTEI 0