副标题#e#
0. 初始化情况和OLE工具
#include <utilcls.h>
#include <shlobj.h>
// 初始化COM情况
CoInitialize(NULL);
// 建设Shell工具
Variant vShellOLE = Variant::CreateObject("Shell.Application");
1. 层叠窗口
Function CascadeWindows("CascadeWindows");
vShellOLE.Exec(CascadeWindows);
2. 横向平铺窗口
Function TileHorizontally("TileHorizontally");
vShellOLE.Exec(TileHorizontally);
3. 纵向平铺窗口
Function TileVertically("TileVertically");
vShellOLE.Exec(TileVertically);
4. 最小化所有窗口
Function MinimizeAll("MinimizeAll");
vShellOLE.Exec(MinimizeAll);
5. 除掉全部最小化
Function UndoMinimizeALL("UndoMinimizeALL");
vShellOLE.Exec(UndoMinimizeALL);
6. 配置时间
Function SetTime("SetTime");
vShellOLE.Exec(SetTime);
7. 查找计较机
Function FindComputer("FindComputer");
vShellOLE.Exec(FindComputer);
8. 查找文件
Function FindFiles("FindFiles");
vShellOLE.Exec(FindFiles);
9. 辅佐
Function Help("Help");
vShellOLE.Exec(Help);
#p#副标题#e#
10. 运行文件
Function FileRun("FileRun");
vShellOLE.Exec(FileRun);
11. 任务栏属性
Function TrayProperties("TrayProperties");
vShellOLE.Exec(TrayProperties);
12. 挂起
Function Suspend("Suspend");
vShellOLE.Exec(Suspend);
13. 封锁Windows
Function ShutdownWindows("ShutdownWindows");
vShellOLE.Exec(ShutdownWindows);
14. 打开目次对话框
int SpecFolder[17] =
{
ssfDESKTOP, ssfPROGRAMS, ssfCONTROLS, ssfPRINTERS, ssfPERSONAL, ssfFAVORITES,
ssfSTARTUP, ssfRECENT, ssfSENDTO, ssfBITBUCKET, ssfSTARTMENU, ssfDESKTOPDIRECTORY,
ssfDRIVES, ssfNETWORK, ssfNETHOOD, ssfFONTS, ssfTEMPLATES
};
Function BrowseForFolder("BrowseForFolder");
Variant ppsdf;
int nIndex = 2;
// 以选定的系统目次为根目次
ppsdf = vShellOLE.Exec(BrowseForFolder << short(Handle) << "BrowseForFolder method" <<
BIF_BROWSEINCLUDEFILES << Variant(SpecFolder[nIndex]));
// 以指定的目次为根目次
String strPath("C:\\123");
ppsdf = vShellOLE.Exec(BrowseForFolder << short(Handle) << "BrowseForFolder method" <<
BIF_BROWSEINCLUDEFILES << Variant(strPath));
15. 欣赏指定目次
int SpecFolder[17] =
{
ssfDESKTOP, ssfPROGRAMS, ssfCONTROLS, ssfPRINTERS, ssfPERSONAL, ssfFAVORITES,
ssfSTARTUP, ssfRECENT, ssfSENDTO, ssfBITBUCKET, ssfSTARTMENU, ssfDESKTOPDIRECTORY,
ssfDRIVES, ssfNETWORK, ssfNETHOOD, ssfFONTS, ssfTEMPLATES
};
Function Explore("Explore");
// 欣赏指定系统非凡目次
int nIndex = 2;
vShellOLE.Exec(Explore << Variant(SpecFolder[nIndex]));
// 欣赏指定磁盘目次
String strPath("C:\\123");
vShellOLE.Exec(Explore << Variant(String strPath));
16. 运行节制面板措施
Function ControlPanelItem("ControlPanelItem");
String strCplFile("D:\\Winnt\\System32\\appwiz.cpl");
BSTR FPath = TStringConverter<BSTR>::AnsiToOLESTR(strCplFile.c_str());
vShellOLE.Exec(ControlPanelItem << FPath);
17. 在退出措施时将Shell工具付空值
vShellOLE = Unassigned;
CoUninitialize();