Topic: Вопрос по циклу
Кто подскажет? Как сделать что бы значение iCol шло с шагом 4
for iCol := 5 to c do
My Visual Database → Russian → Вопрос по циклу
Кто подскажет? Как сделать что бы значение iCol шло с шагом 4
for iCol := 5 to c do
Кто подскажет? Как сделать что бы значение iCol шло с шагом 4
for iCol := 5 to c do
for iCol := 5 to c do
iCol := iCol + 4
...
end?
Или я не понял вопрос? Просто первой строчкой в цикле увеличивай на 4. Или последней, в зависимости от того, что в цикле происходит.
Сделал так:
iCol := 5;
While iCol <= c do
begin
for iRow := 0 to r do
if (datato.TableGrid3.Cells[iCol,iRow])<> '' then
begin
if (datato.TableGrid3.Cells[iCol,iRow])= '1' then datato.TableGrid3.Cell[iCol+1,iRow].Color := clGreen else datato.TableGrid3.Cell[iCol+1,iRow].Color := clYellow ;
end;
iCol := iCol+4;
end;
My Visual Database → Russian → Вопрос по циклу
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi