Форум: "Сети";
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];

Вниз

Доспуп к свойтвам Internet Explorer (СОМ) при работе с SHTTP, а работа с СОМ при использовании потоков   Найти похожие ветки 

← →
Ramid   (2002-01-16 17:16) [4]

пример когда выдает ошибку:
procedure TForm1.SpeedButton2Click(Sender: TObject);
// отдельно создается обект
begin
V := CreateOleObject("InternetExplorer.Application.1");
V.Visible := true;
end;
после этого создается поток и запускается на выполнение
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
SecondProcess := TSub.Create(false);
end;
и если этому потоку принадлежит функция
procedure TSub.Execute;
begin
CoInitialize(nil);
try
form1.label2.caption := V.Visible; // выдается ошибка
finally
CoUninitialize();
Suspend();
Terminate();
Destroy();
end;
end;

можно ли этого избежать.

На счет Delphi Win32 SDK help мои извениения действительно не читал, прости, что отнял у тебя немного времени.

---

Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c