| Новости | FAQ | Авторы | Документация | В действии | Библиотека |
| Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
Sergey M. 23.10.2004 00:08
@print[title;hash][key;value]
<p>$title ^hash.foreach[key;value]{$key}[ | ]</p>
=$hash.[zzz].rrggbb=
@main[]
$table[^table::create{color rrggbb
red ff0000
green 00ff00
blue 0000ff
_default 000000}
]
$b_hash[$._default[]]
^table.menu{
^if($table.color eq "_default"){
$b_hash._default[$table.fields]
}{
^b_hash.add[$.[$table.color][$table.fields]]
}
}
^print[b_hash:;$b_hash]причём значение в исходной таблице не обязательно должно быть eq "_default", оно может быть любым на усмотрение, вплоть до "", нужно будет просто заменить условие на !def $table.color...