Datumsformat in DB ändern von 04 nach 20004

[torud]

Das Problem war oder ist, dass ich damals ein anderes Datumsformat auf dem System eingrichtet hatte. Viel Schwerer wiegt der Fehler, dass das Feld vom Typ her String ist. Mit diesem Code habe ich es zumindestens inhaltlich erstmal gelöst.

Delphi-Quellcode:

procedure TForm1.btn_set_dateClick(Sender: TObject);
var
  datum:TDateTime;
begin
    with Table1 do
      begin
        while not Eof do
          begin
            edit;
            Datum := StrToDate(FieldValues['date']);
            FieldValues['date'] := Datum;
            post;
            Next;
          end
      end
end;