Hallo zusammen,
mir wurde zum testen eine Logdatei bereit gestellt, ich habe schon an mir gezweifelt bis ich die Datei lokal kopiert hatte.
Wenn ich die Datei nun lokal auf dem Rechner habe, so kann ich wunderbar darauf zugreifen.
Wenn ich jedoch auf die Datei auf dem Server zugreifen möchte, so bekomme ich eine Fehlermeldung "E/A-Fehler 104".
Der Fehler tritt in der Zeile von " while not eof(f) do" auf.
Die Datei wird alle 60s aktualisiert.
Hier die Routine mit der ich auf die Datei zugreife:
Delphi-Quellcode:
function ThreadValue.ReadLogFile(Value: Integer): Double;
var
f: TextFile;
s: String;
i: Integer;
d: Double;
begin
// AssignFile(f, 'c:\temp\xxx.LOG');
AssignFile(f, '\\...\xxx.LOG');
// Fehlermeldungen ausschalten:
{$I-}
Reset(f);
{$I+}
i := 0;
DecimalSeparator := '.';
while not eof(f) do
begin
Readln(f, s);
d := StrToFloat(s);
case i of
0, 1, 2:
begin
d := d / 100;
end;
end;
if Value = i then
begin
Result := d;
end;
Inc(i);
end;
CloseFile(f)
end;
Hier der Inhalt der Logdatei:
1352.64
509.78
806.19
18.03
Vielen Dank für eure Hilfe!