![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сложение столбца
Maxio © (2003-09-26 15:56:00)
Здрастуте!
У меня такой вопрос: Как сложить значения 1 столбца в DBGrid? програмным путём, но не в SQL!
Vlad (2003-09-26 17:13:00) [1]
Label.Caption:=FloatToStr(S);
Только насчет Extended... Думаю MsGuns © погорячился. Double вполне хватит.
Zacho (2003-09-26 17:10:00) [2]
> Maxio (26.09.03 17:01) [4]
Да нет данных в DBGrid"е, нет и все ! DBGrid только отображает данные из подключенного к нему набора данных.
P.S. Не почитать ли тебе учебники ?
P.P.S. Если не хочешь читать - посмотри TDBGridEh из библиотеки EhLib.
Maxio (2003-09-26 17:01:00) [3]
Извените за непонемание!
Мне нужно сложить всё поле в DBGridе и вывести полученный результат в Label.
Спосиьо за внимание!
Малиновский Владимир (2003-09-26 16:53:00) [4]
Вы еще кипятите?
MsGuns уже выезжает со своими TLabel"s, TDBGrid"s и лицензионным Delphi.
-------------
Ты что, хочешь значения всех записей в один TLabel засунуть, или только текущую? Используй DB - Aware компоненты
Maxio (2003-09-26 16:49:00) [5]
А как полученный результат вывести в Label?
MsGuns (2003-09-26 16:22:00) [6]
var
bk: TBookMark;
s: extended;
begin
DBGrid1.DataSource.Enabled := false; // Убрать мелькание
with Table1 do
begin
GetBookMark(bk); // Текущая запись НД = активная строка гр
First; // В начало НД
s := 0;
while not EOF do
if FieldByName("<Имя поля НД>").AsString>"" then
s := s+FieldByName("<Имя поля НД>").AsFloat;
GoToBookMark(bk); // Вернуться в исх.запись
FreeBookMark(bk); // Освободить ресурс
end;
DBGrid1.DataSource.Enabled := true; // Возобновить отображение
end;
На SQL аллегрия ?