delphi中WinExec的使用

最新推荐文章于 2024-11-27 16:29:35 发布
原创 最新推荐文章于 2024-11-27 16:29:35 发布 · 6.2k 阅读 · 1 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#delphi

本文详细介绍了Delphi编程中WinExec函数的用途，包括如何执行DOS命令符操作，特别注意了在参数中有空格时应如何正确使用双引号，并解释了PAnsiChar格式的重要性。

delphi中WinExec的使用

WinExec((PAnsiChar(FExecFileName + ' "' + adress + '"')), SW_SHOWNORMAL);

WinExec();函数是执行dos命令符操作用的，用这个函数需要注意命令参数如果有空格需要加双引号，里面的字符串应该用PAnsiChar格式。

Delphi 使用winexec执行备份还原注册表.rar
07-10
Delphi 备份还原注册表，使用了winexec来执行pchar命令，注册表简单备份程序，也可根据备份文件还原注册表内容，在对注册表进行一些重大设置之前，备份注册表是安全这举，这是一个好习惯，若是设置出了问题，还可通过还原功能恢复注册表内容。比如备份注册表，可以这样执行命令： 　　if BackupDialog.Execute then 　　begin 　　 winexec(pchar('command.com /C regedit.exe /e ' BackupDialog.FileName '.reg'),sw_hide); 　　end; 　　还原恢复注册表，可以这样： 　　begin 　　 if RestoreDialog.Execute then 　　 begin 　　 ShellExecute(handle,nil,pchar(RestoreDialog.FileName),nil,nil,sw_shownormal); 　　 end; 　　end;
delphi使用exec调用
10-13
unit Unit7; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; sd : SECURITY_DESCRIPTOR; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin begin InitializeSecurityDescriptor(@sd,SECURITY_DESCRIPTOR_REVISION); SetSecurityDescriptorDacl(@sd,true,nil,false); SetFileSecurity('d:\a',DACL_SECURITY_INFORMATION,@sd); end; end; procedure TForm1.Button2Click(Sender: TObject); begin // WinExec(pchar('net share ShareName=d:\a /grant:administrator'),1); WinExec(pchar('net share ShareName=d:\123 /grant:administrator,full'),1); // WinExec(pchar('cacls d:\a /g everyone:f'),1); // WinExec(pchar('netshare myshare=d:\123'),1); end; end.
Delphi 2010动态调用Windows程序
最新发布
Hunter116的博客
11-27 492
Delphi 2010，Winexec
Delphi调用外部程序函数：WinExec() 和ShellExecute详解
weixin_30770495的博客
12-16 805
1，WinExec()： 　　WinExec主要运行EXE文件，不能运行其他类型的文件。不用引用特别单元。 　　原型：UINT WinExec(exePath,ShowCmd) 　　示例，我想要用记事本打开"C:\HDC.TXT"，以正常方式运行：WinExec(pChar('notepad c:\taoyoyo.txt'),SW_SHOWNORMAL); ...
delphi WinExec CMD调用
秀才的破庙
08-09 758
c 运行后自动关闭 可以配合 & pause 暂停显示一下,但是点击后还是关闭。使用WinExec调用CMD窗口,如何才能不关闭窗口。/k运行后窗口不关闭。
delphi7中使用的FmxUtils单元
07-01
delphi7的示例中使用的fmxutils单元。这个单元具有通用性，可以直接放到lib目录中。本处提供的单元源码添加了WinExecAndWait32例程。 单元中包括文件复制，文件移动，取文件时间、属性、大小，执行文件（executefile...
精选资源
Delphi打开外部程序、把菜单加入系统菜单中
05-07
内容索引:Delphi源码,系统相关,开始菜单　Delphi打开外部已开启的应用程序，比如打开计算器应用程序，WinExec(Pchar('C:\Windows\calc.exe'), SW_NORMAL) ; 　Delphi把自己的菜单项加入系统菜单， 要解决这...
Delphi 调用外部程序并阻塞到外部程序中
08-25
在早期版本的Delphi中，通常使用WinExec函数来执行外部程序。WinExec函数通过指定的路径和参数来启动外部程序，并且可以指定程序的显示方式。然而，WinExec函数并不适合所有情况，尤其是当需要更复杂的进程控制时，...
delphi调用外部的exe文件和参数
03-23
在Delphi编程环境中，调用外部的EXE文件并传递参数是常见的需求，这主要涉及到两个函数：`WinExec`和`ShellExecute`。这两个函数都允许你在程序中启动其他应用程序，但它们的工作方式和提供的功能略有不同。 首先，...
delphi 运行外部程序函数winexec WinExecAndWait32 CreateProcess
依宸2016
12-29 1490
转载地址：http://blog.sina.com.cn/s/blog_7fdf737901013vgh.html 运行外部程序但不需等待winexec 运行外部程序并等待外部程序结束才返回结果的函数 function WinExecAndWait32(FileName: string; Visibility: Boolean): integer; var   zAppNam
Delphi WinExec ShellExec 用法介绍
javazhuanzai的专栏
01-16 838
====================================================== 注：本文源代码点此下载 ======================================================     在windows程序设计中winapi也为我们提供了类似的函数,它们就是winexec()和shellexecute(),下面就来讨论
Delphi - 通过WinAPI WinExec直接调用系统工具
weixin_30252155的博客
08-30 225
看如下代码： 1 WinExec('mspaint.exe', SW_SHOWNORMAL); // SW_SHOWNORMAL = 1 系统画图 2 3 WinExec('write.exe', SW_SHOWNORMAL); // SW_SHOWNORMAL = 1 写字板 4 5 WinExec('mstsc.ex...
delphi中使用winexec()过程调用系统程序
loadometer的专栏
01-17 1752
例如调用计算器：winexec(cacl,0); 
delphi winexec打开exe文件
10-15 1324
var   f:String; begin    f:= path+'setup.exe';    winexec(PansiChar(AnsiString(f)), sw_hide);
在Delphi中调用EXE文件，最简单、最容易理解的方法。
weixin_30394251的博客
10-19 600
我们常用的函数有两个，WinExec 和 ShellExecute。 1） 使用 WinExec 函数 （属于 WinProcs单元） · 声明形式 UNIT WinExec(LPCSTR lpCmdLine, UINT uCmdShow); [例] var SDir:string; SetLength(SDir,144)...
Delphi中调用API函数Winexec执行WinRar命令行压缩工具执行压缩
weixin_34122604的博客
12-23 515
function tform1.RarFile:Boolean;var FileName,RarName,mystr:string;begin Result:=False; mystr:=ExtractFilePath(Application.ExeName)+'WinRar\WinRar.exe -INUL'; FileName:=ExtractFilePath(Application....
delphi通过winexec执行服务注册
rznice的专栏
02-28 906
Delphi XE 10.2.2 通过调用winexec进行服务注册，这样写 winexec(PAnsiChar('aaa.exe /install '), SW_Hide)可以成功注册，但是这样写就一直不能注册服务 var v_str:string; begin v_str:='aaa.exe /install'; winexec(PAnsiChar(v_str), SW...
用delphi实现ping
xwchen的专栏
07-23 4031
函数procedure pinghost(ip:string;var info:string);ip:目标ＩＰ地址；info:ping了以后产生的信息(1)或(2)；(1)成功信息ip 发送测试的字符数　返回时间(2)出错信息Can not find host!使用uses ping;procedure TForm1.Button1Click(Sender: TObject);vars
DELPHI如何执行DOS程序
mailreboot的专栏
12-18 1783
winexec(pchar(c:/test/test.bat), SW_SHOW);第一个参数表示DOS命令的全路径，第二个表示运行方式SW_SHOW:显示运行，可以看得见DOS窗口SW_HIDE:隐藏运行，看不见DOS窗口还有SW_MAXIMIZE最小化运行，等 
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值