存档

‘delphi’ 分类的存档

delphi的treeview中增加checkbox复选框

2010年9月28日 亲亲宝宝 3 条评论 7,025 次阅读

    不知道delphi中为啥treeview中没有提供checkbox复选框的功能,也有一些第三方的控件可以做,这里不使用第三方控件,直接使用delphi中的TTreeview 做一些修改,看看效果. unit wenhq; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,CommCtrl,   Dialogs, ComCtrls, ...阅读全文

分类: delphi 标签:

Access查询日期时间的SQL语句

2010年9月24日 亲亲宝宝 2 条评论 6,671 次阅读

Access数据库虽然功能是差了点,但是有时对一些少量的数据保存很是很方便的,在delphi中也是如此,在查询时免不了要按照日期或 时间作为查询条件,access有些特别。 select * from table where startime >#2010-9-23 2::12::00# 你把datetimepicker1的如果是Time分解成上面的形式就可以了。 注意两点: 1、日期时间两...阅读全文

分类: delphi 标签:

delphi6中checkbox的值改变时不会触发单击事件

2010年9月19日 亲亲宝宝 2 条评论 6,102 次阅读

我们可能会在checkbox中添加onclick事件,有时在程序修改checkbox的值时不想触发onclick事件怎么办呢?自从没有了OnCheckedChanged事件,好像有些麻烦,这里介绍两种方式: 第一种:要麻烦一些,先定义一个事件变量,把当前的事件保存起来,然后设置复选框的单击事件为空,赋完值后,在恢复单击事件,支持delphi6的版本 ...阅读全文

分类: delphi 标签:

delphi如何获得一个文件夹下所有文件

2008年5月16日 没有评论 2,801 次阅读

procedure TForm1.Button8Click(Sender: TObject); var sr: TSearchRec; aTempPath: String; begin aTempPath :=’D:\delphi\printer\*.*’; //注意后面的*。*一定要加 if FindFirst(aTempPath, faAnyFile, sr) = 0 then begin repeat if (sr.Attr and faArchive) = sr.Attr then ...阅读全文

分类: delphi 标签:

Delphi中获取和修改文件的时间

2008年5月16日 没有评论 4,410 次阅读

这里,我向大家介绍在Delphi中如何实现文件时间的获取和修改方法。Delphi中 提供了很完备的Windows API函数的调用接口,可以方便的进行高级Windows编程 。利用Delphi中的FindFirst函数可以得到一个文件的属性记录,该记录中的Fin dData域中就记载了详细的文件时间信息。然而遗憾的是,FindData中的时间信息 是不能直接得...阅读全文

分类: delphi 标签:

捕获打印机状态改变

2008年5月13日 没有评论 3,727 次阅读

unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, WinSpool, StdCtrls; var pi2:PRINTER_INFO_2; pno:PRINTER_NOTIFY_OPTIONS; pinfo:PPrinterNotifyInfo; //pinty:pPrinterNotifyOptionsType; hResult:THandle; pdwChange:DWORD; ...阅读全文

分类: delphi 标签:

如何获取打印机和打印作业的状态

2008年5月13日 没有评论 9,235 次阅读

如引用由 Win32API, ” 打印机 ” 由打印机驱动程序, 打印队列, 和输入/输出路径到物理打印机。 操作系统将物理打印机视为只打印作业由生成并传递系统 ” 打印机, ” 作为打印机本文其余部分中引用的目标。 最明显一部分打印机是打印队列。 它是由打印管理器或样式 Windows 95 用户界面中打印机文...阅读全文

分类: delphi 标签:

delphi中为应用程序添加友好错误提示

2008年5月8日 没有评论 2,479 次阅读

定义一个异常处理类 ,把应用程序为处理的异常全部让它来处理。 TMyexception =class public procedure AppException(Sender: TObject; E: Exception); end; procedure TMyexception.AppException(Sender: TObject; E: Exception); begin if pos(‘ora-‘,LowerCase(e.Message)) =1 then remi...阅读全文

分类: delphi 标签:

Delphi7开发apache的共享模块

2008年4月24日 没有评论 12,228 次阅读

手把手教会你怎么开发apache的模块,使用delphi原来这样简单就搞定。 Introduction Choosing Apache 1 or Apache 2 Installing Apache Controlling Apache Writing A Shared Module Using The Shared Module Debugging Shared Modules About Brian Long If you find this article useful then plea...阅读全文

分类: delphi 标签:

Delphi7中使用webservices(SOAP) + Apache2.2X

2008年4月24日 没有评论 3,808 次阅读

Help to development a Web Services that run unter Apache 2.2.3 using D7 All posts: borland.public.delphi.webservices.soap Source: borland.public.delphi.webservices.soap >Apply the Dr Bob « unofficial fix » (see >http://www.drbob42.com/delphi7/Apache2040.htm) > >and modify : > >MODULE_MAGIC_COOK...阅读全文

分类: delphi 标签: