Тема: Помогите с intersectrect
Показать сообщение отдельно
  #1  
Старый 13.09.2011, 17:49
timoneg timoneg вне форума
Прохожий
  
Регистрация: 30.08.2011
Сообщения: 14
Репутация: 10
По умолчанию Помогите с intersectrect
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
image2.top:=image2.top-10;
if intersectrect(overlay, image2.BoundsRect, image3.BoundsRect) then
ShowMessage

выдает ошибку undeclared identifier 'overlay'
Ответить с цитированием