C cocobom Unregistered / Unconfirmed GUEST, unregistred user! 2006-02-28 #1 s1 = array[0..0] of SmallInt 这是个什么数组来的，元素是0吗？
K k8nt2k Unregistered / Unconfirmed GUEST, unregistred user! 2006-02-28 #2 数组只有一个元素 如：声明了S1的变量 var ary:S1; ary只有元素ary[0].
H highsnow Unregistered / Unconfirmed GUEST, unregistred user! 2006-02-28 #3 这是只有一个数据的数组 操作如：s1[0] := 1 A := S1[0];
B bbscom Unregistered / Unconfirmed GUEST, unregistred user! 2006-02-28 #5 procedure TForm1.Button1Click(Sender: TObject); var s1 : array[0..0] of SmallInt; L,H:Integer; begin L:=Low(S1) // 這是取數組的低位 H:=High(S1) // 這是取數組的高位 ShowMessage(IntToStr(L)+' / '+IntToStr(H)); end;
procedure TForm1.Button1Click(Sender: TObject); var s1 : array[0..0] of SmallInt; L,H:Integer; begin L:=Low(S1) // 這是取數組的低位 H:=High(S1) // 這是取數組的高位 ShowMessage(IntToStr(L)+' / '+IntToStr(H)); end;
