Witam!
Mam następujący problem, chciałbym, aby ze stringa np. 'C:\Windows\system32', było wyodrębione ostatnie słowo, w tym przypadku 'system32',
jak tego dokonać?
otóż należało by napisać taką funkcję która usuwała by wszystkie znaki do ostatniego slesza razem z nim.
Chodzi mi tutaj o nazwę katalogu, gdyby ktoś wiedział jak to zrobić, lub miał podobny problem to proszę o pomoc.
Za ewentualne odpowiedzi serdecznie dziękuję :-)
Function nazwaPliku(const sciezka : String) : String;
//made by Korpirkor
var
x : integer;
begin
x := LastDelimiter('/', sciezka);
if x < LastDelimiter('\', sciezka) then
result := extractfilename(sciezka)
else
Result := Copy(sciezka, x + 1, Length(sciezka) - x);
end;
Funkcja działa zarówno na ścieżki Windowswoskie jak i Unixowe.
;] hmm.., no tak mogłem popróbować, rozwiązanie było bardzo proste, dzięki :)
