Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
mit einer listbox funktioniert das supergut, bei einer listview wird das move angezweifelt. mag sich dazu jemand äußern?
procedure TForm1.Button3Click(Sender: TObject);
var
CurrIndex: Integer;
begin
if ListView1.ItemIndex > 0 then
begin
CurrIndex := ListView1.ItemIndex;
ListView1.Items.Move(ListView1.ItemIndex, (CurrIndex - 1));
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
@Christian Seehase
das stimmt nicht, soweit ich das sehen kann...
das funktioniert soweit ganz gut
ListView1.ItemIndex:= +1 ;
@M.Knebel
vielen dank für dein beispiel, ich kriege das nicht alleine hin, ist viel zu komplex... ich bin blutiger anfänger
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
ich kriege das mit dem verschieben nicht hin, zeigt mir das jemand mal?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
das funktuioniert, allerdings werden die items nicht verschoben.
procedure TForm1.raufClick(Sender: TObject);
var
i:integer;
begin
For i:=0 to ListView1.Items.Count-1 Do
If ListView1.Items.Selected then
begin
ListView1.ItemIndex := i -1 ;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
hallo daniel...
magst du mir sagen was daran falsch ist?
gruß hagen
procedure TForm1.runterClick(Sender: TObject);
var
i:integer;
begin
For i:=0 to ListView1.Items.Count-1 Do
If ListView1.Items.Selected then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
vielen dank für deinen willkommensgruß. :spin:
ich schau mir das mal an
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hagen,
2. Mai 2003
hallo :spin: wie kann ich ein markiertes item eines listview per button bewegen. stelle mir das so vor: habe zwei buttons, einen für hoch und einen anderen, um das item nach unten zu bewegen. wer mag mir dabei helfen? gruss n.hagen