;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
:FileName: ini-demo.asm
;Function: demo the operation of ini file
;Author: Purple Endurer
;
;Log
;=============================
;2005-05-26 Created!
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
.386
.model flat, stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
m_MsgBox macro lpstrMsg, dwIcon
invoke MessageBox, NULL, lpstrMsg, ADDR g_szMsgCaption, dwIcon
endm
.data
g_szMsgCaption db "INI demo", 0
g_szIniFileSpec db ".\test.ini", 0
g_szKeyFileName db "FileName", 0
g_szKeyFileSize db "FileSize", 0
g_szSectInfo db "Info", 0
g_szFmt4Int db "%s的值为%d", 0
g_szFailReadKey db "Fail to read Key!", 0
g_szFailWriteStr db "Fail to Write String!", 0
g_szOne db "1", 0
.data?
g_szBuf db 256 dup (?)
.code
start:
; GetPrivateProfileString - 从 ini 文件的某个 Section 取得一个 key 的字符串，它的原形是：
; GetPrivateProfileString(
; LPCTSTR lpAppName, // 指向包含 Section 名称的字符串地址
; LPCTSTR lpKeyName, // 指向包含 Key 名称的字符串地址
; LPCTSTR lpDefault, // 如果 Key 值没有找到，则将缺省的字符串复制到返回字符串的缓冲区, 不能是NULL
; LPTSTR lpReturnedString, // 返回字符串的缓冲区地址
; DWORD nSize // 缓冲区的长度
; LPCTSTR lpFileName // ini 文件的文件名
invoke GetPrivateProfileString, ADDR g_szSectInfo, ADDR g_szKeyFileName, ADDR g_szFailReadKey, ADDR g_szBuf, SIZEOF g_szBuf, ADDR g_szIniFileSpec
m_MsgBox ADDR g_szBuf, MB_ICONERROR
; GetPrivateProfileInt - 从 ini 文件的某个 Section 取得一个 key 的整数值，它的原形是：
;
; GetPrivateProfileInt(
; LPCTSTR lpAppName, // 指向包含 Section 名称的字符串地址
; LPCTSTR lpKeyName, // 指向包含 Key 名称的字符串地址
; INT nDefault // 如果 Key 值没有找到，则返回缺省的值是多少
; LPCTSTR lpFileName // ini 文件的文件名
invoke GetPrivateProfileInt, ADDR g_szSectInfo, ADDR g_szKeyFileSize, 0, ADDR g_szIniFileSpec
invoke wsprintf, ADDR g_szBuf, ADDR g_szFmt4Int, ADDR g_szKeyFileSize, eax
m_MsgBox ADDR g_szBuf, MB_ICONERROR
; WritePrivateProfileString - 将一个 Key 值写入 ini 文件的指定 Section 中，它的原形是：
; WritePrivateProfileString(
; LPCTSTR lpAppName, // 指向包含 Section 名称的字符串地址
; LPCTSTR lpKeyName, // 指向包含 Key 名称的字符串地址
; LPCTSTR lpString // 要写的字符串地址
; LPCTSTR lpFileName // ini 文件的文件名,如果文件不存在, 系统会自动创建
invoke WritePrivateProfileString, ADDR g_szSectInfo, ADDR g_szKeyFileName, ADDR g_szMsgCaption, ADDR g_szIniFileSpec
.if eax==NULL
m_MsgBox ADDR g_szFailWriteStr, MB_ICONERROR
.endif
invoke WritePrivateProfileString, ADDR g_szSectInfo, ADDR g_szKeyFileSize, ADDR g_szOne, ADDR g_szIniFileSpec
.if eax==NULL
m_MsgBox ADDR g_szFailWriteStr, MB_ICONERROR
.endif
invoke ExitProcess,NULL
end start
