定义
VDesktopName: PAnsiChar; //虚拟桌面名 VDesktop: HDESK; //虚拟桌面
创建
VDesktopName := 'MYDESK'; VDesktop := CreateDesktop(VDesktopName, nil, nil, 0, GENERIC_ALL, nil);
释放
CloseDesktop(VDesktop);