使用 ShellExecute 来进行 Ping 操作!
来源:互联网 发布:直播变音软件 编辑:程序博客网 时间:2024/05/20 04:46
今日闲来无聊, 看到CSDN上有篇文章说关于 ShellExecute 函数的使用,突发奇想,如何利用 ShellExecute这个好东东来调用 cmd.exe 这个命令提示符程序并赋予一个值给它,让它自动进行 Ping 操作?
关键发现: 先打开MS-DOS 窗口研究,在命令提示字符下输入 cmd/? ,查看cmd.exe这个M$一直保留的程序的帮助,有了发现.
//===================================================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses shellapi;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute (Handle,nil,'cmd.exe','/K ping 127.0.0.1',nil,SW_NORMAL);
//-----这句是使用参数 /K,Ping完 IP 127.0.0.1 后,cmd.exe窗口静静的等你看结果哦...
//ShellExecute (Handle,nil,'cmd.exe','/C ping 127.0.0.1',nil,SW_NORMAL);
//-----这句是使用参数 /C,Ping完 IP 127.0.0.1 后,cmd.exe窗口消失了...
end;
end.
//=====================================================================
一点感想:
M$开发的程序一般都可以带参数运行,这个很好啊...带不同的参数,会有不同的最终结果.这点应该值得肯定.
- 使用 ShellExecute 来进行 Ping 操作!
- 使用 ShellExecute 来进行 Ping 操作!
- 使用ShellExecute函数来安装INF文件
- 使用ShellExecute函数来安装INF文件
- 如何使用Openair4G的OTG以及进行ping操作
- 使用contentProvider来进行SQlite transactions操作
- 使用jxl.jar来进行excel操作
- 使用java来ping主机
- 使用 Ping进行网络诊断
- ShellExecute使用
- ShellExecute使用
- ShellExecute使用
- ShellExecute 使用
- 提倡使用foreach语句来进行循环操作
- Spring中使用HibernateTemplate来进行数据库操作
- Spring中使用HibernateDaoSupport来进行数据库的操作
- IO:如何使用FileOutputStream来进行文件操作
- 使用Win32 加密API 来进行加密操作
- ASP.NET中自定义控件的创建和使用
- 《大学》——对“大学”最精辟的描述!
- 人生致命的八个经典问题(精彩收藏!)
- 使用 Microsoft SQL Server 2000 的全文搜索功能构建 Web 搜索应用程序
- 我的收藏夹
- 使用 ShellExecute 来进行 Ping 操作!
- 黑客入侵魔图
- 我的记事本
- 走过的路
- 开发项目和开发软件之比较
- JAVASCRIPT二维数组(实例)
- Microsoft表格渐变
- 为 Microsoft Visual Studio .NET 设计器创建可设计的组件
- 第一篇blog