Så här t ex:
function StrEfterSistaSlash(str: string): string;
begin
if pos('/', str) = 0 then
Result := str
else
Result := StrEfterSistaSlash(Copy(str, pos('/', str) + 1, Length(str)));
end;
1 svar · 216 visningar · startad av Roing
Tjena.
Vi har en länk i en textsträng ex:
http://www.webforum.nu/newthread.php
ur denna vill vi ha:
newthread.php
Hur gör vi det?
mvh
Så här t ex:
function StrEfterSistaSlash(str: string): string;
begin
if pos('/', str) = 0 then
Result := str
else
Result := StrEfterSistaSlash(Copy(str, pos('/', str) + 1, Length(str)));
end;