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

Вниз

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

 
Пл.   (2001-12-24 17:05) [0]

Как это
i:= StrToInt(fmMain.SGrid1.Cells[1,1])+StrToInt(fmMain.SGrid1.Cells[1,2])+StrToInt(fmMain.SGrid1.Cells[1,3])+..+StrToInt(fmMain.SGrid1.Cells[1,31]);
Запихнуть в цикл? Подскажите плз.


 
Виктор Щербаков ©   (2001-12-24 17:09) [1]

Это что ли имел ввиду?
for j := 1 to 31 do
i := i + StrToInt(fmMain.SGrid1.Cells[1, i]);


 
Пл.   (2001-12-24 18:27) [2]

Спасибо, именно это, тока не
for j := 1 to 31 do
i := i + StrToInt(fmMain.SGrid1.Cells[1, i]);
а
for j := 1 to 31 do
i := i + StrToInt(fmMain.SGrid1.Cells[1, j]);

:)



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

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

Наверх




Память: 0.46 MB
Время: 0.007 c
1-42455
Electric
2001-12-24 05:28
2002.01.14
Как нажатием кнопки на своей форме прервать цикл


6-42535
KSN
2001-10-17 18:35
2002.01.14
Ошибка при работе с TClientSocket


7-42585
fsp
2001-09-29 21:15
2002.01.14
sender:Tobject


3-42373
dmimikh
2001-12-13 10:48
2002.01.14
Query


14-42557
VEG
2001-11-19 16:23
2002.01.14
Ут, блин, ФОРМАТЫ WAV:-(