Problem with InterSectRect

[jolana_bases]

Hello!

Whats the problem with InterSectRect?
It shows me Error:Indentifier not found "Inter SectRect"??

procedure TForm1.Timer1Timer(Sender: TObject);
var
  Overlay: Trect;
begin
 bumba;

 if InterSectRect(Overlay, Shape2.BoundsRect,Shape1.BoundsRect) then
 begin
   VelX:=-VelX-random(5);
   VelY:=-VelY-random(5);
 end;           

[Leledumbo]

It's declared in Types unit, do you have it in the uses clause?

[jolana_bases]

What do I need to write un Uses?

[Leledumbo]

Types