Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by neolithos,
7. Okt 2003
Für Anfänger empfehle ich die Sache mit den Schalter.
Und die andere Sache (Drag&Drop) ist nicht so einfach...
1. Stelle DragMode der Liste auf dmAutomatic.
2. Lege das Ereignis DragOver der ListBox an
procedure TForm1.ListBox1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
// AutoScroll und anzeigen wo der Eintrag hin soll
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by neolithos,
6. Okt 2003
aktuelle Position meine ich den Eintrag den du verschieben möchtest
der kann zum Bsp. der gewählte sein.
lst.Items.Move(lst.ItemIndex, lst.ItemIndex + 1);
Verschiebt den gewählten eintrag um eins nach unten
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by neolithos,
6. Okt 2003
Bsp:
deine Liste heißt lst.
lst.Items.Move(, );
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by neolithos,
6. Okt 2003
Items.Move
Sorted sollte, falls sein
Selbe verfahren wie in einer StringList