Wieso so umständlich?
Es müsste doch gehen wenn du den Parameter schon auf Delphi-Ebene als Datumswert mittels
Query.Params.ParamByName('DATUM').AsDate := Datum;
übergibst.
Und was soll diese bescheuderte DD-MM-YYYY - Formatierung? Entweder ISO-Format (YYYY-MM-DD) oder "normales" Format (DD.MM.YYYY).