Rückgabewert aus Query auslesen

[mkinzler]

Warum die Derived Table?
Warum setzt du die Abfragen immer neu, wenn du schon Parameter verwendest?

Delphi-Quellcode:

   ZQuery.Text := 'SELECT Count(*) FROM tblTracks WHERE path = :path;';
   ZQuery.Prepare;
   ZQuery2.Text :=' INSERT INTO tblTracks(Artist, Album, Track, Title, Path) VALUES (:artist, :album, :track, :title, :path);';
   ZQuery2.Prepare;
   for i := 0 to tmp.Count-1 do
   begin
      ZQuery.ParamByName('path').AsString := tmp.Strings[i];
      Zquery.Open;
      // anzahl prüfen, wenn nicht existiert einfügen
      if ZQuery.Fields[0].AsInteger = 0 then begin
            
       ZQuery2.ParamByName('artist').AsString := id3.Artist;
       ZQuery2.ParamByName('album').AsString := id3.Album;
       ZQuery2. ParamByName('track').AsInteger := strToInt(id3.Track);
       ZQuery2.ParamByName('title').AsString := id3.Title;
       ZQuery2.ParamByName('path').AsString := tmp.Strings[i];
       ZQuery2.ExecSQL;
      end;