Come leggere e scrivere i file INI in Visual Basic 9

. Un file INI è un file di testo strutturato che memorizza le impostazioni per le funzioni del programma configurabili dall'utente . Ad esempio , un file INI è un meccanismo per ricordare che un utente vuole testo da visualizzare in una lingua diversa dall'inglese . Funzioni che facilitano la lettura e la scrittura di file INI L'originale di Windows Application Programmer Interface ( API ) supportato. Microsoft ha deprecato file INI a favore del Registro di Windows e di nuovi formati di file basati su XML . Le funzioni API di Windows , pur non direttamente supportato , restano disponibili per Visual Basic 9 programmatori che supportano software legacy . Istruzioni
1

Aggiungi un Declare per la parte superiore del modulo per abilitare la chiamata alla funzione API di Windows per la scrittura file ini : .

Private Declare Function Ansi WritePrivateProfileString
_

Lib " kernel32.dll " Alias " WritePrivateProfileStringA " _

( lpApplicationName ByVal As String , _

lpKeyName ByVal come stringa , lpString ByVal As String , _ ByVal

lpFileName As String ) As Integer
2

Aggiungere un valore di file dichiarare la funzione nella parte superiore del modulo per abilitare la chiamata alla funzione API di Windows per la lettura ini : .

private Declare Function Ansi GetPrivateProfileString _

Lib " kernel32.dll " Alias " GetPrivateProfileStringA " _

( lpApplicationName ByVal As String , _

lpKeyName ByVal As String , ByVal lpDefault String, _

lpReturnedString ByVal As String , _

nSize ByVal As Integer , lpFileName ByVal come stringa ) _

As Integer
3

Creare o modificare un file INI chiamando la funzione WritePrivateProfileString , fornendo valori di chiave , l'applicazione e nome del file. Per convenzione , i file INI utilizzano l'estensione . Ini . Il parametro di applicazione corrisponde ad una sezione del file ini . Se uno dei parametri specificati non esistono , saranno creati . Questo include il file stesso finché esiste già nella directory specificata . La funzione String WritePrivateProfile sarà sovrascrivere i valori esistenti in precedenza .

WritePrivateProfileString ( "sezione" , "chiave " , " valore", " . /Data.ini " ) economici 4

svuotare la cache dopo aver completato le modifiche del file INI , riducendo il rischio di perdita di dati in caso di un arresto anomalo del programma . Passare valori zero alla funzione WritePrivateProfileString per tutti i parametri eccetto il nome del file INI . Questo indica a Windows di scrivere le modifiche sul disco : ( " . /Data.ini " 0 , 0 , 0 , ) per

WritePrivateProfileString
5

allocare un buffer sufficiente per contenere il massimo dimensioni di un valore memorizzato nel file INI . Un buffer di 256 caratteri è di solito sufficiente . Creare un numero intero a ricevere la dimensione effettiva del valore che è stato recuperato dal file INI. Utilizzare Dim per dichiarare le variabili e la funzione dello spazio per allocare memoria per la stringa :

Dim strValue As String Dim

intLen As Integer

strValue = Spazio ( 256 )
Pagina 6

recuperare i valori memorizzati nel file INI chiamando GetPrivateProfileString utilizzando le variabili insieme a chiave , sezione , e valori dei nomi di file utilizzati durante la scrittura del file INI . Specificare la dimensione del buffer che si sta fornendo e un valore da restituire quando il valore indicato non viene trovato :

intLen = GetPrivateProfileString ( "sezione" , "chiave " , " non trovato" , strValue , 256 , "filename" ) economici