来源: 互联网  发布时间: 2014-02-18

求高手写两个与隐藏桌面相关的工具（bat、exe均可）
求高手写两个与隐藏桌面相关的工具（bat、exe均可） 


运行“A工具”达到如下效果： 
一、隐藏桌面上的所有图标； 
二、隐藏任务栏； 
（包括：开始、快速启动、程序、托盘、时间.....任务栏上的所有项目） 
三、全部静音，并最小化所有窗口； 
四、禁止热键“Ctrl+Alt+Del”调用任务管理器。 

运行“B工具”达到如下效果： 
一、立即提示：“请输入解冻密码”； 
二、如果输入密码错误，立即退出； 
三、如果输入密码正确，则—— 
1、显示桌面上的所有图标； 
2、显示任务栏； 
3、恢复热键“Ctrl+Alt+Del”调用任务管理器的功能。 

注： 
1、不论是“A工具”还是“B工具”，均要求一点击就立即运行；运行完毕就立即自动退出。不能出现什么“按任意键继续\退出”之类的界面。 
2、用“记事本”打开“B工具”后，客户能自由设定“解冻密码”。相关说明不要写进“B工具”，请在帖子回复中说明。 
3、如果，“A工具”难以实现“功能3”（全部静音，并最小化所有窗口），那就算了。但是，请在帖子回复中说明原因。 
4、我收集了一些相关的Reg，见附件。 

附件： 
1、禁用任务管理器 
Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system] 
"DisableTaskMgr"=dword:00000001 

2、启用任务管理器 
Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system] 
"DisableTaskMgr"=dword:00000000 

3、隐藏桌面 
Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer] 
"NoDesktop"=dword:00000001 


4、显示桌面 
Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer] 
"NoDesktop"=dword:00000000 

5、隐藏“任务栏和开始菜单” 
Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer] 
"NoSetTaskbar"=dword:00000001 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Control Panel] 
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Control Panel\Desktop] 

6、显示“任务栏和开始菜单” 
我不知道。 


又发现了一段“隐藏桌面图标和任务栏”的代码，但我不懂，给大家参考。 
-------------------------------------------- 
unit Unit1; 

interface 

uses 
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
Dialogs, StdCtrls; 

type 
TForm1 = class(TForm) 
  CheckBox1: TCheckBox; 
  CheckBox2: TCheckBox; 
  procedure FormCreate(Sender: TObject); 
  procedure CheckBox1Click(Sender: TObject); 
  procedure CheckBox2Click(Sender: TObject); 
end; 

var 
Form1: TForm1; 

implementation 

{$R *.dfm} 

{初始化} 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
CheckBox1.Caption := '隐藏桌面图标'; 
CheckBox2.Caption := '隐藏任务栏'; 
end; 

{隐藏或显示桌面图标} 
procedure TForm1.CheckBox1Click(Sender: TObject); 
var 
h: HWND; 
begin 
h := FindWindow('Progman', nil); {Progman 是桌面窗口的类名} 
if TCheckBox(Sender).Checked then 
  ShowWindow(h, SW_HIDE) 
else 
  ShowWindow(h, SW_RESTORE); 
end; 

{隐藏或显示任务栏} 
procedure TForm1.CheckBox2Click(Sender: TObject); 
var 
h: HWND; 
begin 
h := FindWindow('Shell_TrayWnd', nil); {Shell_TrayWnd 是任务栏窗口的类名} 
if TCheckBox(Sender).Checked then 
  ShowWindow(h, SW_HIDE) 
else 
  ShowWindow(h, SW_RESTORE); 
end; 

end. 
-------------------------------------------- 
再补充一下，修改注册表隐藏桌面要重启电脑，不好！

    

    来源: 互联网  发布时间: 2014-02-18

会制作电子相册的，帮帮忙
我想做一个电子相册，不知道用什么软件好。希望大家给我推荐下，我的要求如下：
1、我没做过，希望这个软件简单易上手
2、我要做成的相册是点开后显示就想一本书一样，一页一页的翻开，不要像幻灯片一样全屏的，桌面上的什么都看不见了。
3、我现在用了美图秀秀和isee做好了图片，就是找一个生成的东西；如果哪位大侠用以上两款软件制作过我想要的那种相册，请大家赐教。


影集电子相册制作系统普及版

    

    来源: 互联网  发布时间: 2014-02-18

能否把电脑里播放的音乐与麦克风采集的人声混到一起传出去？
各位达人！ 请教一个问题。  

能否把电脑里播放的音乐与麦克风采集的人声混到一起传出去？ 有没有什么软件能做到这功能或者是设置下windows

想让与我语音聊天的人听到我声音的同时还有清晰的背景音乐 

注意的是。我不想通过麦克风采集音箱里传出来的歌曲声音。 如果是耳机怎么办？


qq聊天时，加背景音乐