Показать сообщение отдельно
  #1  
Старый 28.06.2015, 01:14
nikotan nikotan вне форума
Новичок
 
Регистрация: 21.06.2015
Сообщения: 58
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию сложение строк

Здравствуйте!
хочу сложить 4 столбца и в пятом вывести сумму
т.е. в строчках данные складывать
в formcreate запихнул
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
 PageControl1.Brush.Color := clGradientInactiveCaption;
TabSheet1.Brush.Color := clGradientInactiveCaption;
TabSheet2.Brush.Color := clGradientInactiveCaption;
TabSheet3.Brush.Color := clGradientInactiveCaption;
TabSheet4.Brush.Color := clGradientInactiveCaption;
TabSheet5.Brush.Color := clGradientInactiveCaption;
//подсчёт ставок
 ADOQuery2.Close;
ADOQuery2.SQL.Clear;
AdoQuery2.Sql.Text :='select Glav+SM+SSH+RZO as ObH from Clear';
    AdoQuery2.Open;
end;
не работает.
в adoquery - sql - string "select * from clear" прописал
и табличку выдаёт.
вот что хочу сделать, сложить строчки, в последней сумма, потом надо сложить весь столбец , получится "всего", из edit (там будет цифра) вычесть "всего" и получим "остаток" запихнуть "остаток" в label.caption.
интернет не помог. 2 дня, даже на интуите искал, в SQL-EX.ru решения ну нет ни одного примера. есть с переборками ,но уж начал с sql запросами, то надо весь проект так сделать, спасибо за понимание!