ListBox: Item Selektieren?

[Pseudemys Nelsoni]

ja, schon wieder sone frage :\

wie kann ich ein item markieren? damit meine ich nicht die gestrichelte linie sondern das blaue viereck (wow gut beschrieben )

mit ItemIndex gehts nicht

[SirThornberry]

also wenn ich per ButtonClick
  Listbox1.ItemIndex := 2; setze so wird das dritte Item in meiner Listbox selektiert und wird auch blau dargestellt

[Treffnix]

ansonsten versuch mal  Listbox.Selected[ Nr ] := true; *edit* Fehler behoben

[Pseudemys Nelsoni]

hallo sir thornberry,

wenn ich ausserhalb meiner items klicke (siehe anhang) dann wird mir als itemindex "2" ausgegeben, obwohl item 0 markiert ist (multi select is true btw)

heisst das, das wenn ich das letzte item markieren möchte folgendes tun muss:

Listbox1.itemindex := Listbox1.itemindex ???

das sieht mir so unsinnvoll aus

[Sprint]

Für MultiSelect:

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
var
  I: Integer;
begin

  Memo1.Clear;

  for I := 0 to ListBox1.Items.Count - 1 do
  begin
    if ListBox1.Selected[I] then
      Memo1.Lines.Add(ListBox1.Items[I]);
  end;

end;

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin

  ListBox1.Selected[2] := True;
  ListBox1.Selected[4] := True;

end;