Toolbar with Web Browser over Toolbar?

[Gintaras]

Use this hook function instead of ToolbarExProc_TWWB.

Function ToolbarExProc_TWWB_Above

Code:

Copy      Help

;/
function# hWnd message wParam lParam

sel message
,case WM_INITDIALOG
,int h=CreateControl(0 "ActiveX" "SHDocVw.WebBrowser" 0 0 0 400 200 hWnd 100)
,_s=""; _s.setwintext(h) ;;opens blank page. Instead of "" you also can pass an url or HTML. Or open web page using Navigate (see below).
,
,;SHDocVw.WebBrowser b._getcontrol(h)
,;b.Navigate("http://www.google.com")
,
,goto g1
,case WM_SIZE
,;g1
,h=id(100 hWnd); if(!h) ret
,RECT r; GetClientRect(hWnd &r)
,MoveWindow h 0 0 r.right r.bottom-20 1
,h=id(9999 hWnd)
,MoveWindow h 0 r.bottom-20 r.right 20 1
,ret 1
,
,case WM_DESTROY
,