Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi и сети
Войти
Регистрация
Восстановить пароль
 
Popcornrus
0 / 0 / 0
Регистрация: 07.09.2016
Сообщений: 36
#1

Библиотеки libeay32.dll ssleay32.dll - Delphi

13.09.2016, 20:13. Просмотров 4201. Ответов 11

Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm1.Button5Click(Sender: TObject);
var
LoadStream : TMemoryStream;
begin
LoadStream := TMemoryStream.Create();
idHTTP1.Get('https://cloud.mail.ru/public/Lq9S/s5idW4Lpx/anlisbac.txt', LoadStream);
LoadStream.SaveToFile('anlisbac' + '.txt');
Button5.Enabled:=False;
 
LoadStream.Free;
end;
Добавил 2 библиотеки в папку с проектом. Выдает ошибку "Could not load SSL library"
Куда эти библиотеки кидать?
Indy 10_5367;
Delphi 7;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.09.2016, 20:13
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Библиотеки libeay32.dll ssleay32.dll (Delphi):

dll библиотеки
как сделать библиотеку для delphi 7 вроде басс только небольшую...

Клиент-Серверная программа с использованием dll -библиотеки
Дана такая задача: Разработать на Delphi клиент-серверное приложение....

bass.dll
Есть программка которая проигрывает интернет радио. Хотелось бы сделать...

Dll и ClientSocket/ServerSocket
Есть клиентское приложение с Buttom, edit,label и clientsocket. Как сделать...

Dll и ClientSocket/ServerSocket
Есть клиентское приложение с Buttom, edit,label и clientsocket. Как сделать...

Не работает NMHTTP в dll
В основной программе была функция Function GetInfo : shortstring; Var s :...

11
BOGG ART
576 / 444 / 146
Регистрация: 09.12.2013
Сообщений: 2,384
Записей в блоге: 2
13.09.2016, 21:01 #2
Например в папку с проектом, всё верно. Не единственный вариант, но самый разумный.
Вероятнее всего сами библиотеки неподходящие. Не те версии или типа того.
Я как-то искал для Делфи7 для коробочной версии Indy - так и не нашёл.

Добавлено через 2 минуты
Со всякими TIdSSLIOHandlerSocket и TIdSocksInfo пробовали шаманить?

Добавлено через 5 минут
Где вы брали сами библиотеки? Пробовали ли другие (из других мест/веток)?

Добавлено через 12 минут
И как-то так:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Var
      URL: String = 'https://.../anlisbac.txt';
      SAVE_PATH: String = 'C:\TEMP\';
 
Procedure TForm1.Button1Click(Sender: TObject);
Var LoadStream: TMemoryStream; FileName: String;
begin
FileName:=SAVE_PATH+ExtractFileName(StringReplace(URL, '/', '\', [rfReplaceAll]));
LoadStream:=TMemoryStream.Create();
Try
      Try
            IdHTTP1.Get(URL, LoadStream);
            LoadStream.SaveToFile(FileName);
      Except
            On E: Exception Do
                  ShowMessage('Exception: '+E.ClassName+#13#10#13#10+E.Message);
            End;
Finally
      LoadStream.Free();
      End;
End;
Добавлено через 52 секунды
А ещё лучше отдельный метод создать, с параметрами что/куда/откуда.

Добавлено через 23 минуты

Не по теме:

По поводу содержимого файла: "Монстр" - вещщ, "Триган" - классика, "Soul Eater" - улёт, добавьте "Полулюди/Ajin" и "Измерение «W»".

1
Popcornrus
0 / 0 / 0
Регистрация: 07.09.2016
Сообщений: 36
13.09.2016, 21:05  [ТС] #3
Спасибо, если есть какие-то предложения, пишите мне в скайп misa-013!
0
Hikari
Хитрая блондиночка $)
1451 / 960 / 399
Регистрация: 21.12.2015
Сообщений: 3,785
13.09.2016, 21:06 #4
Цитата Сообщение от Popcornrus Посмотреть сообщение
Could not load SSL library
Скорее всего не той версии библиотеки.
0
Popcornrus
0 / 0 / 0
Регистрация: 07.09.2016
Сообщений: 36
13.09.2016, 21:27  [ТС] #5
А можно ссылочку?
0
BOGG ART
576 / 444 / 146
Регистрация: 09.12.2013
Сообщений: 2,384
Записей в блоге: 2
13.09.2016, 22:17 #6
Ну тут надо Гуглить, скачивать, пробовать - и именно на вашем окружении/версиях Делфи/Инди. Вот одна из первых ссылок.

Не по теме:

Кстати у вас по ссылке скачается не файл, а HTTP-страница вьювера.

0
Popcornrus
0 / 0 / 0
Регистрация: 07.09.2016
Сообщений: 36
13.09.2016, 22:30  [ТС] #7
А как файл скачивать?
0
MINO
12 / 12 / 5
Регистрация: 03.06.2016
Сообщений: 124
Завершенные тесты: 1
14.09.2016, 07:24 #8
https://www.openssl.org - от сюда качали?
0
Popcornrus
0 / 0 / 0
Регистрация: 07.09.2016
Сообщений: 36
14.09.2016, 13:26  [ТС] #9
Да, именно с этого сайта
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
14.09.2016, 21:51 #10
Popcornrus, попробуйте эти SSL библиотеки. Поместите их в каталог с приложением. Должно работать
4
Вложения
Тип файла: rar ssl-lib.rar (556.1 Кб, 708 просмотров)
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
14.09.2016, 21:57 #11
P.S. проверил - работает
0
Kostantin-78
0 / 0 / 1
Регистрация: 17.03.2012
Сообщений: 145
03.02.2018, 22:52 #12
Доброе время суток,
а подскажите, была такая же фигня с Delphi7, но в новом свете решил перейти на RadStudio 10.2 Tokyo,
но там оказалась та же фигня.
Скачал библиотеки предоставленные в сообщении номер #10,
если заходишь на страницу, обычную, т.е. "http://" - то все нормально

а если на страничку с безопасным соединением "https://", то вылазит ошибка:
Код
---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EIdHTTPProtocolException with message 'HTTP/1.1 403 Forbidden'.
---------------------------
Break   Continue   Help   
---------------------------
Заранее спасибо
0
03.02.2018, 22:52
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.02.2018, 22:52
Привет! Вот еще темы с решениями:

Delphi7 qtintf70.dll
Написал программу рандом, передал другу у которого понятным делом нет Delphi....

Адаптация DLL, написанной на С++, к Delphi
Есть одна DLL библиотека из которой мне нужно достать функции. Чтобы с этими...

Ошибка при использовании DLL
код - длл function AuthCheck(User, HWID, GOOD: string ; id:integer): string;...

Zeos libmysql.dll поделитесь
Добрый день, имею mysql под линуксом, пишу программу которая будет работать с...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru