в ComObj.pp, ф-ция выглядит так:
Код: Выделить всё
function CreateOleObject(const ClassName : string) : IDispatch;
begin
{!!!!!!!}
runerror(211);
end;Модератор: Модераторы
Код: Выделить всё
function CreateOleObject(const ClassName : string) : IDispatch;
begin
{!!!!!!!}
runerror(211);
end;