#include "
hbdyn.ch"
function Main()
local pLib := hb_LibLoad( "webview.dll" )
local hWebView := hb_DynCall( { "webview_create", pLib, hb_bitOr( HB_DYN_CTYPE_VOID_PTR,;
hb_SysCallConv() ), HB_DYN_CTYPE_VOID_PTR,;
hb_SysLong(), HB_DYN_CTYPE_VOID_PTR }, 0, 0 )
hb_DynCall( { "webview_navigate", pLib, hb_bitOr( HB_DYN_CTYPE_VOID, hb_SysCallConv() ),;
HB_DYN_CTYPE_VOID_PTR, HB_DYN_CTYPE_CHAR_PTR },;
hWebView, "
http://www.google.com" )
hb_DynCall( { "webview_run", pLib, hb_bitOr( HB_DYN_CTYPE_VOID,;
hb_SysCallConv() ), HB_DYN_CTYPE_VOID,;
HB_DYN_CTYPE_VOID_PTR }, hWebView )
hb_LibFree( pLib )
return nil
function hb_SysLong()
return If( hb_OSIS64BIT(), HB_DYN_CTYPE_LLONG_UNSIGNED, HB_DYN_CTYPE_LONG_UNSIGNED )
function hb_SysCallConv()
return If( ! "Windows" $ OS(), HB_DYN_CALLCONV_CDECL, HB_DYN_CALLCONV_STDCALL )
best regards
Antonio