Ist das eine Variable? Dann überschreibst / versteckst du die Function Today aus DateUtils...
Wenn Feld DateTime, warum dann 2 Mal die Umwandlung in string?
Code:
DateTimeField.Value := Today:
reicht, wenn aktuelles Datum gewünscht...
oder
Code:
Var
LDatum: TDateTime;
...
DateTimeField.Value := LDatum:
... wenn irgendein Datum...
oder das Feld gleich als default current_date definieren...
Frank