Delphi
文章平均质量分 64
delphi1234
这个作者很懒,什么都没留下…
展开
-
delphi中Message消息的使用方法
实例1 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; constWM_ME=WM_USER+100; //自定义消息; type TForm1 = class(TFo原创 2008-02-20 18:28:00 · 16218 阅读 · 0 评论 -
在delphi中三个形式:ADODB_TLB ADOInt ADODB
转自:http://www.mini188.com/showtopic-862.aspx在delphi中三个形式:ADODB_TLB ADOInt ADODB RecordSet在delphi中常见的转换问题三个文件中都有,但都不同ADODB_TLB._RecordSet ADOInt._RecordSet ADODB.RecordSetADODataSet和ADOQuery只能接受A转载 2009-06-12 17:24:00 · 2870 阅读 · 1 评论 -
使用Indy控件发邮件时遇到的问题
使用TIdMessage和TIdSMTP来发生邮件;邮件正文使用HTML,发163和QQ邮箱正常,而发126和188等会显示HTML源码。多方查资料后,在微软的http://office.microsoft.com/zh-cn/outlook/HP012329962052.aspx中突然得到灵感,可能是邮件格式的原因。一试ContentType果然如此。如果没有设ContentType, 则有些邮原创 2009-06-16 13:38:00 · 1788 阅读 · 0 评论 -
系统服务和普通FORMS程序共存一体的实现
要求:一个EXE,如何将它做成这样的效果:1、双击它时,像一个FORMS程序那样正常显示窗体运行。2、注册成系统服务,每次都可以从service.msc中启动它。也就是说,没注册之前,它可以当作普通FORMS程序运行,注册之后,它就可以当系统服务运行。 做法:参考Delphi 里面scktsrvr的源代码,Program Files/Borland/Delphi7/Bin 搜索sckt原创 2009-07-03 14:22:00 · 1503 阅读 · 0 评论 -
用DELPHI操作EXCEL
在DELPHI中显示EXCEL文件,可用以下简单代码做到。但要实用,则需进一步完善。 var Form1: TForm1; EApp:variant;implementationuses ComObj, OleServer,Excel2000;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin EAp转载 2009-07-09 16:02:00 · 6969 阅读 · 0 评论 -
万能查询器DLL使用说明 http://www.absky.cn/?product-80.html
销售网址:http://www.absky.cn/?product-80.html 1、万能查询器DLL带自动分页功能, 它的自动分页功能,避开存储过程分页和数据集分页,直接自动在取数之前就分好。相比其它形式的分页更简单实用且运行速度更快。2、可以以OleVariant形式返回指定的单个值,单行数据,多行数据,返回查询语句,还可以手动修改自动生成的查询语句,做到真正的方便实用。原创 2009-07-11 13:55:00 · 1759 阅读 · 0 评论 -
RemObjects常见问题列表
1、找不到RODLFile.res --> 检查在服务端窗体上是否有放置THYRODLReader组件,并是否有将TRO**Message组件的RODLReader属性关联到THYRODLReader组件 2、服务端的TRO**Server、TRO**Message组件一定要放在主窗体上,不能放在其它地方,如bpl包,impl窗体。如果放在非主窗体上,则客户端会出现找不到服务原创 2010-02-01 19:52:00 · 1421 阅读 · 0 评论 -
delphi调用VC++6的DLL
1、保证你传递的参数要正确:C++中的char *对应PASCAL中的pchar。2:C++中导出的函数的参数调用方式要和你DELPHI中的导入的函数参数调用方式要一致! 例如: C++的参数调用方式 对应的DELPHI的参数调用方式 _declspec cdecl WINA转载 2010-02-27 09:57:00 · 1228 阅读 · 0 评论 -
多桌面切换
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, StdCtrls, Buttons, ExtCtrls, TrayIconForm, AppEvnts;type TSh转载 2010-03-05 16:32:00 · 864 阅读 · 0 评论 -
DELPHI7操作INHTTP访问SSL出错信息解决方法
<br />使用IdHttp访问Https网址时,要加一个IdSSLIOHandlerSocket控件,设置idhttp的IOHandler属性为IdSSLIOHandlerSocket控件。<br /> <br />procedure TForm1.Button1Click(Sender: TObject);<br />var<br /> RData_TreatPost:string;<br /> FormParam:TStrings;<br />begin<br /> FormParam:=TSt原创 2010-08-11 16:51:00 · 12175 阅读 · 0 评论 -
delphi控件图标制作
打开DELPHI的ToolsàImage Editor : 新建一个.dcr 文件,文件名等于包名(.dpk),与包体保存在同一路径;如图: 1、 在DCR文件中,右键新建添加Bitmap文件格式: 尺寸24*24 ,SuperVGA256色; 文件名改为对应控件的类名,如上图的TCHECKGROUP等; 2、 在包文件上右键,点VIEW SOURCE,如下图:原创 2009-06-02 09:04:00 · 3483 阅读 · 0 评论 -
用Delphi7实现Web Service
用Delphi7开发Web Service程序,并把服务程序放在IIS Web服务器上提供给各种客户程序调用。 一编写服务程序 第一步:File----->New----->Other------>WebServices----->Soap Server Application选择ISAPI/NSAPI Dynamic Link Library然后确定,(如果没有做过,原创 2009-05-28 14:23:00 · 4748 阅读 · 1 评论 -
delphi中Time消息的使用方法
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;const TIMER_ID = 200;type TForm1 = class(TForm) Label1: TLa原创 2008-02-20 18:32:00 · 2247 阅读 · 0 评论 -
Delphi中Interface接口的使用方法
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type //定义接口如果接口独立成一个文件,则在应用程序中和实现程序中都要引用该接口文件; ICar = interfa原创 2008-02-20 18:41:00 · 12967 阅读 · 1 评论 -
delphi中Thread线程的使用方法
TClientDataThread = class(TThread) private public ListBuffer :TStringList; TargetList :TStrings; procedure synchAddDataToControl; procedure showme; constructor Create(Cr原创 2008-02-20 18:38:00 · 7250 阅读 · 0 评论 -
delphi中临界操作方法
var FLock:TRTLCriticalSection; //定义临界区域begin InitializeCriticalSection(FLock); //初始化临界区域 EnterCriticalSection(FLock); //进入临界区域 LeaveCriticalSection(FLock); //退出临界区域 DeleteCr原创 2008-02-20 18:40:00 · 2330 阅读 · 0 评论 -
变量的包装
在程序开发中经常会遇到类型传递不配的情况,有时又不得不传递所需的类型,我们可以采用包装的方法(碍眼法),如下,我们要在TCheckListBox中保存IGRField字段,但TCheckListBox本身只允许TObject类型,于是我们可以采用将IGRField包装成TObject的方法,再加入TCheckListBox,如下:1、先将IGRField包装成TObject类;原创 2008-11-06 21:22:00 · 782 阅读 · 0 评论 -
组合键问题
试了PostMessage和SendMessage之后,个人感觉这两者发送组合键都不能成功,可能是我个人水平有限,于是改用以下方式倒可以解决, Ex: 发送shift+Tab的组合,使光标向后倒退的跳。 if key=38 then begin keybd_event(VK_SHIFT,0,0,0); keybd_event(VK_TAB,0,0,0); keybd_原创 2008-11-07 19:21:00 · 743 阅读 · 0 评论 -
Item项目中添加对象
在编程过程中,我们有时因为各种原因,想要在ITEM项目中保存我们想要的东西,这时,我们就得使用Object类来帮助我们实现了。在DELPHI中例如:1:我们需要自定义一个对象(这步要视具体情况而定,如有现成的则使用现成的对象) type TBiItemClass = class(TObject) Value:Variant; Name1:Variant; N原创 2009-03-14 12:48:00 · 1033 阅读 · 0 评论 -
转: 用Delphi7 调用.NET 2.0的WebService 所要注意的问题。
本贴转自: http://www.cnblogs.com/sonicit/archive/2007/06/02/768753.html用Delphi7 调用.NET 2.0的WebService 所要注意的问题。 Delphi7 调用VS.NET 2005开发的基于.NET 2.0的WebService时发生了错误。查阅资料 http://www.community.borl转载 2009-04-18 13:59:00 · 759 阅读 · 0 评论 -
windows数据类型
ATOM 原子(原子表中的一个字符串的参考) BOOL 布尔变量 BOOLEAN 布尔变量 BYTE 字节(8位) CCHAR Windows字符 CHAR Windows字符 COL转载 2009-05-29 08:46:00 · 814 阅读 · 0 评论 -
DLL入口修复
DLL入口修复<br /><br />library { library name };<br /><br />uses<br />SysUtils,Forms, Classes;<br /><br />{$R *.res}<br /><br />var <br />DllApp: TApplication;<br />DllScr: TScreen;<br /><br />procedure DLLUnloadProc(Reason: Integer); register;<br />begin<原创 2010-08-25 14:52:00 · 782 阅读 · 0 评论