Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DGL-luke,
25. Mär 2006
tatsächlich... hätt ich doch zuvor selber ausprobieren sollen... dann musst dus doch rausnehmen und wieder einfügen.
i := ListView1.Selected.Index;
s := ListView1.Selected.Caption;
Listview1.Selected.Delete;
Listview1.Items.Insert(i-1).Caption := s;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DGL-luke,
25. Mär 2006
Na probiers doch einfach mal...
procedure OneUp(Item: TListViewItem);
begin
Item.Move(Item.Index-1);
end;
Das hier sollte schon seinen Dienst tun.