> There is also a need for a "reload" function.
In a module,
Sub Reload(Extends html As HTMLViewer)
#if TargetMacOS then
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer, agentName as CFStringRef)
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer)
objc_msgSend( webView, reload)
#endif
End Sub
> I think it would be nice if RB's webkit had a GoBack and a GoForward
> function
Sub GoForward(Extends html As HTMlViewer)
#if TargetMacOS then
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer, agentName as CFStringRef)
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer)
objc_msgSend( webView, goForward)
#endif
End Sub
Sub GoBack(Extends htmls As HTMLViewer)
#if TargetMacOS then
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer, agentName as CFStringRef)
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer)
objc_msgSend( webView, goBack)
#endif
End Sub
Sub SmallerText(Extends html As HTMlViewer)
#if TargetMacOS then
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer, agentName as CFStringRef)
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer)
objc_msgSend( webView, makeTextSmaller)
#endif
End Sub
Sub LargerText(Extends html As HTMlViewer)
#if TargetMacOS then
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer, agentName as CFStringRef)
declare sub objc_msgSend lib "/usr/lib/libobjc.dylib" (obj as Integer,
selector as Integer)
objc_msgSend( webView, makeTextLarger)
#endif
End Sub
Enjoy! :-)
--
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>