如何输出一个数组？

Question

将从串口读了一些数到一个数组中，想在屏幕上将他输出看看，怎么实现

Answer 1

?假设数据为a1,
for i:=low(a1) to high(a1) do
  showmessage(IntToStr(a1[i]);

Answer 2

ShuZu: array of integer;
cX,cY: integer;
begin
  cX := 100; cY := 100;
  for i := Low(ShuZu) to High(ShuZu) do 
  begin
    Self.Cavnas.TextOut(cX,cY,IntToStr(ShuZu[i]));
    Inc(cY,10);
  end; 
end;

Answer 3

var
    RDbuff: array[1..5] of integer;
    cX,cY,i: integer;begin
  RDbuff[1]:=1;
  RDbuff[1]:=2;
  RDbuff[1]:=3;
  RDbuff[1]:=4;
  RDbuff[1]:=5;
  cX := 100; cY := 100;
  for i := 1 to 5 do
  begin
    Self.Canvas.TextOut(cX,cY,inttostr(RDbuff[i]));    Inc(cY,10);
  end;
end;我测试了一下，写了这个过程，输出的是
5
3
3
37
2
实际上应该输出的是1 2 3 4 5