Drag&Drob [D7, WinXP]
ALL © (2005-05-24 11:46:00)
Не подскажите как сделать так чтобы объект на форме
перетаскивался не чётко на то место где отпущена мышь,
а на предусмотренные области на форме при попадании и
отпускании
мыши в которых объект чёско становился в это область а не в
X,Y-куосора.
Чапаев (2005-05-24 11:52:00) [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;
Наверх 
ЧАТ |
Орешник |
|
