Page 1 sur 3
qui peux m'aider pour un debut de code
Publié : dim. 05/sept./2004 20:28
par jbernard13
bonsoir
voila je cherche a creer un petit programme
qui permetrer de gerer mes mots de passe et login d'internet
merci et bonne soirée
Jbernard
ps: j'aimerai savoir si une nouvelle version de purebasic va sortir?
Publié : dim. 05/sept./2004 21:15
par Flype
coucou j'ai dèjà eu ce genre de prog en tete...
je suis prêt à t'aider
déjà tu devrais utiliser une liste pour stocker les logins
Code : Tout sélectionner
Structure Item_Struct
login.s
password.s
EndStructure
NewList Items.Item_Struct()
Publié : dim. 05/sept./2004 21:28
par Flype
ensuite concernant la création d'un début d'interface, tu pourrait utiliser
un gadget assez approprié. par exemple un ListIconGadget
Code : Tout sélectionner
;- Gestion des logins
Structure Item_Struct
login.s
password.s
EndStructure
NewList Items.Item_Struct()
;- Création de l'interface
Enumeration
#gad_List
#gad_Exit
EndEnumeration
If OpenWindow(0,50,50,200,120,#PB_Window_SystemMenu|#PB_Window_SizeGadget,"Logins")
CreateGadgetList(WindowID(0))
ListIconGadget(#gad_List,2,2,196,90,"Login",100)
AddGadgetColumn(#gad_List,1,"Password",90)
ButtonGadget(#gad_Exit,140,96,58,22,"Quit")
Else
End
EndIf
;- Gestion de la boucle des évênements
Repeat
Select WaitWindowEvent()
Case #PB_Event_CloseWindow : Break
Case #PB_Event_Gadget
Select EventGadgetID()
Case #gad_Exit : Break
EndSelect
EndSelect
ForEver
;- Fin du programme
End
Publié : dim. 05/sept./2004 21:54
par jbernard13
merci flype
pour ton aide peux tu me comenter ton code svp
mais comment ensuite sauvegader les données dans un fichier ?
merci beaucoup
Jbernard
Publié : lun. 06/sept./2004 7:07
par Flype
mais comment ensuite sauvegader les données dans un fichier ?
plusieurs solutions, mais je serais toi j'utiliserais le jeu de commandes
"preference" pour gérer un fichier .ini
Code : Tout sélectionner
[Item.1]
Login=toto
Password=tutu
[Item.2]
Login=riri
Password=fifi
je continuerai ce soir mais là je dois aller bosser

Publié : lun. 06/sept./2004 16:41
par jbernard13
merci flype
mais comment je peux rentrer mes mots de passes et login
ensuite comment pourvoir charger et sauver le fichier ini?
merci si tu peux m'aider
Jbernard
Publié : lun. 06/sept./2004 19:47
par Flype
oui oui je me doutais bien de la question
je reviens seulement de travail...
je te prépare çà

Publié : lun. 06/sept./2004 22:10
par Le Soldat Inconnu
moi, je dirais que si on avait l'interface déjà prête, on pourrait t'aider plus efficacement.
car la, je sens qu'on parle un peu dans le vide pour toi et que tu as du mal à assembler les morceaux, et à saoir par ou commencer (dis moi si je me trompe, j'ai pas la science infuse

)
si on avait une base, il serait facile d'ajouter et de modifier le code en fonction te tes problèmes.
Sinon, quand on débute mieux vaux s'attaquer à un problème à la fois que d'ouvrir un front immense.
moi quand je fais un programme, en général je pars comme ça (j'espère que ça va t'aider pour ton programme)
- réflexion sur l'aspect de l'interface et les options générales à intégrer (dans le genre comment je veux faire pour entrer les mots de passe par exemple)
dans cette partie, je ne pense pas programmation, seulement ce que je veux faire (tout est faisable de toute façon)
- réalisation de l'interface (la fenêtre principale seule, aucune gestion des gadget, rien, juste l'apparence globale du programme)
- ensuite, je crée les actions associées à chaque gadget les un après les autres
- je mets en place les sauvegardes de données
- puis je fignole
Tout ce que je peux dire, c'est que ton projet est réalisable et est assez simple (pas d'API windows par exemple). Donc il sera facile de t'aider à le réaliser

Publié : mar. 07/sept./2004 7:38
par jbernard13
salut regis
et si je la dessine avec purevision ?
ça change quelque chose?
merci regis
Jbernard
Publié : mar. 07/sept./2004 8:48
par Le Soldat Inconnu
PureVision donne le code de l'interface donc je vois pas d'inconvénient.
par contre, prends garde à donner des noms significatif aux éléments (le nom des constantes qui sert à numéroter les gadgets)
Publié : mar. 07/sept./2004 10:25
par jbernard13
je viens de creer mon interface
Code : Tout sélectionner
Enumeration
If OpenWindow(0,0,0,400,250,#pb_window_systemmenu|#pb_window_minimizegadget|#pb_window_maximizegadget|#pb_window_screencentered,"Fenetre zero")
If CreateMenu(0,WindowID())
MenuTitle("Fichier")
MenuItem(1,"Open" + Chr(9)+"ctrl+o")
MenuItem(2,"Save" + Chr(9)+"ctrl+s")
MenuItem(3,"Close"+ Chr(9)+"ctrl+c")
EndIf
Repeat
EventID.l = WaitWindowEvent()
Select EventID
Case #PB_EventMenu
Select EventMenuID()
Case 3
Quit=1
EndSelect
Case #WM_CLOSE
Quit=1
EndSelect
Until Quit =1
EndIf
maintenant comment rendre le menu fonctionel ?
coment savegarder un fichier et le charger dans mon interface
et aussi une boite de saisie
merci de m'aider
Jbernard
Publié : mar. 07/sept./2004 15:09
par Le Soldat Inconnu
donne des noms à tes gadget à l'aide de constantes, ce sera plus claire.
Code : Tout sélectionner
Enumeration
#Menu
#Menu_Ouvrir
#Menu_Sauvegarder
#menu_Quitter
EndEnumeration
If OpenWindow(0, 0, 0, 400, 250, #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_ScreenCentered, "Fenetre zero")
If CreateMenu(#Menu, WindowID())
MenuTitle("Fichier")
MenuItem(#Menu_Ouvrir, "Ouvrir" + Chr(9) + "Ctrl+O")
MenuItem(#Menu_Sauvegarder, "Sauvegarder" + Chr(9) + "Ctrl+S")
MenuBar()
MenuItem(#menu_Quitter, "Quitter" + Chr(9) + "Alt+F4")
EndIf
Repeat
EventID.l = WaitWindowEvent()
Select EventID
Case #PB_EventMenu
Select EventMenuID()
Case #menu_Quitter
Quit = 1
EndSelect
Case #WM_CLOSE
Quit = 1
EndSelect
Until Quit = 1
EndIf
Publié : mar. 07/sept./2004 15:13
par Le Soldat Inconnu
Code : Tout sélectionner
Enumeration
#Menu
#Menu_Ouvrir
#Menu_Sauvegarder
#Menu_Quitter
#Liste
EndEnumeration
If OpenWindow(0, 0, 0, 400, 250, #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_ScreenCentered, "Fenetre zero")
If CreateMenu(#Menu, WindowID())
MenuTitle("Fichier")
MenuItem(#Menu_Ouvrir, "Ouvrir" + Chr(9) + "Ctrl+O")
MenuItem(#Menu_Sauvegarder, "Sauvegarder" + Chr(9) + "Ctrl+S")
MenuBar()
MenuItem(#Menu_Quitter, "Quitter" + Chr(9) + "Alt+F4")
EndIf
If CreateGadgetList(WindowID())
ListIconGadget(#Liste, 0, 0, 400, 250, "Site", 120)
AddGadgetColumn(#Liste, 1, "Identifiant", 120)
AddGadgetColumn(#Liste, 2, "Mot de passe", 120)
EndIf
Repeat
EventID.l = WaitWindowEvent()
Select EventID
Case #PB_EventMenu
Select EventMenuID()
Case #Menu_Quitter
Quit = 1
EndSelect
Case #WM_CLOSE
Quit = 1
EndSelect
Until Quit = 1
EndIf
Publié : mar. 07/sept./2004 15:15
par jbernard13
merci
mais juste un brouillon que je suis entrain de creer
j'ai compris en dessinant l'interface dans visual designer
et je recupere le code pour le modifier .
mais comment faire marcher le menu de sauvegarde?
merci
je sais creer une interface mais pas encore l'interraction
Jbernard
Publié : mar. 07/sept./2004 15:17
par Le Soldat Inconnu
sauvegarder quoi ?
on a pas encore de données à sauvegarder ...

manque encore quelque chose à mon avis avant de passer à la sauvegarde