|
Registriert seit: 4. Dez 2003
44 Beiträge
Delphi 5 Enterprise
|
Re: Datum übersetzen
21. Jan 2004, 15:44
Hier ist meine Lösung:
procedure TForm1.sql_artikelCalcFields(DataSet: TDataSet);
var
sDatum: string;
begin
sDatum := sql_artikel['date'];
sDatum := copy(sDatum, 7, 2) + '.' + copy(sDatum, 5, 2) + '.' + copy(sDatum,
1, 4);
sql_artikel['cDatum'] := sDatum;
end;
Es klappt. Frage ist nur, ob man es so stehen lassen kann?
|