Diese Zeilen dürfte er wohl nicht mehr ausführen, der Fehler passiert vorher:
Delphi-Quellcode:
if (fMain.slTmp1.Strings[0] <> '') and (fMain.slTmp1.Strings[3] <> '') then // hier...
:
if (fMain.slTmp2.Strings[0] <> '') and (fMain.slTmp2.Strings[3] <> '') then // ...und hier
Wenn die Listen leer sind, ist der Zugriff auf die Elemente
nicht zulässig.
Nimm einfache Stringvariablen statt der Listen slTmp1 und slTmp2, dann hast du den Ärger nicht.
Gruß Hawkeye