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

Вниз

Помогите, плиииз!   Найти похожие ветки 

 
Holod   (2006-04-18 08:22) [0]

Привет всем! У меня такая проблема: нужно умножить 1 столбец компонента StringGrid на другой столбец, и найти сумму. Пишу следующее:
for i := 1 to StringGrid1.RowCount -1 do
Z1:=StrToFloat(StringGrid1.Cells[1,i]);
Z2:=StrToFloat(StringGrid1.Cells[2,i]);
Z:=Z1*Z2;
begin
SXi_Yi1:=SXi_Yi1+Z;
end;
Естессна все переменные объявлены и обнулены(какие нужно). Все компилируется, вот только при запуске вылезает ошибка.


 
balepa ©   (2006-04-18 08:54) [1]

for i := 1 to StringGrid1.RowCount -1 do
begin
 Z1:=StrToFloat(StringGrid1.Cells[1,i]);
 Z2:=StrToFloat(StringGrid1.Cells[2,i]);
 Z:=Z1*Z2;
 SXi_Yi1:=SXi_Yi1+Z;
end;
Может так.
Ошибка какая ?


 
antonn ©   (2006-04-18 08:55) [2]

Holod   (18.04.06 8:22)
for i := 1 to StringGrid1.RowCount -1 do begin
Z1:=StrToFloat(StringGrid1.Cells[1,i]);
Z2:=StrToFloat(StringGrid1.Cells[2,i]);
Z:=Z1*Z2;
SXi_Yi1:=SXi_Yi1+Z;
end;



> вот только при запуске вылезает ошибка.

в следующий раз говори, что за ошибка


 
antonn ©   (2006-04-18 08:55) [3]

хех...



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

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

Наверх




Память: 0.47 MB
Время: 0.057 c
2-1145371762
Beni
2006-04-18 18:49
2006.05.07
HexToBin(), BinToHex()


15-1144809637
Skyle
2006-04-12 06:40
2006.05.07
EPL 2, принтеры этикеток


2-1145263141
Youta
2006-04-17 12:39
2006.05.07
Excel


2-1145316227
ooops
2006-04-18 03:23
2006.05.07
Поток(TThread)


2-1145445776
golik
2006-04-19 15:22
2006.05.07
Данные в Таблице. как проверить ?