voila je commence un navigateur web et je souhaite vous le partager et voir vos opinions .

dites moi se que vous en penser attenetion toutes les fonctions ne fonctionne pas

around_the_world.rar
voila a bientot.
@++
Ben si t'avais lu l'aide, c'est écrit en toutes lettres :venom a écrit :a je ne savais pas que webgadget s'utilise par l'intermediaire de IE![]()
Note: Sur Microsoft Windows, ce gadget utilise l'object ActiveX Internet Explorer 4.0+. IE 4.0 ou plus se doit d'être présent sur le système (déjà présent sur Win98/Me et Win2000/XP). Si IE n'est pas présent, WebGadget renvoie 0. Le fichier ATL.dll, présent dans le répertoire PureBasic\Compilers\ est nécessaire (à mettre dans le même répertoire que l'exécutable). Comme alternative, l'ActiveX Mozilla peut être utilisée à la place d'Internet Explorer (http://www.iol.ie/~locka/mozilla/mozilla.htm) si l'option #PB_Web_Mozilla est spécifiée (l'ActiveX Mozilla doit être installée séparément car elle n'est pas fournie avec FireFox ou la suite Mozilla).![]()
J'ai déjà vu ça mais j'ai des applications sous windows utilisant le webgadget et qui n'on pas besoin du fichier ATL.dll je ne comprends pas tres bien ...Chris a écrit :Note: Sur Microsoft Windows, ce gadget utilise l'object ActiveX Internet Explorer 4.0+. IE 4.0 ou plus se doit d'être présent sur le système (déjà présent sur Win98/Me et Win2000/XP). Si IE n'est pas présent, WebGadget renvoie 0. Le fichier ATL.dll, présent dans le répertoire PureBasic\Compilers\ est nécessaire (à mettre dans le même répertoire que l'exécutable). Comme alternative, l'ActiveX Mozilla peut être utilisée à la place d'Internet Explorer (http://www.iol.ie/~locka/mozilla/mozilla.htm) si l'option #PB_Web_Mozilla est spécifiée (l'ActiveX Mozilla doit être installée séparément car elle n'est pas fournie avec FireFox ou la suite Mozilla).![]()
Normal, à mon avis. Le fichier Atl.dll est déjà présent dans Windows/System32.Thyphoon a écrit :J'ai déjà vu ça mais j'ai des applications sous windows utilisant le webgadget et qui n'on pas besoin du fichier ATL.dll je ne comprends pas tres bien ...Chris a écrit :Note: Sur Microsoft Windows, ce gadget utilise l'object ActiveX Internet Explorer 4.0+. IE 4.0 ou plus se doit d'être présent sur le système (déjà présent sur Win98/Me et Win2000/XP). Si IE n'est pas présent, WebGadget renvoie 0. Le fichier ATL.dll, présent dans le répertoire PureBasic\Compilers\ est nécessaire (à mettre dans le même répertoire que l'exécutable). Comme alternative, l'ActiveX Mozilla peut être utilisée à la place d'Internet Explorer (http://www.iol.ie/~locka/mozilla/mozilla.htm) si l'option #PB_Web_Mozilla est spécifiée (l'ActiveX Mozilla doit être installée séparément car elle n'est pas fournie avec FireFox ou la suite Mozilla).![]()
![]()
Avoir une interface utilisateur qui te plait, simple, pas surchargée de plein de choses qui ne te servent pas : en gros simple, léger et efficace.... Ah non ça c'est mon rêveposhu a écrit :Euh, sauf ton respect, à quoi ca sert de coder un navigateur sous pure puis ce que tu utilises le moteur de IE ou Gekko? (c'est un apriori, mais le contraire m'étonnerait)
je note mais je ne trouve pas comment fait t'on pour que quand je clique sur le bouton agrandir a coté de la croix pour que la fenetre se met en grand, que les gadget suivent automatiquement.Venom : Je ne pense pas que ce soit une bonne idée de le mettre à la taille de l'écran : ça cache la barre des taches !
Faut faire une callback, détecter le message #WM_Size et mettre des resizegadget.venom a écrit :je note mais je ne trouve pas comment fait t'on pour que quand je clique sur le bouton agrandir a coté de la croix pour que la fenetre se met en grand, que les gadget suivent automatiquement.Venom : Je ne pense pas que ce soit une bonne idée de le mettre à la taille de l'écran : ça cache la barre des taches !
@++
Code : Tout sélectionner
Procedure MainCallback(hMain, Msge, wParam, lParam)
Result = #PB_ProcessPureBasicEvents
Select Msge
Case #WM_SIZE
ResizeGadget(#List_Result, #PB_Ignore, #PB_Ignore, WindowWidth(#Window_0) - 165, WindowHeight(#Window_0) - 35)
ResizeGadget(#Str_Result, #PB_Ignore, WindowHeight(#Window_0) - 25, WindowWidth(#Window_0) - 10, #PB_Ignore)
EndSelect
ProcedureReturn Result
EndProcedure
Code : Tout sélectionner
;- Window Constants
Enumeration
#Window_0
EndEnumeration
;- Gadget Constants
Enumeration
#Button_0
EndEnumeration
If OpenWindow(#Window_0, 216, 0, 600, 300, "New window ( 0 )", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
If CreateGadgetList(WindowID(#Window_0))
ButtonGadget(#Button_0, 200, 100, 120, 30, "")
EndIf
EndIf
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_Gadget
Select EventGadget()
Case #WM_SIZE
ResizeGadget(#Button_0, WindowWidth(#Window_0)-200 , #PB_Ignore, #PB_Ignore, #PB_Ignore)
EndSelect
EndIf
Until EventID = #PB_Event_CloseWindow
Code : Tout sélectionner
;- Window Constants
Enumeration
#Window_0
EndEnumeration
;- Gadget Constants
Enumeration
#Button_0
EndEnumeration
If OpenWindow(#Window_0, 216, 0, 600, 300, "New window ( 0 )", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
If CreateGadgetList(WindowID(#Window_0))
ButtonGadget(#Button_0, 200, 100, 120, 30, "")
EndIf
EndIf
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_Gadget
Select EventGadget()
Case #Button_0
ResizeGadget(#Button_0, WindowWidth(#Window_0)-200 , #PB_Ignore, #PB_Ignore, #PB_Ignore)
EndSelect
EndIf
Until EventID = #PB_Event_CloseWindow
Code : Tout sélectionner
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_Gadget
Select EventGadget()
Code : Tout sélectionner
;- Window Constants
Enumeration
#Window_0
EndEnumeration
;- Gadget Constants
Enumeration
#Button_0
EndEnumeration
Procedure Convert(Size,NewResolution.l,OriginWindowSize.l)
Static Resultat.f
Resultat = NewResolution * Size / OriginWindowSize
ProcedureReturn Resultat
EndProcedure
If OpenWindow(#Window_0, 216, 0, 600, 300, "New window ( 0 )", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
If CreateGadgetList(WindowID(#Window_0))
ButtonGadget(#Button_0, 200, 100, 120, 30, "")
EndIf
EndIf
Repeat
Event.l = WindowEvent()
Select Event
Case #PB_Event_SizeWindow
ResizeGadget(#Button_0, 10, 10, Convert(200,WindowWidth(#Window_0),600), Convert(30,WindowHeight(#Window_0),300))
EndSelect
Until EventID = #PB_Event_CloseWindow