Win2000用户登陆 如何在Win2000用户登陆后取得用户名?(在开机和注销后登陆时按下“确定”后的那一刻我想取得所登陆的用户名)如何? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我想只有微软能,在等录时微软已经做了保护,让密码只传给windows系统。 procedure TForm1.Button1Click(Sender: TObject);var lpBuffer :Array[1..64] of Char; nSize :Cardinal; sUserName : String;Begin //取登录用户名 nSize := 64; GetUserName(@lpBuffer, nSize); sUserName := lpBuffer; sUserName := Copy(sUserName, 1, nSize-1); Edit1.Text := sUserName;end; 如果你要在用户刚登录时找到用户名,那就让WIN2000在启动时运行相应程序了,实现这样的方法就比较多:1。加到启动组2。改注册表3。win.ini以及自己写服务程序等等 我看到过一个软件能屏蔽掉Win2000的登陆而使用自己的登陆,Windows应该由提供这方面的API吧? 想用Delphi做一个输入法切换的程序 如何确定 sender 是第行项菜单 求实现类似eBook 软件效果的算法!!! 明天要去面试,好紧张!大家给点建议 Rave中頁尾的問題 Delphi 报表/打印应用 为什么ShowMessage被编译器说成是Undeclared identifier? 怎么使C#dll中的窗体成为delphi的子窗体?在线等,十万火急!!谢谢 移动panel或按钮 DBGrid刷新问题 获得游戏中怪物坐标!人物坐标!角色参数的解决方法!非常好用又简单! 请问向下箭头键的十进制键值是多少?
var
lpBuffer :Array[1..64] of Char;
nSize :Cardinal;
sUserName : String;
Begin
//取登录用户名
nSize := 64;
GetUserName(@lpBuffer, nSize);
sUserName := lpBuffer;
sUserName := Copy(sUserName, 1, nSize-1);
Edit1.Text := sUserName;
end;
1。加到启动组
2。改注册表
3。win.ini
以及自己写服务程序等等