Главная страница
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.026 c
1-1125312847
kyn66
2005-08-29 14:54
2005.09.25
Поиск в ListBox на полное совпадение...?


3-1123604223
Punch
2005-08-09 20:17
2005.09.25
Как убрать ненужный "Locate"?


6-1117564524
Purg
2005-05-31 22:35
2005.09.25
Client-Server-Client


1-1125409650
Anat
2005-08-30 17:47
2005.09.25
РЕГУЛЯРНЫЕ ВЫРАЖЕНИЯ


14-1124963749
Василий Александрович
2005-08-25 13:55
2005.09.25
Обмен паспорта и дактилоскопия - законно ли это?