procedure SetLength(S: String; NewLength: Integer)  

Устанавливает новую длину строки или массива. При изменении длины строки или массива данные сохраняются.

Параметры:

• S - строка или массив.
• NewLength - новая длина.