[Katerina1993]

Мне нужно присвоить эту процедуру к переменной. Какой тип переменной объявить в var?

Код:

CurrentString := CreateStrArray(strArray,['Раз', 'Два', 'Три', 'Четыре', 'Пять']);

Например
var CurrentString: -> ?