Geht denn sowas?
Delphi-Quellcode:
SQL.Clear;
SQL.Add('
SELECT');
SQL.Add('
FELD1, FELD2, DATUM');
SQL.Add('
WHERE');
SQL.Add('
FELD1 IN (&liste) AND');
SQL.Add('
DATUM >= :DATE1');
SQL.Add('
ORDER BY');
SQL.Add('
FELD1 DESC');
ParamCheck := true;
ParamByName('
DATE1').AsDateTime:= StartOfTheDay(DateTimePicker1.Date);
MakroByName('
DATE1').Value:= '
:p0,:p1,:p2,:p3';
ParamByName('
p0').AsIrgendwas:= ...;
ParamByName('
p1').AsIrgendwas:= ...;
Den String für das Makro müßte man berechnen lassen, oder, wenn's mit Makro nicht geht, dann StringReplace oder so, direkt ins
SQL.Text
Ohne das Makro hatte ich sowas mal verwendet.
