2 Stimmen

Sie möchten eine Datei in eine TStringList einlesen

Ja, ich möchte eine einfache Logdatei in eine TStringList einlesen und das ist mit LoadFromFile leicht möglich. Aber das Problem ist, dass die Datei bereits von einem anderen Programm zur gleichen Zeit geöffnet werden kann, so dass eine Ausnahme auftreten kann. Ich habe versucht, zu verwenden:

FileMode := fmShareCompat;

Aber es wird nicht funktionieren.

Ich habe auch versucht, zu verwenden:

fFilePath := fPathList[PathIndex] + '\' + FileData.Name;
AssignFile(vFile, fFilePath);
Reset(vFile, 1);  // Recordsize = 1

SetLength(vFileString, FileData.Size);
BlockRead(vFile, vFileString, FileData.Size);   
vCurrentFile.Text := vFileString;

Es wird ein EInOutError mit der Meldung I/O error 998 ausgelöst.

Haben Sie einen Vorschlag?

CodeJaeger.com

CodeJaeger ist eine Gemeinschaft für Programmierer, die täglich Hilfe erhalten..
Wir haben viele Inhalte, und Sie können auch Ihre eigenen Fragen stellen oder die Fragen anderer Leute lösen.

Powered by:

X