PureBasic Visual Designer
PureBasic Visual Designer
Salut a tous je me lance dans le purebasic.
Donc j'ai regarder quelque tuto notament celui ci. http://www.purebasic.fr/french/viewtopic.php?t=6602
Meis je n'arrive pas a faire la fonction d'un bouton ou quelque chose par exemple je fait un bouton mais comment faire pour lui dire qu'il fasse ce que je veut.
Merci de m'aider si vous compenez pas dite le merci beaucoup.
Donc j'ai regarder quelque tuto notament celui ci. http://www.purebasic.fr/french/viewtopic.php?t=6602
Meis je n'arrive pas a faire la fonction d'un bouton ou quelque chose par exemple je fait un bouton mais comment faire pour lui dire qu'il fasse ce que je veut.
Merci de m'aider si vous compenez pas dite le merci beaucoup.
Salut John36mx,
je vais peut être dire une bêtise mais il me semble qu'avec visual designer ont ne puisse pas donner la fonction que le button doit avoir par la suite.
moi quand je me sert de visual designer c'est juste pour créer l'interface graphique de ma fenêtre. après les fonctions je les fait moi même
.
voilou
et si tu lie bien le tuto en bas c'est noté :
@++
je vais peut être dire une bêtise mais il me semble qu'avec visual designer ont ne puisse pas donner la fonction que le button doit avoir par la suite.
moi quand je me sert de visual designer c'est juste pour créer l'interface graphique de ma fenêtre. après les fonctions je les fait moi même

voilou
et si tu lie bien le tuto en bas c'est noté :
l suffit ensuite dans les codes generés dans l'éditeur de remplir
pour donner une fonction au bouton ou bien tout autre chose, bref l'interface utilisateur est crée !!
@++
Windows 10 x64, PureBasic 5.73 x86 & x64
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
Non, c'est pas une bétise, c'est absolument ça...venom a écrit :Salut John36mx,
je vais peut être dire une bêtise mais il me semble qu'avec visual designer ont ne puisse pas donner la fonction que le button doit avoir par la suite.
*******************
et si tu lie bien le tuto en bas c'est noté :
Cela permet de créer VISUELLEMENT les fenêtres que l'on veux...
Puis il crée le code correspondant, à l'utilisateur de créer les "fonctions" intermédiaires ou correspondant à ce que l'on à mis dans la fenêtre...
Le Liens est bien le bon lien pour le TUTO de DOBRO qui est très explicite... Mais qu'il faut lire convenablement et jusqu'au bout...
Et si on veux on reproduit exactement ce qu'il propose comme exemple...
Après il faut "travailler"...

-
- Messages : 1501
- Inscription : dim. 18/avr./2004 15:04
- Localisation : sud de la france
-
- Messages : 1501
- Inscription : dim. 18/avr./2004 15:04
- Localisation : sud de la france
va voir ici http://tripamort.free.fr/tuto.php
-
- Messages : 471
- Inscription : dim. 23/déc./2007 18:10
Voila je vien de designer mon programme et j'aimerais que quand on appuie sur le bouton "GO" cela m' envoye sur un compte FTP ou sur une adresse e-mail ce qu'il y a dans les "String".
Voici les codes de "GeneratedMainFile.pb" et "GeneratedIncludeFile.pb"
GeneratedMainFile.pb :
GeneratedIncludeFile.pb :
Voila veuillez m'aider svp a mettre la fonction pour que sa m'envoye sur un FTP ou une adresse e-mail. Merci de votre aide les gas.
Voici les codes de "GeneratedMainFile.pb" et "GeneratedIncludeFile.pb"
GeneratedMainFile.pb :
Code : Tout sélectionner
; PureBasic Visual Designer v3.95 build 1485 (PB4Code)
IncludeFile "GeneratedIncludeFile.pb"
Open_Window_0()
Repeat ; Start of the event loop
Event = WaitWindowEvent() ; This line waits until an event is received from Windows
WindowID = EventWindow() ; The Window where the event is generated, can be used in the gadget procedures
GadgetID = EventGadget() ; Is it a gadget event?
EventType = EventType() ; The event type
;You can place code here, and use the result as parameters for the procedures
If Event = #PB_Event_Gadget
If GadgetID = #Image_0
ElseIf GadgetID = #String_0
ElseIf GadgetID = #String_1
ElseIf GadgetID = #String_2
ElseIf GadgetID = #Button_0
EndIf
EndIf
Until Event = #PB_Event_CloseWindow ; End of the event loop
End
;
Code : Tout sélectionner
; PureBasic Visual Designer v3.95 build 1485 (PB4Code)
;- Window Constants
;
Enumeration
#Window_0
EndEnumeration
;- Gadget Constants
;
Enumeration
#Image_0
#String_0
#String_1
#String_2
#Button_0
EndEnumeration
;- Image Plugins
;- Image Globals
Global Image0
;- Catch Images
Image0 = CatchImage(0, ?Image0)
;- Images
DataSection
Image0:
IncludeBinary "C:\Documents and Settings\proprietaire\Bureau\Fake.bmp"
EndDataSection
Procedure Open_Window_0()
If OpenWindow(#Window_0, 241, 55, 300, 350, "New Windows (0)", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
If CreateGadgetList(WindowID(#Window_0))
ImageGadget(#Image_0, 0, 0, 300, 80, Image0)
StringGadget(#String_0, 50, 100, 200, 30, "")
StringGadget(#String_1, 50, 170, 200, 30, "")
StringGadget(#String_2, 50, 230, 200, 30, "")
ButtonGadget(#Button_0, 70, 280, 160, 40, "GO")
EndIf
EndIf
EndProcedure
-
- Messages : 471
- Inscription : dim. 23/déc./2007 18:10
Je te mets juste la boucle
Attention, t'envoyer sur une adresse email, c'est simple, mais sur un FTP c'est beaucoup plus complexe si tu débutes.
Code : Tout sélectionner
Repeat ; Start of the event loop
Event = WaitWindowEvent() ; This line waits until an event is received from Windows
WindowID = EventWindow() ; The Window where the event is generated, can be used in the gadget procedures
GadgetID = EventGadget() ; Is it a gadget event?
EventType = EventType() ; The event type
;You can place code here, and use the result as parameters for the procedures
If Event = #PB_Event_Gadget
If GadgetID = #Image_0
ElseIf GadgetID = #String_0
ElseIf GadgetID = #String_1
ElseIf GadgetID = #String_2
ElseIf GadgetID = #Button_0 ; Action lorsque l'on clique sur le bouton GO
MessageRequester("Action du bouton", "Tu mets ton code au même endroit que MessageRequester")
; Ds la doc regarde la Description de StringGadget() et tu verras comment récupérer du texte.
; Ici tu dois faire en sorte de récupérer le contenu de ton StringGadget()
Texte$ = GetGadgetText(#String_0) ; On récupère le contenu de #String_0
Debug Texte$
RunProgram("mailto:" +Texte$) ; Et on ouvre La messagerie par défaut.
EndIf
EndIf
Until Event = #PB_Event_CloseWindow ; End of the event loop