Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TListBox


Eugeni ©   (2004-12-11 07:30:00) 

Здравствуйте!!!
Подскажите пожалуйста пример суммирования чисел, находящихся в ListBox.

kusia@lipetsk.ru


begin...end   (2004-12-11 13:42:00) [1]

> [1] Antonn ©   (11.12.04 10:18)

> ii-summa

Да нет, это не сумма...


Antonn   (2004-12-11 10:18:00) [2]

var i,ii:integer;
begin
ii:=0;
for i:=0 to listbox1.items.count-1 do
ii:= trunc( strtofloat( listbox1.items.string[i] ));

ii-summa


Наверх

Титульная страница Поиск, карта сайта Написать письмо