Hi daywalker-dj-k,
Query1.SQL.Add('SELECT * FROM auftragspositionen INNER JOIN (auftraege INNER JOIN kunden ON auftraege.bestellid = kunden.kdnr) ON auftraege.aufnr = auftragspositionen.aufnr WHERE auftraege.haltenbis = "'+MakeSQLDate(DateToStr(date))+'" and auftraege.ok = ""');
würde ich ersetzen durch:
Query1.SQL.Add('SELECT * FROM auftragspositionen INNER JOIN (auftraege INNER JOIN kunden ON auftraege.bestellid = kunden.kdnr) ON auftraege.aufnr = auftragspositionen.aufnr WHERE auftraege.haltenbis = :bis and auftraege.ok = ""');
Vor dem öffnen des Querys dann den Parameter setzen:
Query.ParamByName('bis').AsDate := Date;
Habs nicht getestet, sollte aber so in etwa laufen.