Drag&Drop: Startpos immer = Droppos

[ste_ett]

Zitat von Nils_13:

Und was soll ich dann für X und Y einsetzen ? Das gibt es bei StartDrag nicht.

Delphi-Quellcode:

var
  CurPos: TPoint;


  if (GetCursorPos(CurPos)) then
  begin
     := CurPos.X;
  end;