bool Variable in DLL Datei verursacht Fehler!

[Chris4712]

Leider geht delay nicht in der DLL

Delphi-Quellcode:

procedure Delay(msecs:integer);
var
  FirstTickCount:longint;
begin
  FirstTickCount:=GetTickCount;
  repeat
    Application.ProcessMessages; {allowing access to other controls, etc.}
  until ((GetTickCount-FirstTickCount) >= Longint(msecs));
end;

Fehler:
[Fehler] CamInitialization.dpr(56): Undefinierter Bezeichner: 'GetTickCount'
[Fehler] CamInitialization.dpr(56): Undefinierter Bezeichner: 'GetTickCount'
[Fehler] CamInitialization.dpr(58): Operator oder Semikolon fehlt