摘要： 1、Json的创建 创建李四、王五放到data数组中 代码如下： var Json_In,Json_M,Json_A:ISuperObject; begin Json_A:=SA([]); Json_M := SO(); Json_In := SO(); Json_In.S['sXM'] := '张 阅读全文

摘要： 技术包含 1、DLL的创建与调用 2、接口的创建与实现 3、接口函数的实现 4、DLL调用主窗体函数 调用流程 1、声明接口函数单元，创建接口与函数 2、创建主窗体，引用接口单元，实现接口函数 3、创建DLL引用接口单元，调用主窗体实现的接口函数 代码如下 /***************接口单元代 阅读全文

摘要： handle := FindWindow(nil,PChar('窗口的标题')); 或者： procedure TForm1.Button1Click(Sender: TObject); var hCurrentWindow: HWnd; WndText:String; begin hCurrent 阅读全文