TP讀取（包含圖片名稱的檔案）時出現 I/O 錯誤 104 ：
procedure TfrmAvatar.FormShow(Sender: TObject);
var
sLocation: String;
TU, TP: textfile;
sUser: string;
iTemp: integer;
begin
sLocation := ExtractFileDir(ExtractFileDir(ExtractFileDir(ParamStr(0))));
AssignFile(TU, (sLocation '\Username.txt'));
Reset(TU);
Readln(TU, sUser);
edtUser.Text := sUser;
CloseFile(TU);
AssignFile(TP, (sLocation '\Profile.txt'));
Reset(TP);
Readln(TU, sUser); //Getting 104 here on read
ShowMessage(sLocation sUser);
imgAvatar.Picture.LoadFromFile(sLocation sUser);
CloseFile(TP);
end;
就像我上面說的，我只是從分配的檔案中讀取一行TP。我看不出我的錯誤在哪里。如果很明顯，請告訴我。
uj5u.com熱心網友回復：
TU您正在從已關閉的檔案句柄 ( )中讀取。你想做的是
readln(TP, suser);
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/530427.html
標籤：德尔福
上一篇：手柄滑鼠雙擊定制