Zitat von
gmc616:
Wäre dann die Lösung width nicht zu verwenden?
genau
im Prinzip gibt es diese Möglichkeiten:
Delphi-Quellcode:
var V: TPoint;
V := DragObject.DragPos;
V.Y := V.Y + FView.Top;
V.X := V.X + FView.Left;
DragObject.DragPos := V;
Delphi-Quellcode:
var V: TPoint;
V := DragObject.DragPos;
DragObject.DragPos := Point(V.X + FView.Left, V.Y + FView.Top);
[delphi]DragObject.DragPos := Point(DragObject.DragPos.X + FView.Left,
DragObject.DragPos.Y + FView.Top);/delphi]