

Listbox v Delphi
V listboxu mám seznam jmen,
po označení potřebuji jméno uložit do stringu. Nějak ale nevím jak:
procedure TForm1.ListBox1Click(Sender: TObject);
var
VybraneJmeno : string ;
begin
VybraneJmeno:= ListBox1. ?????????????????;
end;
To ku knizniciam delphi nie je ziadny reference manual ze sa pyta furt kazdy take veci?
http://www.delphibasics.co.uk/Article.asp?Name=Stan dard
procedure TForm1.ListBox1Click(Sender: TObject);
var
listBox : TListBox;
index : Integer;
begin
// Cast the passed object to its correct type
listBox := TListBox(Sender);
// Get the index of the selected list item
index := listBox.ItemIndex;
// Display the selected list item value
ShowMessage(listBox.Items[index]);
end;
Už to mám.
VybraneJmeno:= ListBox1.Items[ListBox1.Itemindex];
Cpal jsem to do kulatých závorek a to mi nebralo.
Pardon, co to? Tohle funguje editu, ale ne u listboxu. (D7)
Omlouvam se, nejak v osledni dobe spatne ctu a misto ListBox jsem cetl Combobox
Měl bych ještě jeden dotaz:
Jak programově označit některý řádek v ListBoxu? // tedy nikoliv myší.
Ak sa nemylim (uz som dlho nemal spustene Delphi):
Cislovane od 0 po pocet zaznamov - 1
Ano, díky.
VybraneJmeno:= ListBox1.Items[Listbox1.ItemIndex];