ProgramFiles, UAC, права Администратора...

[vitaly_l]

"Пользователь! Перезапусти!"

Это плохой вариант...

Остаётся вариант: CreateProcessWithLogonW...
Но как получить: User, Domain, Password ??? Такое вообще возможно??? Если такое возможно, то нужен пример (поиск не дал результата)
Если такое невозможно то остаётся cacls, но тогда нужен список User'sName на машине... Как такой список получить??? (поиск не дал результата)
Или точнее уникальное название группы "все пользователи"...



СПАСИТЕ - ПОМОГИТЕ.... (пожалуйста) или убейте Блин-Гейтца!
Вот зачем все эти пароли?, если достаточно напечатать команду из 10 символов и доступ открыт ко всему...


.

[Brainenjii]

создавать назначенные задания для пользователя можно без знания паролей - достаточно иметь админские права. Собственно, этот вариант и предлагался для обхода большого сообщения ^_^

[vitaly_l]

создать назначенное задание для запуска приложения через 1 секунду

Это (назначенное задание) я тоже делать не умею... Пример можно???

[Brainenjii]

Schtasks - раз уж с cacls'ами справились, то этот синтаксис точно освоите

[vitaly_l]

раз уж с cacls'ами справились, то этот синтаксис точно освоите

Спасибо это полезная ссылка(рекомендую там аж шесть частей про Schedule)...

Однако вопрос о получении списка User's на машине - остаётся открытым...
Если кто знает, пример, ПОЖАЛУЙСТА!!!

.

[Brainenjii]

В WinAPI не силён. Выше уже предлагалось решение в духе сей темы ^_^ Вызываете TaskList /V с получением вывода, отыскиваете в нём строки с explorer.exe и вычленяете оттуда имя пользователя (там же - домен). Если пользователь запустил Install из под своей учетки (даже от другого пользователя) - там этот пользователь будет.

[vitaly_l]

Вызываете TaskList /V с получением вывода

для текущего пользователя UserName проще получить с помощь команды set...



.

[Brainenjii]

если запущено под админом - set вернёт админа, насколько я понимаю...

[vitaly_l]

если запущено под админом - set вернёт админа, насколько я понимаю...

GetEnvironmentVariable - вернёт имя пользователя, а если он обладает правами админа, то имя админа...


Вопрос: Есть ли, аналог: cacls? (в виде функции)



.

[PapaNT]

Пишете на NTFS? Посмотрите права на каталог с файлом и, если необходимо, через setacl.exe поправьте права к файлу.

P.S.: Ели будет свободное время, то сам как-нибудь нарисую модуль для работы с NTFS

[Tango]

Может лучше так? И это будет правильно!

Код: Выделить всё

Const
  DCLDir='YouProgrammName';
{$IFDEF UNIX}
  PathDelim='/';
  ConfigDir='/.config/';
{$ELSE}
  PathDelim='\';
  ConfigDir='\';
{$ENDIF}


Procedure InitGetAppConfigDir;
Begin
  {$IFDEF UNIX}
  AppConfigDir:=GetEnvironmentVariable('HOME');
  {$ENDIF}
  {$IFDEF MSWINDOWS}
  AppConfigDir:=GetSpecialPath(CSIDL_APPDATA);
  {$ENDIF}

  AppConfigDir:=AppConfigDir+ConfigDir;

  if not DirectoryExists(AppConfigDir) then
    CreateDir(AppConfigDir);

  AppConfigDir:=AppConfigDir+DCLDir;
  If not DirectoryExists(AppConfigDir) then
    CreateDir(AppConfigDir);
End;