Показать сообщение отдельно
  #2  
Старый 18.05.2011, 18:33
Человек_Борща Человек_Борща вне форума
Новичок
 
Регистрация: 17.09.2010
Адрес: Беларусь, г. Минск
Сообщения: 58
Версия Delphi: 7, 2010,XE
Репутация: 10
По умолчанию

Код:
var
  P:TPoint;
begin
GetCoursorPos(P);
Form1.Top:=p.X;
Form1.Left:=p.Y;
end;
Ответить с цитированием