Форум: "Базы";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
ВнизF1Book глючит Найти похожие ветки
← →
KPY (2003-02-20 08:53) [0]Если создаю новый проект то все заполняется без проблем компонент работает.
Если подключаю к своему проекту выдается сообщение
не был произведен вызов CoInitialize
Думал может с какими компонентами не дружит поместил его вообще на отдельную форму та-же петрушка. :(
← →
Kuusiniemi (2003-02-20 09:25) [1]Не был произведен вызов CoInitialize? А кто мешает сделать то, что он просит и вызвать?
← →
B-747 (2003-02-20 10:11) [2]Выполни примерный код
type TCoInitialize = function(pvReserved:Pointer; coInit:Longint):HResult; stdcall;
var CoInitialize:TCoInitialize=nil; Ole32:HModule;
begin
Ole32:=Windows.GetModuleHandle("ole32.dll");
if Ole32<>0 then CoInitialize:=Windows.GetProcAddress(Ole32, "CoInitializeEx");
CoInitialize(nil,0);
end;
← →
bardi (2003-02-20 10:40) [3]Здравствуйте.
У кого есть 5 версия F1Book for developers.
Заранее спасибо
← →
bpv (2003-02-20 12:25) [4]-- барди Меня это тоже интересует
← →
KPY (2003-02-20 14:31) [5]Извиняюсь но куды вставить
begin
Ole32:=Windows.GetModuleHandle("ole32.dll");
if Ole32<>0 then CoInitialize:=Windows.GetProcAddress(Ole32, "CoInitializeEx");
CoInitialize(nil,0);
end;
← →
Kuusiniemi (2003-02-20 15:17) [6]Во извращенцы. :)
.dpr:
Uses ActiveX;
begin
CoInitialize(NIL);
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
CoUnitialize;
end;
← →
Kuusiniemi (2003-02-20 15:18) [7]CoUninitialize то есть в последней строке быть должен.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c