各位前輩:
我帶讀取TXT檔案後將資料寫入Meno但是出現錯誤訊息
TXT內容如下：
1,2,3,4,5,
11,22,33,44,
55,44,88,66,
77,99,
程式碼如下
[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
slNum: TStringList;
a: array of Integer;
i: Integer;
begin
Memo1.Clear;
slNum := TStringList.Create;
try
slNum.LoadFromFile('C:\TEST.txt');
if slNum.Count = 0 then Exit;
slNum.Text := StringReplace(slNum.Text ,',',#13, [rfReplaceAll]);
SetLength(a,slNum.Count);
for i:=0 to slNum.Count-1 do
begin
a[i]:=strtoint(slNum.Strings[i]);
Memo1.Lines.Add(Format('a[%d]=%d', [i, a[i]]));
end;
finally
slNum.Free;
end;

end;
[/code]

錯誤訊息如下:
'' is not a valid integer Value

請各位前輩 指導一下 是哪裡錯誤導致
萬般感激 謝謝!

請你用 F8 Tracer 逐行檢視錯在那裡?