Тема: цикл
Показать сообщение отдельно
  #1  
Старый 08.08.2008, 18:18
Аватар для artemavd
artemavd artemavd вне форума
Начинающий
 
Регистрация: 05.08.2008
Сообщения: 115
Репутация: 12
По умолчанию цикл

Вот цикл подсчета суммы в ячейках StringGrid-a:
Код:
var 
  i: integer;
  summ: array[1..25] of  real;
begin
  for i:=1 to 25 do
       begin
         summ:=(StrToFloat(SG3.Cells[2,i])+ StrToFloat(SG3.Cells[8,i])+                     
                       StrToFloat(SG3.Cells[14,i])+ StrToFloat(SG3.Cells[20,i])/4;
         SG3.Cells[26,i]:=FloatToStr(summ,ffFixed,1,1);
       end;
end;
Помогите мне записать пожалуйста условие,к оторое бы проверяло на отсутствие данных и если данных нет то в таблице бы ставились нули!)
Ответить с цитированием