Hi marabu,
danke für die Meldung. Hier der Code für den Edit-Modus:
Delphi-Quellcode:
procedure TFormAdr.FormKeyDown (Sender: TObject; var Key: Word;
Shift: TShiftState);
...
if Key=VK_Next then
begin
if TableAdr.Modified then
(ShowMessage/Sicherheitsabfrage)
...
Das Ereignis OnBeforePost bringt nichts.
Der Speichervorgang wird erst durch die Sicherheitsabfrage
Ja/Nein ausgelöst und diese Abfrage mit einer ShowMessage
sollte eben auch bei einem nicht verlassenen DBEdit erfolgen.
Gruß
Lombi