Enviar Mensaje a Usuario

[ecfisa]

Hola.

Se me ocurre que podrías aprovechar el evento AfterPost del DataSet.
Por ejemplo:

Código Delphi [-]
procedure TForm.DataSetAfterPost(DataSet: TDataSet);
begin
  ShowMessage('Sr. Usuario su código de registro es: '+
     DataSet1.FieldByName('CAMPO_ID').AsString);
end;

Pero si guardás haciendo click sobre un botón, también podés incluirlo allí, luego del Post.

Saludos.