Du kannst einen Parameter nicht an jeder beliebigen Stelle verwenden.
Delphi-Quellcode:
procedure Calc;
const
SEL
= '
SELECT AG, SUM(Preis) AS GPREIS '
+ '
FROM PListe '
+ '
WHERE AG IN (%s) '
+ '
GROUP BY AG'
;
begin
with Query do
begin
SQL.Text := Format(SEL, [GetSelectedStrings(lb)]);
Open;
end
end;
Freundliche Grüße