procedure TfrmStkFileDataInput_New.LoadFromTxtFile(const AFileName: string;
ARow: TStringList);
var
Stream: TStream;
begin
Stream := TFileStream.Create(AFileName, fmShareDenyNone or fmOpenReadWrite);
try
ARow.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;
uj5u.com熱心網友回復:
正在寫的檔案可能是獨占方式打開的uj5u.com熱心網友回復:
這是作業系統決定的,在磁盤管理的操作,作業系統,編輯檔案(讀與寫)時,只能一個用戶進行。只能該用戶結束后,才能另一用戶讀寫它。如果你非得要讀,正在寫的檔案,可以找到該檔案的在記憶體中的地址,通過地址讀取值。
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/71395.html
標籤:語言基礎/算法/系統設計
