Aviso de Modificacion en Edit

[ecfisa]

Hola.

Hola, hay una forma predefinida en delphi dentro de los edit, donde si un usuario cierra el prg antes de apretar el boton grabar y que el prg le avise "Usted modifico Datos - Desea Gravarlos ? - Acepta o cancela".

A ese fín podés aprovechar el evento OnCloseQuery del form inherente.

Como ejemplo:

Código Delphi [-]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if DataSet.Modified then
    CanClose:= MessageDlg('¿ Guarda los cambios ?', mtConfirmation, [mbYes,MbNo], 0) = MRYes;
end;

Nota: En este ejemplo el form no se cierra hasta que guarde los cambios. Pero podes alterar la condición a tu gusto.

Saludos.