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

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

Нужно просуммировать [D7, Paradox]

Страницы:   < 1 2 >

sloug ©   (2004-08-02 18:52:00) 

Добрый вечер уважаемые знатоки! Вопрос в следующем. Есть таблица Table1,в ней есть столбец Cost, мне нужно просуммировать значения всех записей в этом столбце. Как это сделать?

---

сергей1   (2004-08-02 20:43:00) [21]

а еще можно вот так :

form1.ADOQuery1.SQL.Text:='select sum(cost) from Table1 ';
form1.ADOQuery1.Open;

---

DSKalugin   (2004-08-02 19:15:00) [22]

var s:Double;
   c: LongInt;
begin
 s:=0;
 c:=Table1.RecNo;
 Table1.DisableControls;
 Table1.First;
 while not Table1.eof
   do s:=s+Table1.FieldByName('Cost').asFloat;
 Table1.RecNo:=c;
 Table1.EnableControls;
 label1.caption:=FloatToStr(s);
end;

---

Страницы:   < 1 2 >

Наверх