[DOR]

Код:

pt: TPoint;

а что это означает?
ругается на

Код:

pt := Point(Left, Top + Height);