Использование TidHTTP в OLE-объекте

← →
ANikolay (2007-03-15 13:57) [0]

Создал OLE-объект, в котором в одной форме есть TIdHTTP, так он не хочет соединяться!!!!.... :(

procedure TForm1.Button1Click(Sender: TObject); var TelOLE: OLEVariant; begin TelOLE := CreateOleObject("TelOLE.TelOLEclass"); try TelOLE.TestConnect; finally TelOLE := Unassigned; end; end;

//проверка связи function TDMPaymCartel.TestConnect: boolean; begin result := false; ShowMessage("1"); // ! idHTTP1.Host := CartelURL; ShowMessage("2"); // ! try if not idHTTP1.Connected then idHTTP1.Connect(10000); ShowMessage("3"); idHTTP1.Disconnect; ShowMessage("4"); result := true; except ShowMessage("5"); // ! Raise Exception.Create("Не удалось установить соединение"); end; ShowMessage("6"); end;

Выводятся сообщения 1, 2... потом сразу 5.......
проверил, что idHTTP1 <> nil

в чем может быть дело?!

← →
Плохиш © (2007-03-15 14:02) [1]

Предлагаешь нам потелепатировать?

← →
ANikolay (2007-03-15 14:06) [2]

> Предлагаешь нам потелепатировать?

в обычном приложении соединяется нормально!... может OLE какое-то ограничение накладывает?... или в компоненте может быть дело?... хочу услышать, что может мешать работе?!.. мож кто сталкивался уже....

← →
Плохиш © (2007-03-15 14:10) [3]

Прикольно, вместо того, чтобы послушать, что говорит отладчик по этому поводу, хотят послушать совета у кого-то. Хотя я знаю ответ, но он тебе не понравиться...

← →
ANikolay (2007-03-15 14:12) [4]

> Прикольно, вместо того, чтобы послушать, что говорит отладчик
> по этому поводу, хотят послушать совета у кого-то. Хотя
> я знаю ответ, но он тебе не понравиться...

О! Пишет Could not load SSL library
а что может мешать загрузить эту библиотеку?

← →
Reindeer Moss Eater © (2007-03-15 14:16) [5]

а что может мешать загрузить эту библиотеку?

Отсутствие библиотеки там, где её ищет windows.

← →
ANikolay (2007-03-15 14:33) [6]

может библиотека ищется там, откуда OLE-объект регистрирую?
пробовал зарегить объект из system32:

regsvr32.exe C:\WINDOWS\system32\TelOLE.dll

та же ошибка :(

> пробовал зарегить объект из system32:

А на луне ты ее еще не пробовал зарегистрировать ?

Речь-то идет совсем о другой библиотеке !

Ее и ищи, если она вообще есть у тебя на хосте

Использование TidHTTP в OLE-объекте Найти похожие ветки