Главная страница
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.06 c
1-1125936347
lock
2005-09-05 20:05
2005.09.25
спираль


6-1117640758
Flame
2005-06-01 19:45
2005.09.25
idhttp


2-1124355965
Гость22
2005-08-18 13:06
2005.09.25
Как в поле DBLookupComboBox1 уствновить необходимое ...


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


3-1123664069
Max4
2005-08-10 12:54
2005.09.25
перемещение курсора по DBGrid