아래를 참고하세요..
첫 번째 방법은 배열의 칸 수 만큼..
아래는 원하는 갯수 만큼 스트링으로 환산 합니다..


From 류..

---------

procedure TForm1.Button1Click(Sender: TObject);
Var
   chArray : Array [1..10] of Char;
   stTemp : String;
begin
  chArray[1]:= 'A';
  chArray[2]:= 'A';
  chArray[3]:= 'A';
  stTemp:= String(chArray);
  ShowMessage(stTemp);

  SetLength(stTemp, 3);
  Move(chArray, stTemp[1], 3);
  ShowMessage(stTemp);
end;