Zahlenwert lässt sich nicht auf Integer schreiben

[fapsons]

Hallo Leute, habe folgende Funktion und procedure:

Delphi-Quellcode:

..
label9.caption := 'E56A36789';
..

function StringToOrd(s:string) : string; //String wird zu Ordinal konvertiert
var i : integer;
begin
  result := '';
  for i := 1 to length(s) do
  begin
     result := result + intToStr(ord(s[i]));
  end;
end;


procedure TForm1.Button1Click(Sender: TObject);
var test : Int64;
begin
 showmessage(StringtoOrd(label9.Caption));       // bis hierhin läuft alles wie gewünscht
 test := strtoint(StringToOrd(label9.caption));  // an dieser Stelle kommt Fehler, dass 
end;                                             // es kein gültiger Integerwert sei...

Was habe ich nicht bedacht?

Gruß
-fapsons-