Forum: Sonstige Fragen zu Delphi
Delphi
by Nils_13,
12. Mär 2007
lbListDragDrop(Sender, Source: TObject; X, Y: Integer);
Ich denke es bezieht sich auf die Listbox.
Forum: Sonstige Fragen zu Delphi
Delphi
by Nils_13,
12. Mär 2007
Ok, über ItemIndex ist StartPos korrekt, aber wieso ist DropPos immer noch = StartPos ?
Forum: Sonstige Fragen zu Delphi
Delphi
by Nils_13,
12. Mär 2007
Und was soll ich dann für X und Y einsetzen ? Das gibt es bei StartDrag nicht.
Forum: Sonstige Fragen zu Delphi
Delphi
by Nils_13,
12. Mär 2007
:oops: Ganz vergessen:
StartingPoint : TPoint;
und im MouseDown der Listbox:
StartingPoint.X := X;
StartingPoint.Y := Y;
Forum: Sonstige Fragen zu Delphi
Delphi
by Nils_13,
12. Mär 2007
Hi,
die Startposition ist immer gleich der Dropposition bei einem Drag&Drop in einer Listbox.
Warum ? Das darf nämlich nicht sein....
procedure TfrmMain.lbListDragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept := Source = lbList;
end;