Post abbrechen - je nach Inhalt des TDBEdits (dynamisch)

[shmia]

Vergiss die Controls.
Plausiprüfungen müssen anhand des Datasets stattfinden.

Delphi-Quellcode:

procedure TForm_Erfassung.Table_ArtikelBeforePost(DataSet: TDataSet); 
begin 
  // Beispiel:
  if DataSet.FieldByName('StartWert').AsInteger >= DataSet.FieldByName('EndWert').AsInteger then
    raise Exception.Create('Startwert muss kleiner als Endwert sein');

  if DataSet.FieldByName('Anzahl').IsEmpty then
    raise Exception.Create('Anzahl muss angegeben werden');
  
  if not DataSet.FieldByName('P1').IsEmpty and DataSet.FieldByName('P2').IsEmpty then
    raise Exception.Create('Wenn "P1" vorgegeben, dann muss auch "P2" angegeben werden');
end;

Der Benutzer erhält evtl. eine der obigen Exceptions angezeigt und kann dann
entweder: abbrechen oder korrigieren und erneut speichern