Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проблемка с https:// 
V
    Опции темы
Janger
Дата 24.3.2014, 13:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 43
Регистрация: 17.6.2013

Репутация: нет
Всего: 1
В общем, я бросил на форму компонент     (IdHTTP1: TIdHTTP) . Но потом я узнал что для httpS нужен ещё один компонент,    (IdSSLIOHandlerSocket1: TIdSSLIOHandlerSocket). И хотел зайти на сайт под своим логином и паролем...
Но у меня выходила постоянно ошибка, погуглил, мне сказали что нужны 2-е библиотеки: ssleay32 + libeay32
И всё равно, программа выдаёт ошибку....
Код

procedure TForm1.FormCreate(Sender: TObject);
var
a: TStringList; 
b: string;
begin
Button1.Hint:='Для изменения'+#10#13+'ЛОГИНА и ПАРОЛЯ';

a:= TStringList.Create; 
a.Add('username='+Edit1.Text);
a.Add('password='+Edit2.Text);
b:=IdHTTP1.Post('https://login.skype.com/login',a);
if Pos('logout',b) <> 0 then
ShowMessage('Yes')
else
ShowMessage('NO');

end;


IdHTTP1--> IOHandler:=IdSSLIOHandlerSocket1

_________________________________________
При компиляции ругается именно на строку: if Pos('logout',b) <> 0 then
==========================
Скрин Выходящей Ошибки
PM MAIL   Вверх
Poseidon
Дата 25.3.2014, 19:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 4
Всего: 133
На скрине написано же "Could not load SSL library". SSL library - это и есть ssleay32 и libeay32.


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
Janger
Дата 25.3.2014, 20:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 43
Регистрация: 17.6.2013

Репутация: нет
Всего: 1
Цитата(Poseidon @ 25.3.2014,  19:05)
На скрине написано же "Could not load SSL library". SSL library - это и есть ssleay32 и libeay32.

ты меня поражаешь своей сообразительностью.
Чем мне этот сайт всегда нравился, так это тем, что тут всегда можно найти очень "дельные" советы

Добавлено через 39 секунд
Я решил проблему.
PM MAIL   Вверх
Poseidon
Дата 26.3.2014, 07:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 4
Всего: 133
Если человек не может положить dll в определенную папку и прибегает на форум с криком "памагитя, некомпилиццо", то приходится давать ему такие вот советы. 


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0711 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.