Цитата:
|
Сообщение от Kerby
Появилось новое требование к программе. В список ListBox должны вноситься не все значения поля (Имя), а лишь выбранные. Здесь нашел пример кода для CheckBox'a. В данном случае он должен находится напротив каждой строки в таблице. Пользователь отмечает нужные имена галочкой и потом уже формируется список из выбранных имен. Я пробовал пример кода для CheckBox вписать в программу, но результат нулевой. Буду разбираться с этим дальше. Может кто подскажет как организовать цикл или какое условие нужно добавить, чтобы в списке оказывались только выбранные пользователем имена.
|
Сделай два списка (ListBox). В первом будут адреса из базы, во втором отобранные. При щелчке перебрасывай во второй список.
Если хочешь в одном, то при выборе в ListBox:
Код:
...
SelectedMails: string;
...
procedure ListBox....
begin
if (ListBox.ItemIndex<>-1) and (pos(ListBox[ListBox.ItemIndex], SelectedMails)=0) then
SelectedMails := SelectedMails+ListBox[ListBox.ItemIndex]+'; ';
end;
...