Hallo,
ich habe ein Programm nach dem Tutorial von delphi-source.de geschrieben, mit dem ich eine
MySQL Datenbank abfragen will. Das Programm lässt sich ohne Probleme ausführen und auch das Connecten, Pingen und Trennen funktioniert wunderbar. Mein Problem liegt in der Abfrage. Ich habe eine Tabelle in der
MySQL Datenbank die ich abfragen möchte, aber das funktioniert nicht. Bei einer Abfrage (egal ob der Eintrag vorhanden ist oder nicht) kommt folgender Fehler:
Query fehlgeschlagen: You have an error in your SQL syntax near 'Suchbegriff' at line 1
Mein Code für die Abfrage Lautet:
Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject);
var q:
string;
ex: boolean;
begin
if assigned(FResult)
then begin
if FMysql.Status<>MYSQL_STATUS_READY
then
ShowMessage('
Ein Ergebnis wurde unvollständig gelesen!');
FreeAndNil(FResult);
end;
q := InputBox('
Geben Sie eine Abfrage ein',
'
Welche Abfrage durchgeführt werden soll','
');
FResult := FMysql.query(q, true, ex);
if assigned(FResult)
then
ShowMessage('
Query: OK - Ergebnis gespeichert')
else
if ex
then
ShowMessage('
Query: OK - ausgeführt')
else
ShowMessage('
Query fehlgeschlagen: '+FMysql.LastError);
end;
Kann mir da jemand helfen?
Danke
Thomas