Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.129.23.30] |
|
Сообщ.
#1
,
|
|
|
Здравствуйте
Столкнулся с такой проблемой Deplhi 10.3. При запуске cmd из программы не выполняются некоторые запросы. К примеру не работает quser (ipconfig работает допустим). Хотя в обычной cmd открывается всё хорошо. uses ShellAPI procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(0,'open','cmd','/k quser','C:\Windows\System32',SW_SHOW); end; Выдает ошибку: "quser" не является внутренней или внешней командой, исполняемой программой или пакетным файлом. Помогите пожалуйста Проблема наблюдается на Windows 7 и 10 (может и другие) На Windows Server 2008 R2 работает... |
Сообщ.
#2
,
|
|
|
Как запустить C:\Windows\System32\osk.exe x64 из под 32-битного приложения?
Function Wow64DisableWow64FsRedirection(Var Wow64FsEnableRedirection: LongBool): LongBool; StdCall; External 'Kernel32.dll' Name 'Wow64DisableWow64FsRedirection'; procedure TForm2.Button1Click(Sender: TObject); Var Wow64FsEnableRedirection: LongBool; begin if Wow64DisableWow64FsRedirection(Wow64FsEnableRedirection) then ShellExecute(0,'open','C:\Windows\System32\cmd','/k C:\Windows\System32\quser.exe','',SW_SHOW); end; У тебя твой код запускает экземпляр 64 битного эмулятора cmd https://yadi.sk/i/_dgirEHbTre_uA |