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-

[DelphiKlaus]

Kann es sein, dass der Wert einfach ein bisschen zu groß ist? StringToOrd dürfte einen 18-stelligen String zurückliefern und der läßt sich nicht in ein Integer pressen.

[fapsons]

Gibt es denn eine Möglichkeit diesen auf einen String zu schreiben und dann trotzdem damit zu rechnen?

Gruß
fapsons

[mkinzler]

VLI

[fapsons]

Habe mir jetzt zum Thema VLI alles mögliche mal durchgelesen.
Habe mir auch die Unit VLI mal runtergeladen.
Der einzige Haken ist, dass man damit nur multiplizieren kann, oder wie benutzt du die Unit?