多种方法查找窗口句柄

该日志由 samool 发表于 2007-07-07 11:17 AM

第一种:使用API函数FindWindow
第二种:通过枚举所有窗口,查询特定条件的窗口

第三种: 查找字窗口内元素的句柄
第四种: 直接使用类似spy++工具软件查询

» 阅读该日志全文...

该日志标签: delphi, 句柄, 元素, 窗口, 线程

Working with .NET data in Delphi

该日志由 samool 发表于 2007-06-24 12:29 PM

Webservices offer a rich world of functionality. This world is available to the Delphi programmer with the introduction of the Webservice importer introduced in Delphi 6, with version 6.02 also available in Delphi pro. A webservice can work with pretty complex data, with .NET it is a snap to return and  receive complete XML datasets. Delphi does not know how to work with these datasets natively. In this paper I will show how to work with .NET data using the GekkoDotNetDataset componenet.

» 阅读该日志全文...

该日志标签: .net, delphi, dataset

删除文件夹(含子目录)

该日志由 samool 发表于 2007-06-20 4:39 PM

利用SHFileOperation删除文件夹(含子目录)

» 阅读该日志全文...

该日志标签: shfileoperation, 删除, 文件夹, 目录, delphi

delphi如何调用.NET webservice

该日志由 samool 发表于 2007-01-11 9:03 AM

假设您已经在.net上建立了自己的webservice,目前只是想在delphi上实现对net上自己的webservice 接口的调用

1)  在你的工程中 new  -> other 选择 webservices 这页

2)  选择其中的 wsdl importer 项

3)  在其中的wsdl source中填入你已经知道的wdsl地址,这里我填入我的地址是
http://192.168.0.123/hello/tijiaosj.asmx?wsdl

4) next后 就自动生成了一个unit

5)  这个unit中包含了你提供的url地址中的所有可用接口
其中 GetXXXXXSoap 这个函数返回了这些接口的class
在业务代码中只要写 GetXXXXXSoap.XXXfunction就可以了

6)  另外提当函数要操作中文的时候,记得修改GetXXXXXSoap,添加这条语句
RIO.HTTPWebNode.UseUTF8InHeader := True; //解决中文乱码问题
呵呵,很简单,对吧

最后,稍微改了一下Delphi生成的接口单元

改动的地方为:

7). 添加接口的执行选项默认为 ioDocument
如果是JAVA 接口, 将执行选项改为 ioLiteral  即可.

修改后的代码如下:
InvRegistry.RegisterInvokeOptions(TypeInfo(XcdsExPortType), ioDocument);

该日志标签: delphi, webservice, .net

动态使用代理服务器

该日志由 samool 发表于 2006-07-09 9:58 AM

动态使用代理服务器,今天我自己封装了一个函数,在盒子上面下载一个源码,把里边的过程综合了一下,封装成一个代理专用的函数,呵呵,收藏起来,方便以后使用。另外还有一种方法也可以使用代理服务器,那就是ihttp下载文件的时候使用代理服务器。

» 阅读该日志全文...

该日志标签: 代理, delphi, 源码

在DELPHI 中如何实现程序不在任务栏中

该日志由 samool 发表于 2006-06-08 6:17 PM

1、选择菜单View -> Project Source。
    2、在uses子句中添加Windows单元。
    3、在Application.Initialize;之后添加Application.ShowMainForm := False;。
    4、在Application.Run;之前添加ShowWindow(Application.Handle, SW_HIDE);。
    你的主工程应该是这样的:
    program Project1;
    
    uses
     Windows,
     Forms,
     Unit1 in 'Unit1.pas' {Form1},
     Unit2 in 'Unit2.pas' {Form2};
    
    {$R *.RES}
    
    begin
     Application.Initialize;
     Application.ShowMainForm := False;
     Application.CreateForm(TForm1, Form1);
     Application.CreateForm(TForm2, Form2);
     ShowWindow(Application.Handle, SW_HIDE);
     Application.Run;
    end.
    在每个单元的initialization部分(在最下面)添加:
    begin
     ShowWindow(Application.Handle, SW_HIDE);
    end.

该日志标签: 任务栏, delphi

delphi中常用的字符处理函数

该日志由 samool 发表于 2006-05-08 10:44 AM

全是常用的字符处理函数,收集起来,以备后用。:)

» 阅读该日志全文...

该日志标签: delphi, 字符, 函数

Total:17‹ Prev12