Форум: "Основная";
Текущий архив: 2007.05.13;
Скачать: [xml.tar.bz2];
Вниз
Использование 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
та же ошибка :(
← →
Сергей М. © (2007-03-15 14:45) [7]
> пробовал зарегить объект из system32:
А на луне ты ее еще не пробовал зарегистрировать ?
Речь-то идет совсем о другой библиотеке !
Ее и ищи, если она вообще есть у тебя на хосте
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2007.05.13;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.045 c
