Dann würde ich noch folgendes machen, das ganze in die try except setzen:
Delphi-Quellcode:
try
// hier die ganzen SQL Abfragen
except
on E:
Exception do MessageDlg('
Fehler! Die Abfrage konnte nicht durchgeführt werden!'
+ sLineBreak + sLineBreak + E.ClassName + sLineBreak + E.
Message, mtError, [mbOk], 0);
end;
In der "E.Message" wird angezeigt was schief gelaufen ist. Falls ein vorhandener Eintrag hinzugefügt wird, wird in der "E.Message" die Meldung stehen, dass der Wert bereits vorhanden ist.
