Nur noch eine Bemerkung: Ich habe mich gewundert, wozu die Variable slist: TStringList
ist, sie wird anscheinend nicht verwendet. Findet der Compiler überigens auch. Ich habe sie versuchsweise auskommentiert, und ohne scheint es genauso gut zu funktionieren.
Upps, die Variable hatte ich vergessen (ich wollte es zuerst ohne
with
machen).
Gut zu wissen, dass es dir aber weitergeholfen hat.
Gruß,
Sven