Problem mit IntToStr

[Schopper]

Hi ich möchte ein Programm schreiben, dass mir Brüche kürzt. Ich habe auch alles soweit fertig bekommen nur irgendwie bringt er mir immer an der Stelle

Delphi-Quellcode:

procedure TForm1.findeGGT;
var tausch,b,a: integer;
begin
Z1 := a;
N1 := b;
    repeat
    IF a > b
    then
    begin
        tausch := a;
        a := b;
        b := tausch
    end
      else
      b := b-a;
      until a=b;

      ggt := a;

end;

procedure TForm1.B_KuerzClick(Sender: TObject);
begin
findeGGT;
[B]E_Z1k.Text := IntToStr(Z1/ggt);[/B]       <--- Da zeigt er den Fehler an
[B]E_N1k.Text := IntToStr(N1/ggt);[/B]       <---          "
end;

den Fehler:

Es gibt keine überladene Version von 'IntToStr', die man mit diesen Argumenten aufrufen kann.

Weiß nicht weiter. Würde mich über eure Hilfe freuen
PS: Die Variablen Z1,N1 und ggt sind global deklariert als Integer