Спасибо за замечание

R. Averkov 09.02.2006 04:34 / 09.02.2006 08:22

@main[][t]
$t[^table::create{id
^for[i](1;50){$i
}}]

<table border="1">
^tableInColumns[$t](6){$t.id}
</table>

@tableInColumns[table;cols;cellCode][i]
<tr>

^table.menu{
	<td^if(^table.offset[] < $cols){
	width="^eval(100\$cols + (^table.offset[] % $cols < 100 % $cols))%"
	}>$cellCode</td>

	^if(!(^table.line[] % $cols) && ^table.line[] < $table){</tr><tr>}

	}
}

^if($table % $cols){
	^for[i](1;$cols - $table % $cols){<td><br/></td>}
}

</tr>

Ваш и мой метод теперь работают практически с одинаковой скоростью. Расход памяти при разном значении $cols в пользу то одного метода, то другого.

---