Einzelnen Beitrag anzeigen

Benutzerbild von LoewenZahn
LoewenZahn

Registriert seit: 10. Okt 2013
22 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

Delphi - Mysqlerror ausgeben?

  Alt 17. Okt 2013, 11:45
Datenbank: Mysql • Version: 5.5.31 • Zugriff über: Delphi
Hallo,

um mir etwas Arbeit zu vereinfachen, habe ich mir ein Programm geschrieben das alle sql Befehle in einer .txt abklappert, dies ist dann nötig wenn ich z.b. eine zu große Liste mit bspw. 300 mio Zeichen habe. Das ganze funktioniert auch ganz gut, nur weiß ich nicht wie ich auf einen Sql-Error reagieren kann.

Beispielsweise möchte ich einen INSERT durchführen, aber eine Spalte existiert nicht. Mysql/phpmyadmin gibt mir dann "#1054 - Unknown column 'BETRAG3' in 'field list'" als Msg aus, doch wie kann ich die gleiche in Delphi ausgeben?

Delphi-Quellcode:
  try
     if query.active then query.Close;
     query.sql.Text := abfrage;
     query.ExecSQL;
  except
      showmessage('Fehler!');
  end;
Ich habe gedacht, dass man hier eventuell mit Try except arbeitet und mehr als nur ein Showmessage anwendet... Leider komme ich nicht drauf.

Hat jemand eine Anregung/Tipp ?

Gruß
Tim
  Mit Zitat antworten Zitat