delphi如何调用DOS命令或批处理文件 用ShellExecute,但是要引用ShellAPI单元!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 补充一下关闭dos的窗口procedure TForm1.Button1Click(Sender: TObject);var ClassName : string; Title : string; h:THandle;begin ClassName := 'tty'; Title := 'MS-DOS 提示符'; end; h:=FindWindow(PChar(ClassName), PChar(Title)); SendMessage(h,WM_Close,0,0);end; SendMessage(h,WM_Close,0,0);用这种方法并不总能成功, 有些Dos命令运行完成后必须按Ctrl+C才能结束, 而发送WM_Close命令, 却出现一个要求关闭的对话框 一个简单的方法,建一个PIF快捷方式,自动关闭 如何生成图片,并上传 有两张结构完全相同的表A1和A2,现要表A的内容复制到A2表末尾中,请问SQL语句该怎么写呀~!!!~~~????????? !使用ODAC连接Oracle的问题,请高手解答! 安装delphi的软硬件环境的问题! 呵呵,不好意思 有一个问题 如何判断一个文件正在被其他程序写入. 为何添加记录出错 希望我的书是大家一起参与的结晶,在这里贴出第一章的草稿。。。(nicrosoft) 最近比较忙,说声对不起 请求帮助,一个关于安装的问题!! 高手请进:我用了一个‘托盘’控件让程序在启动时最小化,现在我想在某一时刻让程序最大化,应该怎么写???
procedure TForm1.Button1Click(Sender: TObject);
var
ClassName : string;
Title : string;
h:THandle;
begin
ClassName := 'tty';
Title := 'MS-DOS 提示符';
end;
h:=FindWindow(PChar(ClassName), PChar(Title));
SendMessage(h,WM_Close,0,0);
end;
用这种方法并不总能成功, 有些Dos命令
运行完成后必须按Ctrl+C才能结束, 而发送
WM_Close命令, 却出现一个要求关闭的对话框