請教各位高手: 有無辦法,如此作: var t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10:String; i :integer; begin for i := 1 to 10 do begin t0:='t' inttostr(i); .....利用幾行code,將某個值指定給 變數明稱為 t0的內含值(ex: t1,t2..t10) .....有點好像這樣 ^t0:='abcdefg'; ..... end;

用 array, 例:

var t: array[0..10] of string;
  i: Integer;
begin
  for i := 0 to 10 do
    t[i] := IntToStr(i);
end;

謝謝,用陣列當然可以,我的用途是將很多的變數名稱定義於資料檔中,同時也將其初值與內含值放入其中.於系統開始時,我只要將此檔案打開並讀取進來即可,該資料檔有點像這樣: varname vardefau varval explan ======= ======== ======= ========= CompNO 'A0001' 'A0001' 公司號 CompNA '大大股' '大大股' 公司明稱 : : : : : : : : ComPORT 1 1 序列埠代號