WhiteUnicorn |
| |
#WhiteUnicorn/ StartPage/ Documentation/DelphiFAQ > | |
|
KEYWORDS: TListbox Multiselect AREA: VCL Programming Navigating a multiselected listbox This example shows a message for every element in a listbox that has been selected by the user. procedure TForm1.Button1Click(Sender: TObject); var Loop: Integer; begin for Loop := 0 to Listbox1.Items.Count - 1 do begin if Listbox1.Selected[Loop] then ShowMessage(Listbox1.Items.Strings[Loop]); end; end; TI
| |
#WhiteUnicorn/ StartPage/ Documentation/DelphiFAQ > | |
|
| ||
Anastasija aka WhiteUnicorn |
LiveJournal PhotoFile |
|
|