Hoi,
aber wie wärs wenn er nach dem
/ nach der
IP sucht?
Hier ein Beispiel:
Delphi-Quellcode:
function changeIP(oldadr,newIp:
String):
String;
var
s:
string;
i : Integer;
begin
s := oldadr;
delete(s,1,pos('
//',s)+1);
// HTTP:// wegschneiden, man geh davon aus dass es immer auf "//" endet
delete(s,1,pos('
/',s)-1);
// Die IP wegschnippel ( also bis zum nächsten "/")
result := '
http://' + newIP + s;
// HTTP davor dann die IP und dann der rest ...
end;
Das ganze wird so aufgerufen:
Button1.Caption := changeIP('http://192.168.168.100/secure/mp3/der Tietel.mp3','192.168.168.230');