Скачать: CL | DM;

Drag&Drob   Найти похожие ветки 

← →
ALL   (2005-05-24 11:46) [0]

Не подскажите как сделать так чтобы объект на форме перетаскивался не чётко на то место где отпущена мышь,
а на предусмотренные области на форме при попадании и отпускании
мыши в которых объект чёско становился в это область а не в
X,Y-куосора.

---

← →
Чапаев ©   (2005-05-24 11:52) [1]

Ну вот примерно так:


if Source is TGroupBox then begin
   Frame:=(Source as TGroupBox).Parent as TframeSetIntensity;
   Frame.Parent:=Sender as TWinControl;
   Frame.Top:=(Y div 10)*10;
   Frame.Left:=(X div 10)*10;
end;


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.03 c