Hallo Lord_Stifterl,
probiere es mal so:
Code:
Dummy := ExtractFileExt(SHLVFiles.Folders[i].PathName)
bzw. nur der angezeigte Name ohne Pfad:
Code:
Dummy := ExtractFileExt(SHLVFiles.Folders[i].Displayname)
i ist natürlich durch den jeweiligen Index zu ersetzten
PS: mit der Forumsuche hättest Du das aber auch gefunden.
cu
ereetzer