delphi新建用户与用户在登录界面显示问题
来源:互联网 发布:kk源码 编辑:程序博客网 时间:2024/05/16 05:01
delphi新建用户:
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
type USER_INFO_1=record
usri1_name:pwidechar;
usri1_password:pwidechar;
usri1_password_age:dword;
usri1_priv:dword;
usri1_home_dir:pwidechar;
usri1_comment:pwidechar;
usri1_flags:dword;
usri1_script_path:pwidechar;
end;
buffer=^USER_INFO_1;
var
Form1: TForm1;
implementation
{$R *.dfm}
function NetUserAdd(Server:PWideChar;Level:DWORD;Buf:pointer;ParmError:dword):LongInt;
stdcall; external 'netapi32.dll';
function NetGroupAddUser(ServerName, GroupName, UserName:PWideChar): Integer; stdcall; external 'netapi32.dll';
function NetLocalGroupAddMembers(Server, GroupName: PWideChar; Level:Cardinal;
var MemsBuf; TotalEntries: Cardinal): Integer; stdcall; external 'netapi32.dll';
procedure TForm1.Button1Click(Sender: TObject);
var buf:buffer;
un:widestring;
error:dword;
i:integer;
begin
getmem(buf,sizeof(USER_INFO_1));
with buf^ do
begin
un:=edit1.Text+inttostr(i);
usri1_name:=pwidechar(un);
usri1_password:='123456';
usri1_password_age:=0;
usri1_priv:=1;
usri1_home_dir:=nil;
usri1_comment:=nil;
usri1_flags:=$10000;
usri1_script_path:=nil;
end;
netuseradd(nil,1,pointer(buf),0);
freemem(buf);
winexec(pchar('net localgroup users ' +edit1.Text +' /add'),sw_hide);//加权限
sleep(10);
end;
end.
========================================================
新建用户不在登录界面显示:
HKEY_LOCAL_MACHINESoftware/Microsoft/Windows NT/CurrentVersion/Winlogon/SpecialAccounts/UserList
适用范围:Windows XP
默认情况下,Windows XP会在登录界面中显示已经建立的用户账户名称。这样将方便恶意者猜测用户口令而进入系统,以下设置可隐藏特定的用户在登录界面中被显示出来。
步骤1:在注册表编辑器中查找以下子键:
HKEY_LOCAL_MACHINE/Software/Microsoft/Windows NT/CurrentVersion/Winlogon/Spe cialAccounts/UserList。
步骤2:为每一个希望被隐藏的用户新建一个"DWORD值",键名就是要被隐藏的用户名,将这些新建键值设置为0。
步骤3:重新启动Windows XP,登录界面中就看不到那些用户账户名称了
- delphi新建用户与用户在登录界面显示问题
- 在WINDOWS登录界面上显示或者隐藏administrator用户
- mysql新建用户在本地无法登录
- Ubuntu 新建用户无法登录问题
- MySQL新建用户无法登录的问题
- Ubuntu 新建用户无法登录问题
- Ubuntu 新建用户无法登录问题
- debian新建用户显示$
- delphi 用户登录 代码
- DELPHI用户登录方案
- DELPHI用户登录方案
- DELPHI用户登录方案
- xp新建用户后登陆界面不显示Administrator账号
- Android 用户登录界面
- 用户登录界面.cs
- 用户登录界面
- 用户登录界面
- 用户登录界面
- 2.4.2 JNDI绑定的SessionFactory
- LED的色度学特性
- Python合并list和拆分字符串
- SEO(搜索引擎优化)全面研究
- 二分查找之一
- delphi新建用户与用户在登录界面显示问题
- session和cookie的最深刻理解
- ASP编程十大技巧(基础)
- LED的光学特性
- javabean得总结
- reactos操作系统实现(48)
- 数据库互导
- Anniversary
- 软件提交入口