Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
19. Mär 2010
genau
im Prinzip gibt es diese Möglichkeiten:
var V: TPoint;
V := DragObject.DragPos;
V.Y := V.Y + FView.Top;
V.X := V.X + FView.Left;
DragObject.DragPos := V;
var V: TPoint;
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
18. Mär 2010
Delphi 2010 meckert jetzt endlich mal, wenn man sowas versucht, denn früher war es zwar möglich, aber nicht wirklich.
Gab vor 'ner Weile auch einen Thread dazu.
.DragPos ließt wirklich das Property (TPoint) aus, aber X und Y würden nur innerhalb des ausgelesenen Wertes geändert und nicht innerhalb der Komponente
with DragObject.DragPos do
begin
y := y + FView.Top;
X := X +...