Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.09.25;
Скачать: CL | DM;

Вниз

dbgrid   Найти похожие ветки 

 
Roman9   (2005-08-17 13:40) [0]

мастера подскажите
как просуммировать колонку до указателя (курсора) в dbgride
заранее спасибо


 
dolmat   (2005-08-17 13:57) [1]

procedure TForm1.Button1Click(Sender: TObject);
var
  SavePlace: TBookmark;
  r:real;
begin
r:=0;
with table1 do
  begin
   SavePlace := GetBookmark;
while not Bof do begin
r:=r+table1field.asfloat;
Prior;
end;
GotoBookmark(SavePlace);
FreeBookmark(SavePlace);
end;
end;


 
alex_***   (2005-08-17 16:10) [2]

+DisableControls()/EnableControls();



Страницы: 1 вся ветка

Текущий архив: 2005.09.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.033 c
11-1106738887
thaddy
2005-01-26 14:28
2005.09.25
ann:JCL Winapi32 for kol


5-1099854489
Vcoder
2004-11-07 22:08
2005.09.25
Быстрый вывод на экран


6-1117675691
Lex_!
2005-06-02 05:28
2005.09.25
Работа с Explorerом (программный выбор елементов)


2-1124049275
СА
2005-08-14 23:54
2005.09.25
Печать


14-1123609221
rts111
2005-08-09 21:40
2005.09.25
Оцените программу