Eine komplette INI Sektion mit allen Einträgen löschen
Private Declare Ansi Function DeletePrivateProfileSection Lib "kernel32" Alias "WritePrivateProfileStringA" ( _
ByVal Section As String, _
ByVal NoKey As Integer, _
ByVal NoSetting As Integer, _
ByVal FileName As String) _
As Integer
Public Sub EraseINISection(ByVal INIFile As String, ByVal Section As String)
DeletePrivateProfileSection(Section, 0, 0, INIFile)
End Sub
Kommentare zum Snippet