Konventere timestamp til datetime

Kode 

function TimestampToDateTimeEx(Stamp: String): TDateTime;
var
  Year, Month, Day, Hour, Minute, Second: String;
begin
  if Length(Stamp) <> 14 then
    raise Exception.Create('Timestamp length must på 14');
  Year := Copy(Stamp, 1, 4);
  Month := Copy(Stamp, 5, 2);
  Day := Copy(Stamp, 7, 2);
  Hour := Copy(Stamp, 9, 2);
  Minute := Copy(Stamp, 11, 2);
  Second := Copy(Stamp, 13, 2);
  Result := EncodeDateTime(StrToInt(Year), StrToInt(Month), StrToInt(Day), StrToInt(Hour), StrToInt(Minute), StrToInt(Second), 0);
end;

Jeg har et timestamp i Delphi (20041021001130 - altså: 21-10-2004 kl. 00:11:30) som en string. Men hvordan kan jeg konventere det til DateTime, så jeg kan bruge FormatDateTime?
Jeg kan ikke bruge TimestampToDateTime-funktionen, da det er som en string at jeg har tallet.

En alternativ til at bruge FormatDateTime, så jeg kan få Delphi til at skrive "21. oktober 2004", uden at konventere til DateTime først er også ok ;-)

--
Thomas