级别: 中级会员
UID: 201235
精华: 0
发帖: 223
威望: 500
霏币: 37157.4
活跃度: 224
技术分: 0
非凡币: 0
交易值: 0
在线时间: 254(小时)
注册时间: 2011-01-01
最后登录: 2018-02-16
楼主  发表于: 2018-02-09 21:33:41

【其他求助】 我想问下 这段代码能转换成cmd 批处理文件吗

if SystemParametersInfo(SPI_SETFONTSMOOTHING, 1, nil, SPIF_UPDATEINIFILE or SPIF_SENDCHANGE) then  
begin  
  SHChangeNotify(SHCNE_ASSOCCHANGED,0,nil,nil);  
end;  




就是把 这个代码改成 cmd批处理文件就行  我不懂编程  不知道有没有人懂     如果转换不了 那能不能做成exe文件 发我下  先谢谢了
级别: 霏凡贵宾

UID: 25279
精华: 0
发帖: 6244
威望: 8416
霏币: 13741.7
活跃度: 6708
技术分: 48
非凡币: 0
交易值: 0
在线时间: 4552(小时)
注册时间: 2004-08-16
最后登录: 2018-02-23
1楼  发表于: 2018-02-09 23:50:01
复制代码
  1. @echo off
  2. reg add "HKCU\Control Panel\Desktop" /v "FontSmoothing" /d "2" /f
  3. RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
在这个幻象的世界中,做梦者内在的意识是唯一的真实。
级别: 新手上路
UID: 234480
精华: 0
发帖: 74
威望: 1
霏币: 60
活跃度: 74
技术分: 0
非凡币: 0
交易值: 0
在线时间: 6(小时)
注册时间: 2018-02-09
最后登录: 2018-02-23
2楼  发表于: 2018-02-10 07:36:21
楼上厉害,原来批处理还可以这么用。不过一楼那Delphi代码挺不错的,何必要转。
级别: 中级会员
UID: 201235
精华: 0
发帖: 223
威望: 500
霏币: 37157.4
活跃度: 224
技术分: 0
非凡币: 0
交易值: 0
在线时间: 254(小时)
注册时间: 2011-01-01
最后登录: 2018-02-16
3楼  发表于: 2018-02-10 09:23:48

【其他求助】 回 1楼(朴の子) 的帖子

先谢谢好心人的 热心帮助 不过我执行了这个批处理后   平滑屏幕字体边缘这个选项并没有勾上 不知道是啥原因  能帮忙看看么 先谢谢了
级别: 新手上路
UID: 234480
精华: 0
发帖: 74
威望: 1
霏币: 60
活跃度: 74
技术分: 0
非凡币: 0
交易值: 0
在线时间: 6(小时)
注册时间: 2018-02-09
最后登录: 2018-02-23
4楼  发表于: 2018-02-11 11:19:25
监控了一下注册表,试了试没有成功,还是用api吧。需要的话,我帮你编译一下。
级别: 霏凡贵宾

UID: 25279
精华: 0
发帖: 6244
威望: 8416
霏币: 13741.7
活跃度: 6708
技术分: 48
非凡币: 0
交易值: 0
在线时间: 4552(小时)
注册时间: 2004-08-16
最后登录: 2018-02-23
5楼  发表于: 2018-02-11 14:17:03
需要注销或重启后才能看到勾上,批处理的局限吧。
级别: 霏凡贵宾

UID: 25279
精华: 0
发帖: 6244
威望: 8416
霏币: 13741.7
活跃度: 6708
技术分: 48
非凡币: 0
交易值: 0
在线时间: 4552(小时)
注册时间: 2004-08-16
最后登录: 2018-02-23
6楼  发表于: 2018-02-14 11:56:33
经反复试验,下面的代码可以不用重启电脑就能实现“平滑屏幕字体边缘”:

引用

@echo off
reg add "HKCU\Control Panel\Desktop" /v "FontSmoothing" /d "2" /f
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
sc stop themes&sc start themes