贺昌峰的Email: changfenghe@sina.com
改变显示器的分辨率程序DispSet.DLL,RELEASE版,用VC6开发，在NT40+PB7下通过
提供两个版本的程序：RELEASE和DEBUG
这部分定义在DECLARE的EXTERNAL FUNCTIONS部分
FUNCTION string GetDisplaySettings () LIBRARY "DispSet.DLL"
FUNCTION boolean SetDisplaySettings (string wh) LIBRARY "DispSet.DLL"
FUNCTION boolean ResetDisplaySettings() LIBRARY "DispSet.DLL"
这是SCRIPT部分
string wh
得到当前分辨率
wh = GetDisplaySettings()
messagebox('', WH)
wh = '800*600'
设置新分辨率
if (SetDisplaySettings(wh)) then
messagebox('ok', 'ok')
end if
恢复原分辨率
ResetDisplaySettings()
下载: dispset.zip (size: 4KB)
|