|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
Delphi 11 Alexandria
|
Re: SHGetFileInfo und Dateien in der Path-Umgebungsvariable
7. Jan 2005, 14:32
Moin Ringli,
wenn sichergestellt ist, dass die Parameter immer mit Blank vom Pfad getrennt sind kannst Du es doch so machen:
Delphi-Quellcode:
sPath := trim(copy(sPathInclPara,1,LastDelimiter(' ',sPathInclPara)));
sExt := ExtractFileExt(sPath);
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|