begin process at 2010 02 10 10:10:14
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Divers

 > 

Débutants

 > 

Checkbox


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Checkbox

vendredi 25 août 2006 à 14:22:11 | Checkbox

cocowz

Bonjour.

Je voudrais vous demander comment on fait pour que quand une presonne clique sur checkbox et que sa l'enregistre dans un fichier .ini (comme quoi c'est checker. et a chaque ouverture c'est checked aussi) Et que quand la personne clique une 2eme fois sa sera unchecked et sa la sauvegarde a chaque changement. Merci
vendredi 25 août 2006 à 14:32:45 | Re : Checkbox

jrivet

Membre Club

Salut,

Est ce que tu sais déja faire l'enregistrement au Format INI?

Si NON regarde du cote des API suivantes

1- Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" ByVal lpApplicationName As StringByVal lpKeyName As Any, ByVal lpDefault As StringByVal lpReturnedString As StringByVal nSize As LongByVal lpFileName As StringAs Long 
2 -Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" ByVal lpApplicationName As StringByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As StringAs Long 

Pour sauvegarder tu fais la chose suivante. 

Private Sub Check1_Click() 
Call WritePrivateProfileString("DEF", "Choix", CStr(Check1.Value), "C:\Test.ini") 
End Sub 


Pour recuperer la valeur sauvegarder. 

Private Sub Form_Load() 
Dim Ret As Long 
Dim Tmp As String 
Tmp = Space$(10) 
Ret = GetPrivateProfileString("DEF", "Choix", "?", Tmp, 10, "C:\test.ini") 
If Tmp <> "?" Then Check1.Value = CInt(Tmp) 
End Sub 
 


Coloration syntaxique automatique [AFCK]
       



Il y a surement plus "beau" mais le fonctionnel est la... a toi de l'ameliorer selon tes besoin

@+, Julien

vendredi 25 août 2006 à 15:16:53 | Re : Checkbox

cocowz

Quand je met les deux premiers lignes il met dit error
Error de compilation. Attendu: fin d'instruction.
et sa me souligne ByVal
vendredi 25 août 2006 à 15:22:51 | Re : Checkbox

jrivet

Membre Club

Salut,

Mon copier coller a foirer.
Met une parenthese ( avant le premier ByVal

@+, Julien

vendredi 25 août 2006 à 15:38:08 | Re : Checkbox

cocowz

Maintenant c'est
Error de compilation:
Des constantes, chaines de longueur fixe, tableux .......... Declare  ne sont pas autorises  comme membres ...

vendredi 25 août 2006 à 15:48:30 | Re : Checkbox

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
Au lieu d'utiliser un fichier ini, utilise le registre de windows : bien plus simple à utiliser, bien plus performant, et surtout, recommandé par Microsoft depuis belle lurette !

En plus, tu as des fonctions directement intégrée à VB pour stocker dans le registre !

vendredi 25 août 2006 à 15:51:28 | Re : Checkbox

cocowz

Sa doit etre tres dure a faire surtout comme se sais rien faire.
vendredi 25 août 2006 à 15:57:01 | Re : Checkbox

jrivet

Membre Club
Re
DARKSIDIOUS a raison.

Pour continuer dans le sens du INI (ou pour terminer) Pei etre devrait tu lire les messages de VB et essayer de les interpreter.


Tu as du mettre le code dans un Form et dans ce cas il ne faut pas mettre Public Declare.... Mais Private Declare...


@+, Julien

vendredi 25 août 2006 à 16:04:47 | Re : Checkbox

jrivet

Membre Club
Réponse acceptée !

Re,

Je n'avais jamais utilser SaveSetting ni GetSetting (j espere que tu parlais de cela DARKSIDIOUS )
Et c'est peu etre encore plus simple qu avec les API

Ce qui donnerait

Private Sub Form_Load() 
Dim Tmp As String 
Tmp = GetSetting(App.EXEName, "DEF", "Choix", "?") 
If Tmp <> "?" Then Check1.Value = CInt(Tmp) 
End Sub 


Private Sub Check1_Click() 
Call SaveSetting(App.EXEName, "DEF", "Choix", Check1.Value) 
End Sub 


 


Coloration syntaxique automatique [AFCK]
       


 

@+, Julien

vendredi 25 août 2006 à 16:05:40 | Re : Checkbox

cocowz

Sa veut pas ce lancer. Il me dit Debogage et quand je clique sa me souligne sa Check1.Value = CInt(Tmp)



Et une question tout ces codes vous les apprenes ou quand on sais coder sa vien tout seul?

1 2

Cette discussion est classée dans : checkbox, clique


Répondre à ce message

Sujets en rapport avec ce message

listview+checkbox [ par FASH ] Bonjour,En VB6, avec une listview qui contient des checkboxes ,je désire savoir comment faire pour retrouver l'index de la ligne qui est checked. (Qd CheckBox ?? trois valeurs! [ par MVionnet ] Bonjour ¨¤ vous tous, Je cherche ¨¤ cr¨¦er un CheckBox ayant trois valeurs r¨¦sulantes apr¨¦s clique de souris:Ex:  pas de clique = Che InputBox un peu spéciale :-s ? [ par youkizouki ] Salut, Je dois simplement créer une petit fenêtre de style inputBox mais qui contient un textbox, un groupe de 2 checkBox, u f***ing checkbox [ par marsupio ] Je fais un tableau sur excel, pour chaque ligne, je met une checkbox qui lorsqu'elles sont cochées, font couper/coller la ligne à laquelle elles font Palette VB 6 disparue !! [ par jlfcdvg ] BonjourDans la fenêtre propriétés des différents contrôles quand je veux changer une couleur et que je clique sue l'onglet palette, celle-ci a disparu [OpenGL] Comment sélectionner des éléments en 3D ? [ par grivel ] Salut à tous,je travaille actuellement sur une appli en openGL sous VB qui représente un parc informatique.J'aurai aimé savoir comment faire en sorte Checkbox locked [ par Luspha ] Bonjour je travaille a l'aide de Visual studio sur un projet en Vb.net, et j'aimerais savori comment puis je mettre une checkbox en lecture seul? j'ai Probleme avec les CheckBox ? [ par adn28 ] Bonjour,En je suis entrain de developper un outil de chiffrage sur Excel avec VBA, donc j'ai mis sue la page Excel plusieurs CheckBox, mais le problem Perte de focus qd clique sur Menu [ par tomgrc ] Bonjour,j ai un souci dans VB, je fais remplir a l utilisateur tt une serie de textbox, lesdonnées sont prises en compte grace a la perte de focus. Pa Formulaire acess et creation dynamique de checkbox [ par karn ] Bonjour,je souhaiterais crée dans un formulaire des checkbox pour certain de mes champs de ma requete, dynamiquement si j'ai 5 champs je voudrais en c


Nos sponsors


Sondage...

Comparez les prix


HTC Magic

Entre 429€ et 429€

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,811 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales