Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > WebBrowser.execWB(OLECMDID_FIND, OLECMDEXE.....

Автор: GrigoriyFomin 7.11.2011, 16:46

Вызываю окно поиска по документу следующим способом:

Код


WebBrowser.execWB(OLECMDID_FIND, OLECMDEXECOPT_PROMPTUSER)

На некоторых виндах с ИЕ 6 выпадает на этом коде ошибка чего-то там по-русски про OLE.
Я так понимаю, что это из-за неподдерживаемой команды ошибка лезет. Как ее можно предотвратить?
Не Try .. except, а именно проверить, поддерживает ли данная версия ИЕ такую команду?

Автор: volvo877 7.11.2011, 23:10

Цитата(GrigoriyFomin @ 7.11.2011, 16:46

)

именно проверить, поддерживает ли данная версия ИЕ такую команду?

Для этого есть QueryStatusWB

Автор: GrigoriyFomin 8.11.2011, 00:28

а как ее в данном случае применить? А то я с этим Иешным синтаксисом вызовов с ума сойду smile

Автор: volvo877 8.11.2011, 01:09

Цитата(GrigoriyFomin @ 8.11.2011, 00:28

)

а как ее в данном случае применить?

Код

if WebBrowser.QueryStatusWB(OLECMDID_FIND) and OLECMDF_ENABLED = OLECMDF_ENABLED then
begin
   WebBrowser.ExecWB(OLECMDID_FIND, OLECMDEXECOPT_PROMPTUSER)
end;

Ну, или можно проверять на OLECMDF_SUPPORTED, а не на OLECMDF_ENABLED