Показать сообщение отдельно
  #5  
Старый 17.01.2017, 13:31
delphi-programmer-2007 delphi-programmer-2007 вне форума
Прохожий
 
Регистрация: 16.01.2017
Сообщения: 12
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Модуль System смотрел - нашел там

Код:
varDispatch = $0009; { vt_dispatch     9 }

IDispatch = interface(IUnknown)
   ['{00020400-0000-0000-C000-000000000046}']
   function GetTypeInfoCount(out Count: Integer): HResult; stdcall;
   function GetTypeInfo(Index, LocaleID: Integer; out TypeInfo): HResult; stdcall;
   function GetIDsOfNames(const IID: TGUID; Names: Pointer; NameCount, LocaleID: Integer; DispIDs: Pointer): HResult; stdcall;
   function Invoke(DispID: Integer; const IID: TGUID; LocaleID: Integer;
   Flags: Word; var Params; VarResult, ExcepInfo, ArgErr: Pointer): HResult; stdcall;
end;

Пробовал обращаться к

colItem.Properties_.Item(wmiProperty, 0)

через какой-нибудь метод Dispatch - например, пробовал

Код:
var
   Count: integer

colItem.Properties_.Item(wmiProperty, 0).GetTypeInfoCount(Count)

- думал, это поможет определить количество методов или свойств, доступных для обращения к Dispatch

- не помогло (ошибку выдает и все) - похоже, этих методов что в System описаны нет у Dispatch
Ответить с цитированием