[T@nker]

рассмотрю пример экранной лупы
как зделать так же чтоб при нажатии и удерживании форма перемещалась

Сорь метод уже узнал))))

[Casper-Hacker]

Код:

1 2 3 4 5

Const SC_DragMove=$F012; begin ReleaseCapture; perform (WM_SysCommand,SC_DragMove,0); end;

Добавить в процедуру OnMouseDown у формы, если еще кому интересно.