Habe die lösung selber gefunden !
Das Edit1.text ist das gesuchte Datum (13.04.2004).
Delphi-Quellcode:
stag := copy(edit1.Text,0,2);
smonat := copy(edit1.Text,4,2);
sjahr := copy(edit1.Text,7,4);
dm_auftrag.q_selbstbucher.Close;
dm_auftrag.q_selbstbucher.SQL.Text :=
' select (lname + " " + lname2) as name, lplz, lort, versand_id from bestellung ' +
' where extract(Day from versand_datum) =' + stag +
' and extract(month from versand_datum) =' + smonat +
' and extract(year from versand_datum) =' + sjahr +
' group by versand_id order by versand_id ';
dm_auftrag.q_selbstbucher.Open;
Gruß
Reinhard
