. En INI -fil er en struktureret tekst fil, der gemmer indstillinger for bruger - konfigurerbare programmets funktioner . For eksempel er en INI-fil én mekanisme til at huske, at en bruger ønsker tekst skal vises på et andet sprog end engelsk. Den oprindelige Windows Application Programmer Interface ( API) støttede funktioner, der letter læsning og skrivning INI-filer. Microsoft har frarådet INI-filer til fordel for Windows registreringsdatabasen og nyere XML-baserede filformater. De Windows API funktioner , selv om de ikke direkte understøttet , stå til rådighed for Visual Basic 9 programmører, der understøtter arv software. Instruktioner
1
Tilføj Erklær erklæring til toppen af dit modul for at aktivere kalde Windows API-funktionen til at skrive ini-filer : .
Private Erklær Ansi Function WritePrivateProfileString _
< p> Lib " kernel32.dll " Alias " WritePrivateProfileStringA " _
( ByVal lpApplicationName As String , _
ByVal lpKeyName As String , ByVal lpString As String , _
ByVal lpFileName As String ) As Integer
2
Tilføj Erklær funktionen i toppen af dit modul for at aktivere kalde Windows API-funktionen til læsning ini fil værdi : .
Private Erklær Ansi Function GetPrivateProfileString _
Lib " kernel32.dll " Alias " GetPrivateProfileStringA " _
( ByVal lpApplicationName As String , _
ByVal lpKeyName As String , ByVal lpDefault As String , _ < br >
ByVal lpReturnedString As String , _
ByVal nStørrelse As Integer , ByVal lpFileName As String ) _
As Integer
3
Opret eller redigere en INI-fil ved at kalde WritePrivateProfileString funktionen giver værdier for nøgle , anvendelse og filnavnet. Pr. konvention bruge INI-filer på . Ini forlængelse. Ansøgningen parameter svarer til et afsnit i ini -filen. Hvis nogen af de specificerede parametre ikke findes, vil de blive oprettet. Dette omfatter selve filen , så længe den angivne bibliotek findes allerede . Den WritePrivateProfile String funktionen over- skrive tidligere eksisterende værdier.
WritePrivateProfileString ( " afsnit" , "nøgle" , "værdi ", " . /Data.ini " )
4
Skyl cache , når du har fuldført iNI-fil modifikationer , hvilket reducerer risikoen for tab af data i tilfælde af en unormal program lukning. Pass nulværdier til WritePrivateProfileString funktion for alle parametrene undtagen INI filnavn . Dette instruerer Windows til at skrive ændringerne til disken : ( " . /Data.ini " 0 , 0, 0 , )
WritePrivateProfileString
5
Afsætte en buffer er tilstrækkelig til at holde den maksimale størrelsen af en værdi gemt i INI-filen . En buffer på 256 tegn er normalt tilstrækkeligt . Opret et heltal til at modtage den faktiske størrelse af den værdi, der blev hentet fra INI -filen. Brug Dim at erklære variabler og Space funktion at allokere hukommelse til strengen : Hej
Dim strValue As String
Dim intLen As Integer
strValue = Space (256) < br >
6
hente værdier gemt i INI -filen ved at kalde GetPrivateProfileString hjælp af variabler sammen med nøgle, sektion, og filnavnet , der er anvendt , når du skriver INI-filen . Angive størrelsen af bufferen , at du leverer , og en værdi, der skal returneres, når den udpegede værdi findes ikke : Hej
intLen = GetPrivateProfileString ( " afsnit" , "central ", " ikke fundet" , strValue , 256 " filename" )