ARRASSTRING2

ARRASSTRING2 - это программа из справочника R266

Преобразование массива в строку

ARRASSTRING2( Массив значений )

То же самое, что и ArrAsString, только ArrAsString всегда удаляет пробелы, а ArrAsString2 сохраняет пробелы

Например,

ArrAsString({' 1',' 2',' 3'})='1,2,3'
ArrAsString2({' 1',' 2',' 3'})=[' 1',' 2',' 3']

Совсем не то же самое: в ArrAsString 5 параметров, а здесь, увы, - 1.

Пример

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

Смотрите также

Полезные функции

Функции Delphi