Checkbox

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

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 String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long 
2 -Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As 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

Quand je met les deux premiers lignes il met dit error
Error de compilation. Attendu: fin d'instruction.
et sa me souligne ByVal

Salut,

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

@+, Julien

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

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 !

Sa doit etre tres dure a faire surtout comme se sais rien faire.

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

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?