鱼C论坛

 找回密码
 立即注册
查看: 2661|回复: 5

Delphi如何获取当前桌面?

[复制链接]
发表于 2014-8-19 07:18:30 From FishC Mobile | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
Delphi如何获取当前桌面?数?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2014-8-19 07:19:38 From FishC Mobile | 显示全部楼层
获取当前桌面的函数
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2014-8-19 13:55:47 From FishC Mobile | 显示全部楼层
获取桌面路径?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2014-9-5 15:20:33 | 显示全部楼层

查询当前已经存在的桌面。
枚举桌面的API是EnumDesktops.
BOOL EnumDesktops(
HWINSTA hwinsta, // 当前的WindowsStation句柄
DESKTOPENUMPROC lpEnumFunc, // 回调函数,由系统调用。
LPARAM lParam //传递给回调函数的参数指针
);
通常我们定义个一回调函数,定义一个全局TStringList类对象,在回调函数里将枚举到的桌面的名称增加到TStringList里。
var
sttopList : TStringList;
function EnumDesktopProc(Desktop: LPTSTR; Param: LParam): Boolean; stdcall;
begin
if (Desktop<>'Winlogon') and (Desktop<>'Disconnect') then
DesktpList.Add(DeskTop);
result := True;
end;
procedure EnumerateDesktops;
begin
EnumDesktops(GetProcessWindowStation, @EnumDesktopProc, nil);
end;

通过小甲鱼老师认证http://bbs.fishc.com/forum.php?m ... 51821&mobile=no
原来的Delphi群好像解散了,新建个 大家一起学习   争取做到有问必答。
群号:138156926
加群链接:http://jq.qq.com/?_wv=1027&k=OFAZ7G
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-9-7 07:38:06 From FishC Mobile | 显示全部楼层
我也说一句
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-9-7 07:39:59 From FishC Mobile | 显示全部楼层
我要把当前桌面给Image1,直接赋值吗?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-12-23 09:00

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表