Как программно создать учетную запись пользователя на локальном компе?

вообще интересут код на Делфи.

нашел такой код на C#
можно такое сделать на делфи ?

Код (Text):

1. using System;
2. using System.DirectoryServices;
3. class DemoApplication
4. {
5.   const string SystemPath = "WinNT://YourMachineName";
6.   const string MethodCreatePassword= "SetPassword";
7.   const string Login = "YourLogin";
8.   const string Password = "YourPassword";
9.   const string SchemaName = "User";
10.   static void Main()
11.   {
12.     using(DirectoryEntry systemEntry = new DirectoryEntry(SystemPath))
13.     {
14.       using(DirectoryEntry user = systemEntry.Children.Add(Login, SchemaName))
15.       {
16.         user.Invoke(MethodCreatePassword, Password);
17.         user.CommitChanges();
18.       }
19.     }
20.   }
21. }

 

не легче net user ... add?

 

The NetUserAdd function adds a user account and assigns a password and privilege level.

Код (Text):

1. NET_API_STATUS NetUserAdd(
2.   LPCWSTR servername,
3.   DWORD level,
4.   LPBYTE buf,
5.   LPDWORD parm_err
6. );

 

Dostoevsky
NetUserAdd - WinNT only.
FreeManCPM
Это без отказный вариант.

 

FreeManCPM
atorn
В в Windows 98 нет net user. В Windows 95 и подавно.

 

Какой дурак будет писать сегодня под эту ОСь?

 

W4FhLF
Ну дык поэтому я и предлагаю NetUserAdd. Более того в Windows 9x нет смысла создавать локальных пользователей потому что там нет таких привилегий пользователей как в Windows NT.

 

пусть fly выберет то, что ему больше всего подходит

 

FreeManCPM
Ну имхо использовать другую прогу для реализации функциональности своей проги - это не подзеннски - лишний процесс и все связанные с ним накладные расходы.

 

согласен