Показать сообщение отдельно
  #8  
Старый 07.10.2010, 12:55
Аватар для Dead_Gigabit
Dead_Gigabit Dead_Gigabit вне форума
Начинающий
 
Регистрация: 20.10.2009
Адрес: Там где холодно и сыро.... брр
Сообщения: 135
Версия Delphi: Delphi XE
Репутация: 10
По умолчанию

Все спасибо работает

Код:
DM.ARH.SQL.Clear;
DM.ARH.SQL.Add('select SKLADARH.NAME, sum(SUMMA), sum(KOL), SKLADARH.SHET, SKLADARH.PRICE');
DM.ARH.SQL.add('from "SKLADARH"');
DM.ARH.SQL.add('WHERE DATE_D  >= :D');
DM.ARH.SQL.add('and DATE_D  <= :R');
DM.ARH.SQL.add('and FLAG like ''' +'%'+'2'+'%''');
DM.ARH.SQL.add('group by NAME,SHET,PRICE');
DM.ARH.Parameters.ParamValues['D'] := formatdatetime('yyyy.mm.dd', (datetimepicker2.Date));
DM.ARH.Parameters.ParamValues['R'] := formatdatetime('yyyy.mm.dd', (datetimepicker3.Date));
 DM.ARH.Active:=true;
Ответить с цитированием