Hallo,
ich lese aus der Registry
HKCU\Software\Microsoft\Windows\CurrentVersion\Int ernet Settings\ den Wert ProxyServer.
Dieser sieht folgendermaßen aus:
ftp=195.100.85.159:3128;gopher=195.100.85.159:3128 ;http=195.100.85.159:3128;https=195.100.85.159:312 8
Jetzt möchte ich alles, was vor http= usw. steht wegschneiden.
Danach möchte ich bis zum : lesen und den Port in ein Extrafeld schreiben und ebenfalls bis zum ; lesen und den Rest wegschneiden.
Meine Abfrage sieht folgendermaßen aus:
Delphi-Quellcode:
// prüfen, ob es sich um Zahlen handelt
if (Ord(s[1])<=48) and (Ord(s[1])<=57) then
begin
// lesen bis zur Stelle, wo http= beginnt
if pos(s,'http=') < 0 then
begin
// vorderen Teil wegschneiden
Delete(s,6,pos('http=',s)-1-5);
// in eine Variable kopieren
s := copy(s,1,pos(':',s)-1);
// usw.
s := s + copy(s,1,pos(';',s)-1);
end
else
MessageDlg('Kein HTTP-Proxy eingetragen!',mtInformation,[mbOk],0);
end
else
ShowMessage('Rien ne va plius!');
Weiß jemand weiter? Ich nicht mehr..