Een INI-bestand is een gestructureerd tekstbestand dat instellingen opslaat voor de gebruiker configureerbare programmafuncties . Bijvoorbeeld , een INI -bestand is een mechanisme om te beseffen dat een gebruiker wil tekst in een andere taal dan Engels te geven . De originele Windows Application Programmer Interface ( API ) ondersteunde functies die het lezen en schrijven INI bestanden te vergemakkelijken . Microsoft heeft INI-bestanden deprecated in het voordeel van het Windows-register en de nieuwere XML - gebaseerde bestandsformaten . De API-functies van Windows , terwijl niet direct ondersteund , beschikbaar blijven voor Visual Basic 9 programmeurs die legacy software te ondersteunen . Instructies
1 Voeg een Declare-instructie naar de top van de module , zodat het aanroepen van de Windows API-functie voor het schrijven ini-bestanden : . Private Declare Function Ansi
WritePrivateProfileString _
Lib " kernel32.dll " Alias " WritePrivateProfileStringA " _
( ByVal lpApplicationName als Koord , _ ByVal lpKeyName
als Koord , ByVal lpString als Koord , _ ByVal
lpFileName As String ) As Integer kopen van 2 Voeg een Verklaar functie aan de bovenkant van de module , zodat het aanroepen van de Windows API-functie voor het lezen ini file waarde : . Private Declare Function Ansi
GetPrivateProfileString _ Lib " kernel32.dll " alias
" GetPrivateProfileStringA " _
( ByVal lpApplicationName als Koord , _ ByVal lpKeyName
als Koord , ByVal lpDefault als Koord , _ < br ByVal lpReturnedString > As String , _ ByVal nFormaat As Integer , ByVal lpFileName als Koord
) _
als Geheel
3 maken of een INI- bestand te bewerken door te bellen naar de WritePrivateProfileString functie , die waarden voor de belangrijkste , de toepassing en de bestandsnaam . Volgens afspraak , INI-bestanden gebruiken . Ini extensie . De parameter toepassing overeenkomt met een sectie in het ini-bestand . Als een van de opgegeven parameters niet bestaan , kunnen ze gemaakt worden . Dit geldt ook voor het bestand zelf , zolang de opgegeven map al bestaat . De WritePrivateProfile String functie zal over- schrijven voorheen bestaande waarden . WritePrivateProfileString
( " hoofdstuk" , "sleutel" , "waarde" , " . /Data.ini " )
4 Spoel de cache wanneer u klaar bent met INI-bestand wijzigingen , waardoor het risico op verlies van gegevens in geval van een abnormale programma afsluiten. Pass nulwaarden aan de WritePrivateProfileString functie voor alle parameters behalve het INI-bestand naam . Dit instrueert Windows om wijzigingen naar de schijf te schrijven : ( " . /Data.ini " 0 , 0 , 0 , ) WritePrivateProfileString
5 Wijs een buffer voldoende om het maximale te houden grootte van een waarde die is opgeslagen in het INI-bestand . Een buffer van 256 tekens is meestal voldoende . Maak een geheel getal om de werkelijke grootte van de waarde die werd opgehaald uit het INI- bestand te ontvangen . Gebruik Dim om de variabelen en de Space -functie verklaren aan geheugen voor de string toe te wijzen : Dim strValue
als Koord Dim intLen
als Geheel strValue
= Space ( 256 ) < br
6 > Ophalen waarden opgeslagen in het INI-bestand door GetPrivateProfileString bellen met behulp van de variabelen samen met de belangrijkste , deel , en de bestandsnaam waarden die worden gebruikt bij het schrijven van het INI-bestand . Geef de grootte van de buffer die u geeft en een waarde te worden geretourneerd bij de aangewezen waarde niet wordt gevonden :
intLen = GetPrivateProfileString ( " hoofdstuk" , "sleutel" , " niet gevonden " , strValue , 256 , " bestandsnaam" ) op Twitter
|
