array[0..0] of UCHAR怎样以string的形式输出

Question

用于在Form1.Edit1.Text的形式输出，怎样进行类型的转换

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var s:array[0..10] of uchar;
    t:pchar;
begin
  getmem(t,11);
  fillchar(s,11,'a');
  copymemory(t,@s,11);
  showmessage(t);
end;

Answer 2

楼上的代码有问题列，没有使用FreeMem释放申请的内存。用强制类型转换试试。
procedure TForm1.Button1Click(Sender: TObject);
var s:array[0..10] of uchar;
begin
  showmessage(string(s));
end;

Answer 3

[Error] Unit1.pas(97): Invalid typecast

Answer 4

array[0..0] of UCHAR是什么意思，为什么0..0呢？