VPF::Перенос из одного listbox'a в другой

dize

Дата 4.8.2009, 10:41 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 128
Регистрация: 1.7.2009

Репутация: нет
Всего: нет

Необходимо из первого листбокса выделенные элементы перенести в другой, на этой же форме, а затем присвоить выделенным элементам значение Edit.

Это сообщение отредактировал(а) dize - 4.8.2009, 10:43

--------------------

- Скажите, Большой Брат существует в том же смысле что и я? - Вы не существуете.

Christoph

Дата 4.8.2009, 11:51 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 667
Регистрация: 23.1.2008
Где: Харьков

Репутация: 5
Всего: 11

Код


var
  i:Integer;
  StrList:TStringList;
begin
StrList:=TStringList.Create;
 try
  for i:=0 to ListBox1.Items.Count - 1 do
    if ListBox1.Selected[i] then  StrList.Add(ListBox1.Items[i]);
 ListBox2.Items.Assign(StrList);
 finally
  FreeAndNil(StrList);
 end;
end;

Этот код копирует элементы, из одного бокса в другой, а присвоить выделеным элементам строку из Едита, допиши сам, я просто не знаю, в 1 боксе надо это сделать или во втором.

--------------------

dize

Дата 10.8.2009, 10:44 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 128
Регистрация: 1.7.2009

Репутация: нет
Всего: нет

Во втором. Кстати, этот код почему-то добавляет всего 1 строку которую выбираешь, если выбрать другую, нежели первоначальную, заменяет.

--------------------

- Скажите, Большой Брат существует в том же смысле что и я? - Вы не существуете.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »