Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

Цикл 


Пл.   (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]);

:)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.015 c
1-42429           VID                   2001-12-22 16:28  2002.01.14  
Выделение слова из строки


1-42488           Анатолий              2001-12-24 05:39  2002.01.14  
Метка


1-42519           Andrey196             2001-12-26 16:15  2002.01.14  
Как из события одново компонента вызвать событие другово компонета


1-42477           Анатолий              2001-12-24 05:41  2002.01.14  
Кнопка


1-42402           Phisio                2001-12-26 16:11  2002.01.14  
Как нарисовать выбирающий прямоугольник у мышки как в стратежках