Mathématiques bovines

rem ============================================================================
rem                   Mathématiques bovines
rem ============================================================================
dim url$
height 0,600 : width 0,600
caption 0,"Mathématiques bovines .... Les cornes dessinent des courbes mathématiques ...."
url$ = "https://lh3.googleusercontent.com/-IYV9k43Q18c/WzJhQthY_CI/AAAAAAAA4iE/etEu57zMh8U3i0Az-RDi5L_vxytq0124QCJoC/s489-rw/MathCows.gif"
dll_on "kgf"
Creer_Browser()
end
rem ============================================================================
SUB Creer_Browser()
    dim_local WB%,res%
    WB% = dll_call1("WB_Create",handle(0))
    res% = dll_call5("WB_Locate",WB%,20,20,width_client(0)-20,height_client(0)-20)
    res% = dll_call2("WB_Url",WB%,adr(url$))
END_SUB
rem ============================================================================