获取那个任务管理器中最后一页的用户栏的用户信息 急求:用Delphi怎么去获取那个任务管理器中最后一页的用户栏的用户信息?因为我一台主机有好多用户TS(远程桌面连接)进来,我要取得这些连进来的用户名,也就是上面那个任务管理器中最后一页的用户栏里的信息,当然不光是用户名,还有后面的什么状态、客户端名、会话都要,我要的不是那个进程里的User。望各位大虾提供完整解决方案。3Q.... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 先枚举得到SessionIDWTSEnumerateSessions(WTS_CURRENT_SERVER, 0, 1, pSessionInfo, CountSessions);再根据ID得到登录名WTSQuerySessionInformation(WTS_CURRENT_SERVER_HANDLE, SessionID, WTSUserName, buf, i)case State of WTSActive: nomenodo := '活动的'; WTSListen: NomeNodo := 'RDP-Tcp'; WTSIdle: NomeNodo := 'Idle'; WTSShadow: NomeNodo := pWinStationName + ' shadow'; WTSDown: NomeNodo := 'Down'; WTSInit: NomeNodo := 'Init'; WTSReset: NomeNodo := 'Reset'; WTSConnectQuery: NomeNodo := 'ConnectQuery'; WTSDisconnected: NomeNodo := '已断开'; end;完整代码留下EMAIL我发给你. 怪事,DLL函数这样写居然不对 监视自动运行程序 image 紧急求救! Fastreport2.x的報表定義文件(.frf)如何在Fastreport3.x(.fr3)中使用??? 在FastReport预览时设置纸张的大小和页边距?在线等待。。。 怎样在运行时设置文本框焦点? Delphi 2010 在编译GetHostByname时不能编译,但DELPHI 7.0可以!高手帮我一下 怎样编译单个可独立运行的EXE文件?(无需任何库支持) 如果判断一个文件是否是XML文件 初学者提问!! Delphi中各种控件连接数据库的代码 DBGrid加入其它控件的时候传递的问题
WTSEnumerateSessions(WTS_CURRENT_SERVER, 0, 1, pSessionInfo, CountSessions);
再根据ID得到登录名
WTSQuerySessionInformation(WTS_CURRENT_SERVER_HANDLE, SessionID, WTSUserName, buf, i)
case State of
WTSActive: nomenodo := '活动的';
WTSListen: NomeNodo := 'RDP-Tcp';
WTSIdle: NomeNodo := 'Idle';
WTSShadow: NomeNodo := pWinStationName + ' shadow';
WTSDown: NomeNodo := 'Down';
WTSInit: NomeNodo := 'Init';
WTSReset: NomeNodo := 'Reset';
WTSConnectQuery: NomeNodo := 'ConnectQuery';
WTSDisconnected: NomeNodo := '已断开';
end;
完整代码留下EMAIL我发给你.