FindFirst usw unterschlagen Verzeichnisse

[Jörn]

Hmm abgesehen davon, dass ich einmal

if suche.Attr = 16 then vergessen habe (vor dem ersten hinzufügen zum memo), sehe ich da keinen Unterschied zu deiner Variante, ustra. s14, dein Ratschlag ist natürlich sinnvoll, hat mich eben allerdings nicht interessiert *gg*.