Ja super, danke.
jetzt muss ich noch versuchen die
SQL Prozedur zusammenzubauen; vielleicht kannst du mir da noch ein wenig behilflich sein.
Hab so angefangen:
Delphi-Quellcode:
procedure Calc;
var SQLTEXT:
string;
begin
With Query do
begin
SQL.Clear;
SQLTEXT := '
SELECT AG,SUM(Preis) AS GPREIS ' +
'
FROM PListe ' +
'
WHERE AG IN :AGListe '+
'
GROUP BY AG';
SQL.Add(SQLText);
ParamByName('
AGListe').AsString := GetSelectedStrings(lb);
Close;
Open;
end
end;
Funktioniert nicht !
Der Parameter :AGListe wird nicht ausgewertet.
Woran liegts ?