(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
Delphi 11 Alexandria
|
Re: bis zum letzten backslash löschen :)
16. Aug 2004, 01:30
Moin The Seed,
oder Du nimmst ExtractFilepath:
ExtractFilepath(copy('c:\windows\system\',1,length('c:\windows\system\')-1))
Statt der Konstanten dann natürlich eine Variable.
Es muss nur sichergestellt sein, dass der Wert auch auf \ endet.
Endet er hingegen garantiert nicht auf \ kannst Du Dir sogar das copy(...) sparen.
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
|