Delphi - 공유 위반 텍스트 파일 열기

Question

다른 응용 프로그램에 이미 파일이 열려 있기 때문에 I/O 오류 32 (공유 위반)가 발생합니다. 나는 "fmOpenRead 또는 fmShareDenyNone"으로 FileMode를 설정해 보았습니다 만, 이제는 이것이 어쨌든 텍스트 파일에는 적용되지 않습니다.

다른 응용 프로그램에서 열려있는 텍스트 파일을 읽을 수있는 방법이 있습니까?

var 
    f: TextFile; 
begin 
    FileMode := fmOpenRead or fmShareDenyNone; // FileMode IS NOT APPLICABLE TO TEXT FILES!! 
    AssignFile(f, FileName); 
    Reset(f); 

Answer 1

이렇게하면 문제가 즉시 해결됩니다. TStringList를 사용하여 파일을로드하십시오. 그냥 전화 :

... 
var sl: TStringList; 
begin 
    sl := TStringList.create(); 
    try 
    sl.loadFromFile(Filename); 
    ...do your stuff here... 
    finally 
    freeAndNil(sl); 
    end; 
end; 

나는 텍스트 파일을 다루는 것으로 나타났습니다. TStringList를 사용하는 것이 가장 좋습니다. 그렇지 않으면 TFileStream에 가서 거기에 개봉 모드를 지정할 수 있습니다.

Answer 2

다른 프로세스에서 파일을 연 방법에 따라 다릅니다 ... 파일을 독점적으로 열면 전혀 성공하지 못합니다.

TextFile은 오래된 모자입니다. 이전 스타일의 DOS와 호환되도록 독점 모드로 열립니다. TFileStream 또는 유사하게 사용해야합니다.

TStringList는 다른 프로세스가 수행중인 작업에 따라 다시 작동 할 수도 있습니다. 그러나 파일이 쓰여지는 경우 (예 : .log 파일) fmShareDenyWrite가 작동하지 않습니다.

Answer 3

올바르게 기억한다면 텍스트 파일에만 적용되는 Textfilemode 변수도 있습니다. 어쩌면이 같은

Answer 4

:

vFileList := TStringList.Create; 
    try 
    vFileStream := TFileStream.Create('myfile.txt', fmOpenRead or fmShareDenyNone); 
    try 
     vFileList.LoadFromStream(vFileStream); 
    finally 
     vFileStream.Free; 
    end; 
    // Use vFileList 
    finally 
    vFileList.Free; 
    end; 

Answer 5

오히려 LoadFromFile보다 TStringList를의 LoadFromStream 방법을 사용합니다. 당신은 잠금 그런 식으로 제어 할 수 예는 TStringList에로드 할 스트림을 사용하고 있음을

var 
    slFile: TStrings; 
    stream: TStream; 
begin 
    slFile := TStringList.Create; 
    try 
     stream := TFileStream.Create(filename, fmOpenRead or fmShareDenyNone); 
     try 
     slFile.LoadFromStream(stream); 
     finally 
     stream.Free; 
     end; 

     //Use the stringlist 
    finally 
     slFile.Free; 
    end; 
end; 

. 조각 만 읽고 싶다면 그렇게 할 수 있습니다. 스트림에서 읽으십시오.