ich habe 2 dateien .. wenn die Datei LayoutAnfang Existiert soll sie in das IMLayoutfile geschrieben werden .. ansonsten soll nichts gemacht werden.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| try
if fileExists(dtmCommon.LayoutDataPath + '\LayoutAnfang.txt') then begin
AssignFile(DataFile,dtmCommon.LayoutDataPath + '\LayoutAnfang.txt');
Reset(Datafile);
while not Eof(Datafile) do begin
ReadLn(Datafile,s);
WriteLn(IMLayoutFile,s);
end;
end;
finally
{$I-}
CloseFile(DataFile)
{$I+}
end;
Write(IMLayoutfile,LayoutFileString); |
Problem ist nun folgendes .. sobald ich zur zeile
Delphi-Quelltext
1:
| Write(IMLayoutfile,LayoutFileString); |
komme Meldet Delphi einen I/O ERROR 103 ... und das auch wenn 'LayoutAnfang.txt' nicht existiert ...
Klammere ich aber
Delphi-Quelltext
aus funktioniert alles ...
