Показать сообщение отдельно
  #4  
Старый 27.07.2011, 14:19
Аватар для Viajero
Viajero Viajero вне форума
Активный
 
Регистрация: 14.06.2011
Адрес: РБ
Сообщения: 214
Версия Delphi: Delphi 7 FB 2.5
Репутация: 5849
По умолчанию

Код:
dbg.SelectedRows.DataSet.First;
Это неправильно. SelectedRows не cоздаёт Датасета .
SelectedRows.DataSet указывает на родительский Датасет.
В справке к EhLib написано, что с SelectedRows надо работать, как с набором вкладок.
Попробуй так, хотя я не тестировал, и почитай внимательно справку к EhLib
Код:
//DBG.SelectedRows.DataSet можно заменить на идентификатор родительского Датасета
var
i:integer;
sum:real;
begin
sum:=0;
//for I:=1  to dbg.SelectedRows.Count-1 do begin
  for i := 0 to DBG.SelectedRows.Count-1 do begin
GotoBookmark(pointer(DBG.SelectedRows.DataSet.SelectedRows.Items[i]));
       sum:=sum + dbg.SelectedRows.DataSet.FieldByName('SUMMA').AsFloat;
//    DBG.SelectedRows.DataSet.Next; не нужен
  end ;
  ShowMessage(FloatToStr(sum));
end;
__________________
- Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА!
Ответить с цитированием