Как в WebBrowser сделать видимыми границы таблицы в которой бордер=0?
В VB6 работает, реализованно через:
Dim CommandTarget As IOleCommandTarget
Public Sub CommandExec(ByVal CMDID As WBIDM, Optional ByVal CMDOPT As OLECMDEXECOPT = OLECMDEXECOPT_DODEFAULT, Optional VarIn As Variant, Optional varOut As Variant)
CommandTarget.Exec GUID_HTML, CMDID, CMDOPT, VarIn, varOut
End Sub
Public Property Let ShowBorders(ByVal bNewValue As Boolean)
m_bShowBorders = bNewValue
CommandExec IDM_SHOWZEROBORDERATDESIGNTIME, OLECMDEXECOPT_DONTPROMPTUSER, m_bShowBorders
PropertyChanged "ShowBorders"
End Property
На .нет пробавал так
Dim CommandTarget As IOleCommandTarget
CommandTarget.Exec(IDM_SHOWZEROBORDERATDESIGNTIME, OLECMDEXECOPT_DONTPROMPTUSER, True)
Более того IOleCommandTarget вообще светится как "не определен", пространство имен Microsoft.VisualStudio не знаю как подключить, хотя нужная Microsoft.VisualStudio.OLE.Interop имеется в C:\WINDOWS\assembly
Нашел неизвестный dll в котором присутствует IOleCommandTarget, но при выполнении отлатчик тормозит записью "неверные параметры команды"
Ответить
|