Speicherkontrolle von Laufwerken

[Computerbabalulu]

Zu früh gefreut

Wenn ich folgenden Code benutze:

Delphi-Quellcode:

procedure TForm1.Timer3Timer(Sender: TObject);
var
  freeSpace, totalSpace: Double;
  s: Char;
begin
  s := 'c';

  freeSpace  := DiskFree(Ord(s) - 64);
  totalSpace := DiskSize(Ord(s) - 64);

  freespace := Round((totalSpace - freeSpace) / totalSpace * 100);
Label8.Caption := IntToStr(freespace) + ' % belegt.';

    if freespace < 79 then label8.Font.color:= clLime
          else label8.Font.color:= clred;

    if freespace > 90 then
        ShowMessage ('Achtung! Maximale Speicherkapazität von Laufwerk P fast erreicht.');[/

dann bekomme ich diese Fehlermeldung:


[Fehler] Test1.pas(222): Es gibt keine überladene Version von 'IntToStr', die man mit diesen Argumenten aufrufen kann

Weist du warum ??