مشكل في وظيف لقلب سلسله حروف

[color= #000000; font-weight: bold;]function Reverse[color= #009900;](input[color= #339933;]:string [color= #009900;])[color= #339933;]: string[color= #339933;];

[color= #000000; font-weight: bold;]var

    inputArray [color= #339933;]: [color= #990000;]array of char[color= #339933;];

begin

    SetLength[color= #009900;](inputArray[color= #339933;],input[color= #339933;].Length[color= #009900;])[color= #339933;];

    inputArray [color= #339933;]:= input[color= #339933;].ToCharArray[color= #009900;]([color= #009900;])[color= #339933;];

    [color= #339933;]&Array[color= #339933;].Reverse[color= #009900;](inputArray[color= #009900;])[color= #339933;];

    result[color= #339933;]:=&String[color= #339933;].Create[color= #009900;](inputArray[color= #009900;])[color= #339933;];

[color= #990000;]end[color= #339933;];