Если переменная keys типа integer, нужно писать так— keys:=StrToInt(copy(Acc[kays1],1,pos(';',(Acc[kays1]-1))));
"Попробовать загрузить какую-нибудь заранее известную легковесную страничку из Интернет – если грузится, значит все в порядке, прокси рабочий."
Минимум кода просто Использовал StringReplace?
Юзай Synapse. В VKApi все написано
Где находится TIdSSLIOHandlerSocketOpenSSL :D