Forum Liberty Basic France

Le 15/09/2012 à 15h36

Libertynaute Avancé

Groupe: Membre

Inscrit le: 08/06/2012
Messages: 270
Bonjour à tous, j'ai un grand service à vous demander : pouvez vous me compiler ce code source en .exe ? Merci d'avance .
Code :

nomainwin

WindowWidth=734:WindowHeight=592
open "Navigateur internet" for window as #1
#1 "trapclose [quit]"
#1 "resizehandler [augmente]"



    open "lbbrowse3.dll" for dll as #b

    hMain = hwnd(#1)
    url$ = "http://www.google.fr/"
    calldll #b, "CreateBrowser", hMain as ulong, 0 as long, _
        0 as long, 724 as long, 550 as long,_
        url$ as ptr, 0 as long, result as ulong

    if result<>0 then
        notice "Unable to load browser control."
        end
    end if

wait

[quit]
close #1
close #b
end

[augmente]
    wide=WindowWidth : high = WindowHeight
    calldll #b, "MoveBrowser",0 as long, 0 as long, wide as long, high as long, re as void
    wait



A +
____________________
Si le meilleurs langage de programmation existe, alors le Just Basic est loin devant.
Ne me tappez pas dessus ! Je débute :D

Web    
Le 18/09/2012 à 17h24

Libertynaute Avancé

Groupe: Membre

Inscrit le: 08/06/2012
Messages: 270
En fait j'ai trouvé merci
____________________
Si le meilleurs langage de programmation existe, alors le Just Basic est loin devant.
Ne me tappez pas dessus ! Je débute :D

Web    

 |  |

1 Utilisateur en ligne : 0 Administrateur, 0 Modérateur, 0 Membre et 1 Visiteur
Utilisateur en ligne : Aucun membre connecté
Répondre
Vous n'êtes pas autorisé à écrire dans cette catégorie