- 55
- 14
Приветствую, возможно ли заменить код ниже, на то, что будет поддерживать в настоящее время сайты по типу вк или ютуба? Буду очень признателен если поможете)
Код:
Gui Add, ActiveX, vdoc xm x242 y109 w630 h520, about:<!DOCTYPE html><meta http-equiv="X-UA-Compatible" content="IE=edge"> ; the "IE=edge" should force Shell.Explorer to use the latest IE renderer. I have internet explorer 11 and Microsoft Edge installed.
Gui Add, Picture, xCenter yCenter w920 h700 , %A_ScriptDir%\Dev Files\chat.png
doc.silent := true ; Surpress JS Error boxes, commented out for debugging
doc.Navigate("https://youtube.com")
;// necesary to accept enter and accelorator keys
;http://msdn.microsoft.com/en-us/library/microsoft.visualstudio.ole.interop.ioleinplaceactiveobject(VS.80).aspx
IOleInPlaceActiveObject_Interface:="{00000117-0000-0000-C000-000000000046}"
;// necesary to accept enter and accelorator keys
;// get the in place interface pointer
pipa := ComObjQuery(doc, IOleInPlaceActiveObject_Interface)
;// necesary to accept enter and accelorator keys
;// capture key messages
OnMessage(WM_KEYDOWN:=0x0100, "WM_KEYDOWN")
OnMessage(WM_KEYUP:=0x0101, "WM_KEYDOWN")
Gui Show, xCenter yCenter w920 h700, Test Chat
Return
