messagebox, messagedlg

cara use o evento onclosequery

ai vc faz isso

****
if messagedlg(´Fechar o form´, mtconfirmation , [mbyes, mbno], 0) = mbyes then
canclose:= true
else
canclose:= false;
****
até

Utilize no OnCloseQuery ´Application.Terminate´

Valeu!

[quote=´gabiruba´]quero fechar um form e estou com dúvidas sobre a confirmação:

no evento onclose do form são estes os comandos?

messagebox(´Confirma´, ´Deseja realmente sair´, mb_okcancel);

ou poderia

if messagedlg(´Fechar o form´, mtconfirmation , [mbyes, mbno], 0) = mbyes
then
action:=cafree
else
action:=canone;


Obrigado.


por favor me ajudem