dectohex

[MasterTobi]

hey

Delphi-Quellcode:

  function DecToHex(n:int64):string;
var s:string;
    c:char;
begin
s:='';
while n<>0 do
  begin
   if n mod 16 <10 then c:=chr(n mod 16+ord('0'))
                   else c:=chr(n mod 16+ord('A')-10);
   s:=c+s;
   n:=n div 16;
  end;
result:=s;
end;


procedure TForm2.Button4Click(Sender: TObject);
begin
 edit1.Text := inttostr( dectohex (Edit3.Text));
end;

edit1.Text := inttostr( dectohex (Edit3.Text)); hier sagt er mir den fehler :
[Fehler] Unit2.pas(130): E2010 Inkompatible Typen: 'Int64' und 'TCaption'
warum?