|
Вопрос # 1 322/ вопрос открыт / |
|
Приветствую, уважаемые эксперты!
Как перемножить строки компонента listbox? (каждый раз в Listbox появляется разное количество строк)
Я написал свой вариант, неправильно получается
Приложение: Переключить в обычный режим- procedure TForm1.Button3Click(Sender: TObject);
- var c,res,res2:integer;
- begin
- c:=1;
- res:=listbox2.ItemIndex*c;
- listbox2.Items.add(inttostr(res));
- end;
 |
Вопрос задал: Сергей-1388 (статус: Посетитель)
Вопрос отправлен: 6 февраля 2008, 18:04
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Не знаю, как понять до конца, что тебе нужно, но я попробую интерпретировать так, как я это представляю, хотя не могу предположить, какой практический смысл содержится в решении этой задачи.
// Перемножение содержимого ListBox
// Допустим, что в ListBox находятся N строк, каждая из которых
// может быть преобразована в тип Integer с помощью функции StrToInt().
// Тогда:
var
Index, Mul: Integer;
begin
Mul:= 1; // Начальное произведение
for Index:= 0 to ListBox.Items.Count - 1 do
Mul:= Mul * StrToInt(ListBox.Items[Index]);
ShowMessage('Произведение = ' + IntToStr(Mul));
end;
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 7 февраля 2008, 08:35
|
Мини-форум вопроса
Всего сообщений: 5; последнее сообщение — 6 февраля 2008, 19:32; участников в обсуждении: 2.
|
Dron (статус: Студент), 6 февраля 2008, 18:27 [#1]:
Что вы имеете ввиду под перемножением? Новый список, где каждой строке листа А соответствуют все строки листа Б?
С уважением.
|
|
|
Сергей-1388 (статус: Посетитель), 6 февраля 2008, 18:38 [#2]:
ну вот появились в Listbox2 в столбик числа, над опроизведение их узнать и все
Вот на скрине форма
http://slil.ru/25444808
|
|
|
Dron (статус: Студент), 6 февраля 2008, 19:07 [#3]:
Забавно. А что делает тот код, который вы привели в своём вопросе? Умножает номер выделенной строки на 1 - это что, результат?
С уважением.
|
|
|
Сергей-1388 (статус: Посетитель), 6 февраля 2008, 19:17 [#4]:
Ну там сначала на один умножается, потом на другие строки должен результат умножаться, получается что строки перемножатся, а они бесконечно перемножаютсЯ, надо остановить
|
|
|
Dron (статус: Студент), 6 февраля 2008, 19:32 [#5]:
1) Причём здесь номер выделенной строки?
2) Как вы хотите одной строкой кода перемножить сразу все значения?!
Алгоритм: цикл по всем строкам, каждый раз умножая на число из текущей строки.
С уважением.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
