支持库命令名称修改例子

g_krnln ＝ LoadLibrary (“.\lib\krnln.fne”)
g_GetNewInf ＝ GetProcAddress (g_krnln, “GetNewInf”)
g_data ＝ Call (g_GetNewInf)
取得所有支持库函数 (g_data, 命令信息, , , 集_支持库_命令地址表)
取命令参数 (命令信息 [193], l_参数信息) ' 193号命令就是 信息框
写到内存 (“lpText”, l_参数信息 [1].参数名称, )
写到内存 (“wType”, l_参数信息 [2].参数名称, )
写到内存 (“lpCaption”, l_参数信息 [3].参数名称, )
写到内存 (“hWnd”, l_参数信息 [4].参数名称, )
m_deal ＝ 真