procedure RefreshDesktop;
var c1 : THandle;
begin
c1:=windows.FindWindowEx(windows.FindWindowEx(windows.FindWindow('Progman','Program Manager'),0,'SHELLDLL_DefView',''),0,'SysListView32','');
PostMessage(c1,WM_KEYDOWN,VK_F5,0); PostMessage(c1,WM_KEYUP,VK_F5,1 shl 31);
end;
var c1 : THandle;
begin
c1:=windows.FindWindowEx(windows.FindWindowEx(windows.FindWindow('Progman','Program Manager'),0,'SHELLDLL_DefView',''),0,'SysListView32','');
PostMessage(c1,WM_KEYDOWN,VK_F5,0); PostMessage(c1,WM_KEYUP,VK_F5,1 shl 31);
end;
解决方案 »
- 【大神帮忙】-----------关于多文件的流处理------------------
- 一条SQL语句 可以编译就是出现missing query ,table name错误????
- 一个简单的insert into语句
- D新手低级问题!
- 请问高手一程序打包问题?急急!
- 哪里要兼职delphi程序员???
- AdoQuery 执行脚本,在线等待
- 谁用过DSPack控件呀?DSPack里的那几个控件可不可以处理MPEG2数据流呀?
- 请教这样一个问题:怎样随意改变StringGrid的单元格的底色,并且在改变下一个单元格底色后前面的设置继续保留原状。
- 在程序中用到了数据集组件,当程序启动后,出现登录数据库的对话框,请问如何隐藏它啊
- Delphi_Li(Delphi Li) ,lincanwen(海) ,Focus(老鱼) 刚才关于opengl的帖子手一发抖就给结了,对不住,麻烦来领分,谢谢各位
- 如何对一个adotable连接的表进行清空所有记录的操作!谢谢!100分送上!
请问windows是什么????在什么*.dcu里?