delphi – 使用shell执行以管理员身份运行cmd

发布时间：2020-12-15 10:14:47 所属栏目：大数据来源：网络整理

导读：我需要运行cmd按一下按钮点击管理员。有用。但我需要作为管理员来运行它。这怎么做？ ShellExecute(Handle,'open','c:Windowssystem32cmd.exe',nil,SW_SHOWNORMAL) 解决方法用runas替换打开的动词，如下所示。无论如何，尽量避免路径硬编码： uses Shell

我需要运行cmd按一下按钮点击管理员。有用。但我需要作为管理员来运行它。这怎么做？

ShellExecute(Handle,'open','c:Windowssystem32cmd.exe',nil,SW_SHOWNORMAL)

解决方法

用runas替换打开的动词，如下所示。无论如何，尽量避免路径硬编码：

uses
  ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'runas','cmd.exe',SW_SHOWNORMAL);
end;

您也可以通过将ElevationRequired属性设置为True来添加到您的按钮屏蔽图标。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!