
16.07.2012, 12:11
|
Прохожий
|
|
Регистрация: 07.06.2010
Сообщения: 32
Репутация: 10
|
|
Цитата:
Сообщение от NumLock
честный код:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(SysErrorMessage(RunWithLogon('Test', '', '123', 'c:\WINDOWS\NOTEPAD.EXE')));
end;
end.
от имени доменного пользователя тоже работает.
|
пробую у себя
Код:
ShowMessage(SysErrorMessage(RunWithLogon('tehspec', 'elbor', 'пас', 'c:\WINDOWS\NOTEPAD.EXE')));
работает но если
Код:
d:='tehspec';
ShowMessage(SysErrorMessage(RunWithLogon(d, 'elbor', 'пас', 'c:\WINDOWS\NOTEPAD.EXE')));
не работает почему?
|