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

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

Помогите написать запрос с суммированием! [D6, Paradox]


agrig ©   (2002-04-09 21:55:00) 

проблема: есть таблица в которой два поля.
1. №автоинкремент
2. число
Надо получить набор данных в котором:
1. № тот самый автоинкремент
2. сумма всех чисел с№ меньше текущего.
Как сделать без хранимых проседур? (paradox - все таки!)


Ra   (2002-04-10 03:16:00) [1]

это проще не запросом сделать, а ручками

query:
select №, число
from таблица
order by №

и из этого датасета забросить данные в RxMemoryData

sum:=0;
while not(query.eof) do begin
sum:=sum+query.fields[1].value;
RxMemoryData.Append;
RxMemoryData.fields[0].value:=query.fields[0].value;
RxMemoryData.fields[1].value:=sum;
RxMemoryData.post;
query.next;
end;


Наверх

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