Hi,

folgendes Problem bei dem Code:

zusammenfalten · markieren

Delphi-Quellcode:

  
begin
        with dm.VarCommand1 do
        begin
        commandtext := 'INSERT INTO db(sdf, sdf, sdf,sdf, sdf, sdf, sdf, sdf, sdf, sdf, sdf, sdf)'
        +' VALUES (:sdf,:sdf,:sdf,:sdf,:sdf,:plz,:sdf,:sdf,:sdf,:sdf,:sdf,:sdf)';
        Parameters.parambyname('123').value := Edit1.text;
...
        try execute
        except messagedlg('Fehler beim Speichern, bitte überprüfen Sie ihre Eingaben',mtError,[mbOK],0);
        end;
   end;

wenn beim speichern (also wenn execute aufgerufen wird ) ein fehler auftritt, die exception mit dem messagedlg abfangen.

z.b. bei einem integer feld schreib ich 'test' rein,dann kommt die exception dass das feld kein Integer ist (kennt ihr ja) aber danach kommt KEINE Fehlermeldung von mir

wieso führt er das nicht aus???

Weil sich der auslösende Code nicht innerhalb des Try-Blocks befindet

ah ok hab mal alles in den try ... gesetzt dann gings

aber wieso?kann mir einer die logik sagen?
dachte immer:

Try... anweisung(also z.b. das execute)
except ...anweisung(showmessage....usw.)
finally(führt er aus bei fehlerfreiem ablauf,wobei except und finally nicht gleichzeitig genutzt werden können oder?))

danke

Richtig - das stimmt so schon, aber:

Die Exception kommt bereits bei "Parameters.parambyname('123').value := Edit1.text;" - also ausserhalb des try-Blocks

finally wird auf jedenfall ausgeführt

@jfheins

aber wieso kommt hier schon die exception?Selbst wenn ich hier ins feld wo als integer deklariert wurde (NUR in der datenbank) einen text reinschreibe, so kommt die verbindung doch erst bei EXECUTE zustande, d. h. erst hier wird doch geprüft ob alles passt oder nicht?

Setze mal nen Breakpoint und geh mit F7/F8 durch, dann siehst du genau, wo die Exception herkommt

ah ok hast recht

wieder was dazugelernt dankeschön

schönes wochenende