uses ShellApi; procedure TForm1.Button1Click(Sender: TObject); var filename, Path: string; begin filename := 'D:\WmgjServer146\server\start.bat'; Path := ExtractFilePath(filename); SetCurrentDir(Path); ShellExecute(Handle, 'open', PWideChar(filename)…

Delphi调用C# 编写dll动态库 编写C#dll的方法都一样,首先在vs2005中创建一个“类库”项目WZPayDll, using System.Runtime.InteropServices; namespace WZPayDll { public interface IWZPay { void Pay(stirng url,string payType); } [ClassInterface(ClassInterfaceType.None)] public class WZPay:I…

Delphi 调用外部程序并阻塞到外部程序中 背景说明: 前段时间开发一个数据转换的系统,业务逻辑中说明数据需要压缩成.tar.gz格式. 我在Windows系统下采用,先生成批处理文件,然后调用WinExec执行批处理文件,休眠等待一段时间,完成数据的自动压缩. 后来发现,待压缩文件的大小不确定,单纯的执行WinExec时Sleep固定时间,可能导致压缩失败.文件不全或损坏. 优化方案: 取代WinExe用CreateProcess用来启动进程, 执行批处理文件, 同时系统会自动填写TProc…

例子 C# Dll: using System; using System.Collections.Generic; using System.Text; using System.Diagnostics; using System.Runtime.InteropServices; public delegate void ProcessDelegate(long ptr, long len); namespace TestDll { public interface ITestClass2 {…

Delphi调用REST很简单,首先在界面上放上: RESTClient1: TRESTClient; RESTRequest1: TRESTRequest; RESTResponse1: TRESTResponse; 然后简单调用即可: RESTClient1.BaseURL:=edtURL.Text; RESTRequest1.Execute; memLog.Text:=RESTResponse1.Content; 还可以对结果进行进一部处理,比如解析JSON: procedure Tfrm…

delphi调用web service出现 Unable to retrieve the URL endpoint  for Service/Port, 错误截图如下 查了很长时间, 发现在DataModule的Create事件中加入公用HttpRio控件初始化语句即可解决此问题. TransDataHRIO.WSDLLocation:='http://ip地址/WS/TransData.asmx?WSDL'; TransDataHRIO.Service:= 'TransData'; Trans…

转自:http://blog.csdn.net/xieyunc/article/details/4140620   如何让Delphi调用外部程序并等待其运行结束 1. uses     Windows,     SysUtils,     Classes,     ShellAPI; function RunAndWait(FileName: string; Visibility: Integer): THandle; var     zAppName: array[0..512] of Ch…

fastscript调用Delphi过程:  1． 先创建事件处理方法:TfsCallMethodEvent 2． 然后再用调用TfsScript.AddMethod方法,第一个参数为Delphi方法的语法,第二个参数为TfsCallMethodEvent链接的一个句柄. 如在Delphi有一个过程为DelphiFunc, ….. procedure TForm1.DelphiFunc(s: String; i: Integer);  begin    ShowMessage(s + ', ' …

原文:http://www.cnblogs.com/zhangzhifeng/archive/2013/08/15/3259084.html Delphi调用C#写的webservice 用delphi的THTTPRIO控件调用了c#写的webservice. 下面是我调试时遇到的一些问题: 1:导入wsdl文件:file--new----other----webservice---WSDLimporter---输入wsdl地址:如下:http://127.0.0.1/ WebService/W…

Delphi 调用netsh命令修改IP地址 先介绍一下Netsh命令的使用方法: 在这里跟大家介绍几个简单的指令 1.Show IP 1.1Cmd Mode 直接在cmd下面输入 netsh interface ip show address 亦可简写为 netsh int ip sh ad 看看,指令是不是和Cisco的nos指令很像!非常怀疑是抄袭Cisco的. 1.2Netsh Mode 您也可以进入netsh的命令模式下 netsh //进入到 netsh mode netsh>int…