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



:idea:


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 :wink:

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 çà :wink:

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 :lol: )

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) :wink:

- 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 :lol:

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 :wink:

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 ... :lol: manque encore quelque chose à mon avis avant de passer à la sauvegarde