mensagem ao sair do formul�rio

Question

Ola Delphimaniacos,Minha duvida � a seguinte, queria que quando sair do formul�rio verificar se a os dados est�o salvos na bases. Se estive salvos nao mandar a mensagem e se nao estiver apresentar uma...

Nigro · Answer

No onClose do formul�rio verifique se a tabela est� em modo de inser��o ou adi��o ent�o coloque um messagedlg....

Zumbi · Answer

no evento onCloseQuery tem um metodo chamado canclose entao fa�a este codigo

         case application.MessageBox(�Deseja gravar este registro?�,� titulo do programa�, mb_iconinformation + mb_yesnocancel) of
            idyes:
               begin
                  tabela.edit;
                  tabela.post;
                  canclose := true;
               end;
            idno:
               begin
                  tabela.Cancel;
                  canclose := true;
               end;
            idcancel:
                  canclose := false;
         end;

flw...

F�rum mensagem ao sair do formul�rio #207711