Fehler in SQL-Syntax

[Delbor]

Hi zusammen

Ich hab mal folgendes versucht:

Delphi-Quellcode:

  function TDMLSQLite.ExecuteSQL(ASQL : String) : Boolean;
    var ReportList: TStringlist;
  begin
    ReportList := TStringlist.Create;
    try
    try
      FDSQLiteConnection.ExecSQL(ASQL);
      FDSQLiteConnection.GetInfoReport(ReportList);
      if FileExists('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport') then
        SQLiteTestMain.Memo1.Lines.LoadFromFile('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport');

      SQLiteTestMain.Memo1.Lines.Add('********************');
      SQLiteTestMain.Memo1.Lines.AddStrings(ReportList);
      SQLiteTestMain.Memo1.Lines.SaveToFile('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport');
      Result := True;
    except
      on E: EDatabaseError do
      begin
        ShowMessage('Fehler beim Ausführen des Statements:' + #13#13 + ASQL + #13#13 + E.Message);
        Result := False;
      end;
    end;
    finally
      Reportlist.Free;
    end;
  end;

Das Resultat ist im Anhang ersichtlich - zum Ziel führts leider nicht.
Ich werde mal die Sache mit dem Select testen.