delphi 分割文本并定义为不同变量类型
Form1.idhtp1.ProxyParams.ProxyServer := mydomain (string)
Form1.idhtp1.ProxyParams.ProxyPort : = 8080 (Intger)
读取出来的地址是类似 mydomain:8080
请问高手如何写这个分割?
procedure TForm1.myProce(s1:string);
var i:integer;
begin
i:=pos(':',s1);
Form1.idhtp1.ProxyParams.ProxyServer:= Copy(s1, 1, i - 1);
Form1.idhtp1.ProxyParams.ProxyPort := strtoint(Copy(s1, i 1,Length(s1)-i));
end;