My bad, sorry, I left out a few details for these to work.
The second parameter in the calls like reload are integer properties. As in
this call,
objc_msgSend( webView, reload)
So, in your module add, reload As Integer. Also, add another property,
webView As Integer. After this, you need to have an initialization method in
the module,
Sub InitWebKitParamters(Extends html As HTMlViewer, aHandle As Integer)
#if TargetMacOS then
declare function sel_registerName lib "/usr/lib/libobjc.dylib" (name as
CString) as Integer
declare function HIWebViewGetWebView lib "WebKit" (hiview as Integer) as
Integer
// get the integer value of our control.
webView = HIWebViewGetWebView( aHandle )
// this automagically assigns the correct reload call to an integer.Wow!
reload = sel_registerName( "reload:" )
#endif
End Sub
In the Open() event of your HTMLViewer call this method like this,
Me.InitWebKitParamters(Me.Handle)
Now your instance of HTMLViewer knows about this reload command. If you add
a pushbutton, add this to the Action() handler,
HTMLViewer1.Reload()
The other extended methods work the same way.
--
Thomas C.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
