Crear array of char con valores predeterminados

[BDWONG]

Tienes que usar arreglos dinamicos y asi podras establecer el tamaño segun el caso especifico
te dejo esto haber si te sirve

Código Delphi [-]
function funcion(texto:string):boolean;
var
  probando: Array of Char;
begin

    SetLength(probando,length(texto)+7);
    writeln('Tamano del arreglo ',length(probando));

    result:=true;
end;

begin

  writeln(funcion('cadena'));
  readln;
end.

saludos.......