| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
вычмсление [D6, Access]
PTE © (2002-06-11 14:39:00)не получается отображать в DBText1 итоговую сумму по столбцу в DBGrid/ Сумму считаю так
procedure TForm4.FormClick(Sender: TObject);
var ssql: string;
begin
ssql :="SELECT sum(kolvo*cena) FROM detail";
Table2itogsum.Value :=Query1.SQL.Add(ssql);
Query1.Open;
end;
постоянно возникает ошибка. Как правильно отображать эту сумму? причем так что когда меняют значения в DBGrid менялась и сумма итоговая, в DBGrid я поставил вычисляемое поле на ячейку в строке
Table2summa.Value :=Table2kolvo.Value*Table2cena.Value;
оно работает а вывести итоговую по столбцу на DBText1 не получается
помогите пожалуйста
PTE (2002-06-11 20:10:00) [1]нифига не понял в helpe как мне считать свою сумму, кто-нибудь работал уже с DBGridEh DBSumList? как он пашет?
PTE (2002-06-11 19:14:00) [2]да все установил, только пока не разобрался как мне там сумму подсчитывать. Мне необходимо все DBEdit заменить на DBEditEh?
PTE (2002-06-11 17:56:00) [3]Братцы что-то с архиво скачал, а он то ли битый то ли как никто не поможет не скинет мне а?
Johnmen (2002-06-11 16:16:00) [4]Разновидность DBGrid"а из библиотеки EhLib, только навороченная...
farpost.com/personal/dmitryb/RUS
PTE (2002-06-11 16:16:00) [5]а все нашел забыл про yandex
спасибо посмотрел скриншоты понравилось.
PTE (2002-06-11 16:08:00) [6]ага ясно, а что такое DBGridEh и где его взять и где про него почитать?
Johnmen (2002-06-11 15:38:00) [7]Варианты
1. Выполняешь в нужный момент SELECT на получение суммы, и пихаешь ее куда надо...
2. Пробегаешься по НД и вычисляешь сумму...
3. А чтоб вообще не парится - используй DBGridEh.
PTE (2002-06-11 15:25:00) [8]а как не бред то будет
Johnmen (2002-06-11 15:21:00) [9]....Бр-р-р-р-р-р....Полный бред, извиняюсь...
PTE (2002-06-11 15:16:00) [10]Дало эту ошибку project raised exception class EDBEngineError with message "Couln"t" perform the edit because another user changed the record
Не туда вставил ?
procedure TForm4.Table2CalcFields(DataSet: TDataSet);
begin
Table2summa.Value :=Table2kolvo.Value*Table2cena.Value;
Query1.SQL.Clear;
Query1.SQL.Add("SELECT sum(kolvo*cena) as SUM1 FROM detail");
Query1.Open;
Table2.Edit;
Table2itogsum.Value :=Query1.FieldByName("Sum1").Value;
Table2.Post;
end;
Kaban (2002-06-11 14:44:00) [11]Table2itogsum.Value :=Query1.SQL.Add(ssql); ????
кроме того, может Query1.Sql.clear поможет?
Lord Warlock (2002-06-11 14:44:00) [12]ssql :="SELECT sum(kolvo*cena) as SUM1 FROM detail";
Query1.SQL.Clear;
Query1.SQL.Add(ssql);
Query1.Open;
Table2.Edit;
Table2itogsum.Value :=Query1.FieldByName("Sum1").Value;
Table2.Post;
| |
