ARRASSTRING2 — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Пример) |
||
| Строка 8: | Строка 8: | ||
[[Файл:12-09-2016 11-30-18.png]] | [[Файл:12-09-2016 11-30-18.png]] | ||
| + | |||
| + | = Полный текст функции = | ||
| + | |||
| + | parameters aa | ||
| + | |||
| + | local i | ||
| + | |||
| + | result := '' | ||
| + | |||
| + | if Empty( aa ) | ||
| + | return | ||
| + | endif | ||
| + | |||
| + | for i := 1 to len( aa ) | ||
| + | result := result + iif( Empty( result ), [ '], [, '] ) + aa[i] + [' ] | ||
| + | next | ||
| + | |||
| + | result := result | ||
= Смотрите также = | = Смотрите также = | ||
Версия 11:27, 12 сентября 2016
ARRASSTRING2 - это программа из справочника R266
Преобразование массива в строку
Пример
ArrAsString2( { 1, 2 })
Полный текст функции
parameters aa local i result := if Empty( aa ) return endif for i := 1 to len( aa ) result := result + iif( Empty( result ), [ '], [, '] ) + aa[i] + [' ] next result := result
