Discussion :

[belfaigore]

Bonjour,

Je cherche à stocker du parametrage dans un fichier .ini seulement je ne me souvien plus de la reference qui va bien pour gerer les fichier InI de la même fasson que la base de registre. Je me souvient avoir déjà utiliser une classe en C++ qui permettait la gestion des fichier ini (RegistryIniFile ou un truc comme sa)

[FraktaL]

moi je me souviens d'une API qui permmette de le faire. voici le lienou tu pourra trouver toute l'aide dont tu aura besoin. Elle est en VB donc si tu as besoin d'un coup de main pour traduire certains trucs...

http://vb.developpez.com/faq/?page=Systeme#ini

[neguib]

Hum ok mais en VB çà devrait le faire avec les API "GetPrivateProfileString" et "WritePrivateProfileString

[belfaigore]

Oki merci.

Juste un pti truc, à quoi correspond l'objet Any? Par quoi puis-je le remplacer, car VB.NET ne connait pas ANY?

[neguib]

Essayes avec String

[FraktaL]

je t'ai trouvé une version VB.NET ca sera + simple pour toi

http://www.cuisinaud.com/tipnet.php?id=6&num=4

[belfaigore]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Function LitDansFichierIni(ByVal Section As String, ByVal Cle As
 String, ByVal Fichier As String, _
    Optional ByVal ValeurParDefaut As String = "") As String
 
        Dim strReturn As String
        strReturn = String(255, 0)
        GetPrivateProfileString(Section, Cle, ValeurParDefaut, strReturn, Len
(strReturn), Fichier)
        LitDansFichierIni = Left(strReturn, InStr(strReturn, Chr(0)) - 1)
 
    End Function

petit probleme avec String(255, 0) et Left(...)

[neguib]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Imports Microsoft.VisualBasic

pour Left

[FraktaL]

pour le left tu le remplace par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mid(strReturn, 1, InStr(strReturn, Chr(0)) - 1)

quand au

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

strReturn = String(255, 0)

je crois que ca veut dire de mettre 255 * le caractere 0 dans la chaine strReturn