LoadSettings( File.DirInternal, "settings.conf")
.../...
Sub LoadSettings( Dir As String, FileName As String)
If Dir="" Or FileName="" Then
Msgbox( "Empty Dir or FileName","error")
Return
End If
Dim raf As RandomAccessFile
raf.Initialize( Dir, FileName, False)
SettingsMap = raf.ReadEncryptedObject( "123456", raf.CurrentPosition) <---- Crach here.
raf.Close
End Sub