procedure cancel;
//Das folgende Fragment fordert den Benutzer zur Bestätigung von Datensatzänderungen auf. //Klickt der Benutzer auf Yes, wird der Datensatz in die Tabelle eingetragen, andernfalls werden die Änderungen verworfen.if MessageDlg('Update Record?', mtConfirmation, mbYes, mbNo, 0) = mrYes then MyData.Post else MyData.Cancel;