ParamStr(0) liefert einen String, der den kompletten Pfad und den Dateinamen deines Programms enthält.
ExtractFilePath(ParamStr(0)) liefert den Verzeichnisnamen.
Edith sagt: zu langsam
Karl-Heinz
Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen)