Nächstes Item makieren

**TheMiller**

Hi,

wie kann ich in einer ShellListView das nächste Item markieren?

Danke im Vorraus

**Nightshade**

Sende mit SENDMESAGE ein Pfeiltaste Abwärts TastenDruck an dein ListView .

Wäre so meine erste Idee.

**sakura**

Meine Idee:

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

  if ShellListView1.ItemIndex < Pred(ShellListView1.Items.Count) then

    ShellListView1.ItemIndex := Succ(ShellListView1.ItemIndex)

  else

    ShellListView1.ItemIndex := 0;

end;

...

Nächstes Item makieren

Nächstes Item makieren

Re: Nächstes Item makieren

Re: Nächstes Item makieren

Forumregeln

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#1 Nächstes Item makieren 26. Feb 2004, 16:02 Hi, wie kann ich in einer ShellListView das nächste Item markieren? Danke im Vorraus
	Zitat

Nightshade Registriert seit: 7. Jan 2003 Ort: Menden 192 Beiträge Delphi 7 Enterprise	#2 Re: Nächstes Item makieren 26. Feb 2004, 16:07 Sende mit SENDMESAGE ein Pfeiltaste Abwärts TastenDruck an dein ListView . Wäre so meine erste Idee. Christian Killing for peace is like fucking for virginity Nightshade
	Zitat

sakura Registriert seit: 10. Jun 2002 Ort: München 11.412 Beiträge Delphi 11 Alexandria	#3 Re: Nächstes Item makieren 26. Feb 2004, 16:10 Meine Idee: markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); begin if ShellListView1.ItemIndex < Pred(ShellListView1.Items.Count) then ShellListView1.ItemIndex := Succ(ShellListView1.ItemIndex) else ShellListView1.ItemIndex := 0; end; ...... Daniel W. Ich bin nicht zurück, ich tue nur so
	Zitat