|
Вопросов delphi тема
Здесь буду задавать по мере поступления свои вопросы по дельфи.
1.
Пытаюсь подключить к регеру прокси. При нажатии на кнопку, выскакивает ошибка:
EStringsListError with message list index out of bounds(0).
Код:
i:integer;
all:tstringlist;
s, ip, port2:string;
for i:=0 to strtoint(edit1.Text) do //цикл до значения едита
s:=all[i]; //присваиваю переменной s значение ip:port строки i массива всех проксей
ip:=copy(s,1,pos(':',s)-1); //получаю ип
port2:=copy(s,pos(':',s)+1,length(s)); //получаю порт
idhttp1.proxyparams.ProxyServer:=ip;
idhttp1.proxyparams.ProxyPort:=strtoint(port2);
Где ошибка? Убейте, не пойму.
(\__/)
(='.'=)
(")_(")
Это Кролик. Скопируй кролик себе в подпись, чтобы помочь ему на пути к мировому господству!
|