摘要: //将报表第iPageNo页存为BMP文件 procedure ReportSaveToBMPFile(sFileName :string; iPageNo :integer); var E: TMetaFile; B: TBitmap; begin E := QRPreview1.QRPrinter.GetPage(iPageNo); //想要第几页 B := TBitma... 阅读全文
posted @ 2009-01-07 15:51 水若冰 阅读(423) 评论(0) 推荐(0) 编辑
摘要: 自画TlistView带进度条的Item TListView的Item条一般是由系统自画的,但电驴就实现了自画,使之看起来很漂亮,我们用DELPHI也可以实现!首先要引用CommCtrl单元,这是TListView底层控制单元:usesCommCtrl;//画状态条procedure DrawSubItem(LV: TListView; Item: TListItem; SubItem: Inte... 阅读全文
posted @ 2008-12-04 19:56 水若冰 阅读(9666) 评论(1) 推荐(3) 编辑
摘要: 控件smtp: TIdSMTP;MgeSend: TIdMessage;代码procedure TForm1.Button1Click(Sender: TObject);begin SMTP.Host:='smtp.163.com'; smtp.Username:='zhm001x@163.com'; smtp.Password:='paswrd'; smtp.Port:=25; smtp.Con... 阅读全文
posted @ 2008-12-04 15:12 水若冰 阅读(5581) 评论(6) 推荐(0) 编辑
摘要: public { Public declarations } procedure SetIniFile(Strtitle, StrName :String;FileName : String); function ReadIniFile(Strtitle, StrName :String): String;function TForm11.ReadIniFile(Strtitle, StrName... 阅读全文
posted @ 2008-11-27 18:02 水若冰 阅读(2126) 评论(0) 推荐(0) 编辑
摘要: 在Delphi中如何对注册表进行操作Windows注册表跟踪记录操作系统和各种在系统上安装的应用程序的有关信息。注册表是一个分层数据库。该数据库包含以特定格式表示的配置信息,并且可以直接通过注册表编辑器程序编辑,也可以通过应用程序修改。在早期的Windows版本中,INI文件粗略地完成了这一功能,尽管注册表与INI文件有一些相似之处,但不管怎样,由于组织结构的原因,注册表比传统的INI文件要复杂得... 阅读全文
posted @ 2008-11-17 20:16 水若冰 阅读(6378) 评论(0) 推荐(0) 编辑
摘要: 窗体上的控件PopupMenu; TrackBar1; Label1;窗体上的代码unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ShellAPI, Menus;const WM_TRAYI... 阅读全文
posted @ 2008-11-17 16:50 水若冰 阅读(2033) 评论(0) 推荐(0) 编辑
摘要: sql server 2005 字段类型为 imagedelphi使用的单元为jpeg, db, dbtables;delphi 存储图片代码片段procedure TForm1.btnPostClick(Sender: TObject);var lMemoStream : TMemoryStream; jpg : TJpegImage;begin lMemoStream := TMemorySt... 阅读全文
posted @ 2008-11-17 08:42 水若冰 阅读(2362) 评论(1) 推荐(0) 编辑
摘要: PostMessage和SendMessage有什么区别?PostMessage只是把消息放入队列,不管其他程序是否处理都返回,然后继续执行;而SendMessage必须等待其他程序处理消息后才返回,继续执行。PostMessage的返回值表示PostMessage函数执行是否正确;而SendMessage的返回值表示其他程序处理消息后的返回值。字号: 大大 中中 小小 教你:Delphi获取句柄... 阅读全文
posted @ 2008-11-15 16:17 水若冰 阅读(2371) 评论(0) 推荐(0) 编辑
摘要: 1.windows消息机制Windows应用程序的消息处理机制如图1.2所示。(1)操作系统接收到应用程序的窗口消息,将消息投递到该应用程序的消息队列中。(2)应用程序在消息循环中调用GetMessage函数从消息队列中取出一条一条的消息。取出消息后,应用程序可以对消息进行一些预处理,例如,放弃对某些消息的响应,或者调用TranslateMessage产生新的消息。(3)应用程序调用Dispatc... 阅读全文
posted @ 2008-11-11 19:47 水若冰 阅读(1200) 评论(0) 推荐(1) 编辑
摘要: select * from table1 inner join table2 on table1.id = table2.id select * from table1 , table2 where table1.id = table2.id 两种方式的执行结果一样 它们的具体区别是什么呀 1 .WHERE子句中使用的连接语句,在数据库语言中,被称为隐性连接。INNER JO... 阅读全文
posted @ 2008-11-10 18:53 水若冰 阅读(246) 评论(0) 推荐(0) 编辑