Delphi-Quellcode:
if FileExists(Textdatei) and FileExists(Textdatei2) then begin
Zwischenspeicher.LoadFromFile(Textdatei);
Zwischenspeicher2.LoadFromFile(Textdatei2);
end
Was ist wenn eine der beiden Dateien leer ist? Oder eine Datei nicht existiert?
Dann knallt es sofort beim Zugriff in der nächsten Zeile...
Also am besten noch abfragen ob
Delphi-Quellcode:
if (Zwischenspeicher.Lines.Count = 0) or (Zwischenspeicher2.Lines.Count = 0) then
DoSomething or Exit for instance;