[Lumia]

Здравствуйте.
Мне нужно сделать так, чтобы при запуске написанной программы она располагалась около курсора мыши?

Использоваться будет так: при нажатии колёсика мышки запускается данная программа, а т.к. курсор каждый раз в разном месте находится, то и программа должна каждый раз иметь разные координаты (для удобства и быстрого доступа).
Уточняю, окно программы НЕ должно двигаться за курсором.

[PS11011010]

Код:

var
  foo: TPoint;
begin
  GetCursorPos(foo);
  form.top:=foo.Y;
  form.left:=foo.X
end;