Delphi数据访问部件的应用及编程

2016年07月27日 48 阅读

Delphi数据访问部件的应用及编程2008-03-26在这一章里我们主要介绍Delphi的数据访问部件的层次结构、多部件之间的关系、部件的属性、方法、事件以及各部件的应用。这些部件包括：● TSession部件● 数据集部件（TTable和TQuery）● TDatasource部件● 字段对象TField● 字段编辑器的使用● TReport部件和TBatchMove部件我们对这些部件的属性、方法和事件进行一般性的描述，读者在实际使用Delphi开发应...

Delphi数据浏览部件的应用及编程

2016年07月27日 53 阅读

Delphi数据浏览部件的应用及编程2008-03-26数据浏览部件主要用于显示和编辑数据库表中的数据，因而它们又常常被称为数据控制部件或数据明了部件，它们在部件选择板中的DataControls页上，图16.1显示的是DataControls页上的全部数据浏览部件，其中的TDBGrid部件用于全屏幕显示和编辑数据库表中的记录，TDBNavigator用于在数据记录之间导航、插入记录、删除记录、投寄被修改的记录。 图16.1 DataControls部件页...

Delphi中的SQL编程

2016年07月27日 53 阅读

Delphi中的SQL编程2008-03-26SQL语言作为关系数据库管理系统中的一种通用的结构查询语言，已经被众多的数据库管理系统所采用，如ORACLE、Sybase、Informix等数据库管理系统，它们都支持SQL 语言。Delphi与使用SQL语言的数据库管理系统兼容，在使用Delphi开发数据库应用程序时，我们可以使用SQL语言编程，支持SQL编程是Delphi的一个重要特征，这也是体现Delphi作为一个强大的数据库应用开发工具的一个重要标志。...

delphi编程向数据库发送密码

2016年07月27日 49 阅读

delphi编程向数据库发送密码2008-03-26编辑数据库软件时，为了数据安全，往往需要在数据库里加入密码，打开时就需要密码才能浏览，但是当我们在程序里调用时也需要不时的输入密码，这就照成了不遍，所以利用以下办法，输入密码后才打开数据库：Session.AddPassword（abc）;{发送的密码}Table1.Open;...

delphi编程限制数据库记录数

2016年07月27日 47 阅读

delphi编程限制数据库记录数2008-03-26非常偏门的技巧，很少人会需要限制数据库的记录，但还是列出来给大家参考。假如数据库中只允许用户输入３个记录，那么我们可以在Table1的BeforeInsert事件里加入判断语句：procedure TForm1.Table1BeforeInsert（DataSet: TDataSet）;beginIF Table1.RecNo >=3 thenbeginmessagedlg（记录只能输入三个,mti...

delphi编程数据库日期显示

2016年07月27日 58 阅读

delphi编程数据库日期显示2008-03-26在使用DBGRID控件时显示DATATIME时其年份是为2位的，但我们在步入2000年后需要显示的日期是4位， 如：1998、2001。在数据库中该字段只有在2000年后才会显示4位，怎么办呢？下面我们就让该字段在DBGRID控件 中也显示4位的日期格式：双击Table1控件，就会出现form1.table窗体，击右键，选 Add Fields...，选择日期字段后按ok，窗体中就出现了数据库的日期字段名，...

delphi编程计算数据库某字段的值

2016年07月27日 51 阅读

delphi编程计算数据库某字段的值2008-03-26在数据库中，有时需要做汇总工作，那么就要对某个字段的所有记录进行求和，我们使用如下代码：先定义一个全局变量i，再加入Table1的OnCalcFields事件，那么就得出了数据库中“金额”字段的合计值var i:double;{$R *.DFM} procedure TForm1.Table1CalcFields（dataset: Tdataset）;varGoodsgold:...

怎样读出MEMO控件的当前值

2016年07月27日 46 阅读

怎样读出MEMO控件的当前值2008-04-20使用MEMO控件的em_LineFromChar属性,程序如下:procedure TMyForm.BitBtn1Click（Sender: TObject）;variLine : Integer ;beginiLine := Memo1.Perform（em_LineFromChar, $FFFF, 0）;{ Note: 第一行为 0 }messageDlg（Line Number: + IntToStr（...

在Delphi中巧改窗体文件实现控件数组

2016年07月27日 59 阅读

在Delphi中巧改窗体文件实现控件数组2008-04-20delphi 开发的应用中，每一个窗体都有一个对应的窗体文件（.dfm），用来记录该窗体的属性以及窗体上所有控件的属性，以便在窗体关闭后能准确地重新生成窗体。几乎所有的DELPHI参考书都没有提到过该文件的具体情况，偶尔提到，也都泛泛而谈，因为窗体文件是二进制文件，只有在DELPHI提供的编辑环境中才能看到它的本来面目，对其进行操作可能会出现不可预知的错误；而且在大多数情况下，确实没有修改的必要。...

Delphi中利用MSCOMM控件进行GPS数据采集

2016年07月27日 47 阅读

Delphi中利用MSCOMM控件进行GPS数据采集2008-04-20杨辉 薛向锋1、准备GPS（Global Positioning System），即全球定位系统，利用24颗GPS卫星的测距和测时功能进行全球定位，在许多系统中，如机场导航系统，出租车辆管理和调度系统、江河流域的灾害信息管理和预测系统中，GPS得到了广泛的应用。本文利用MSCOMM控件实现了GPS数据的采集，可为信息管理和指挥调度等提供定位数据。本文采用GPS的异步串行传送方式，将GA...

Delphi数据库控件使用入门

2016年07月27日 47 阅读

Delphi数据库控件使用入门2008-04-20linj在数据库应用程序中，数据控件是经常要用到的。数据控件都是可视的。也就是说，如果修改了这些构件的属性，能在窗体上马上反映出来。如果这些构件的Enabled属性设为True并且数据集的Active属性也设为True，在设计期就可以看到数据。下面就来介绍一下这些控件的简单应用：指定一个数据源数据控件必须通过TDataSource构件连接数据集。TDataSource构件扮演的角色实际上就是数据控件与数据集...

Delphi实现窗体控件自由摆布

2016年07月27日 53 阅读

Delphi实现窗体控件自由摆布2008-04-20 天极 廖海辉在做Mis项目过程中，有时需要让用户自己来实现窗体控件的布局，比如酒店管理中就需要对餐厅餐桌位置进行布局。要实现这种功能，必须做好三件事：1、设置进入控件边缘的光标形状；2、改变控件的大小及位置；3、保存窗体控件的位置及状态，窗体下次启动时重新设置它们的这些信息。具体步骤如下：1、修改控件光标。只需要在进入控件的时候，将screen的cursor属性设置成对应形状即可，控件都有一个OnMou...

Delphi控件的“拿来主义”

2016年07月27日 46 阅读

Delphi控件的“拿来主义”2008-04-20xm4014"一个优秀的Delphi程序员，不仅要会写控件，还要会使用控件。"我还是一个半瓢水的程序员，因此目前为止我所能努力达到的境界是:一个半瓢水的程序员，管他会不会写控件，只要能拿来改就可以了。使用过Delphi的朋友都知道，我们在设计Delphi应用程序的某一功能时总是希望能够有现成的第三方免费控件可以拿来使用。但实际情况往往是，网上的控件确实种类繁多，优秀作品也数不胜数，但真正...

利用Indy的TIdFtp控件实现FTP协议

2016年07月27日 49 阅读

利用Indy的TIdFtp控件实现FTP协议2008-04-20cokeyang现在很多应用都需要上传与下载大型文件，通过HTTP方式上传大文件有一定的局限性。幸好FTP作为一个非常老而且非常成熟的协议可以高效稳定地完成大文件的上传下载，并且可以完美地实现续传。就拿我写的电影服务器管理端程序来说，各种方案比较后，发现使用FTP可以完美地实现要求。但是要通过WinSocket库实现FTP比较麻烦，幸好有Indy--一个包装了大多数网络协议的组件包。通过Ind...

一种树型控件在Delphi中的使用方法

2016年07月27日 49 阅读

一种树型控件在Delphi中的使用方法2008-04-20袁军 黄树成 朱霞摘 要 树型控件是一种有效的表示方法,在数据库应用程序的开发中经常用它可视化表示对象之间的层次关系。本文介绍了Developer Express inc. 的ExpressQuantumGrid Suite中树型控件 TdxDBTreeList 的使用方法和技巧，特别是由多关系表构成树型结构的情况。关键词 树型控件，TdxDBTreeList，多关系表简介树型控件是一种有效的表示方...

Delphi中为DBGrid控件添上色彩

2016年07月27日 47 阅读

Delphi中为DBGrid控件添上色彩2008-04-20 天极 小刀轻舞在微软软件帝国的呐喊声中，VB.net和VC#.net在短时间内拥有了一大批FANS。能在开发工具领域和微软一决高下的Borland公司也不甘示弱把Delphi“打扮”的漂漂亮亮的，让我们这些坚定的D迷依旧信心满满，坚守这块阵地。一些对Pascal语法情有独钟或对VCL爱慕非凡的新生力量也加入了我们阵营之中，新加入的同志大多以开发数据库类的软件做为初始的一步...

Delphi制作GSM Modem的短信发送控件

2016年07月27日 48 阅读

Delphi制作GSM Modem的短信发送控件2008-04-20 天极 姜涛目前大多数的企业及学校内部都建有Intranet。并建有内部网站实现资源共享。为了使用户及时的得知网上的最新信息，很多网站都采用了手机短信提醒的方式，但使用中国移动或中国联通的SP方式，会大大的增加企业的成本。故本文讨论的是利用GSM Modem和短信发送控件来实现的短信提醒。首先，介绍一下笔者所使用环境。服务器：Windows 2000 Advanced Server、IIS...

在程序运行时自动注册ActiveX控件

2016年07月27日 44 阅读

在程序运行时自动注册ActiveX控件2008-04-20编写Delphi应用程序时，经常会遇到一些ActiveX控件[注：扩展名为OCX的控件或DLL的类型库]，它们为应用程序的开发提供了简单的操作途径。然而，这些程序在发布的同时，面临ActiveX控件注册问题。解决途径：一、用安装程序制作打包文件，往往会给增加程序本身的大小，系统重装时，则必须重新安装它；二、用程序本身进行代码编写函数的形式处理它。使用方法分为两种：一、直接把可视化的ActiveX控件...

delphi编程实现检测声卡存在

2016年07月27日 44 阅读

delphi编程实现检测声卡存在2008-04-20如果你是做一些多媒体播放器之类的程序时，为了完善系统的容错性，就必须用到一些检测系统的功能，其中检测声卡是否存在就是一个问题，下列程序帮你忙，首先需要在uses部分加入mmsystem ，接着在窗体创建时检测声卡：procedure TForm1.FormCreate（Sender: TObject）;var i:Integer;begini := auxGetNumDevs（）;if i<= th...

delphi编程实现检测存在打印机

2016年07月27日 45 阅读

delphi编程实现检测存在打印机2008-04-20Printers是专门用来控制打印机的，可是在没有安装打印机时，却会提示I/O错误，所以必须有一个检测是否存在打印机的方法，我试过很多方法，可是I/O错误总是比我的判断早出现，所以采用以下的烂招来检测打印机。首先在uses增加Printers，再准备一个列表框ComboBox1，其属性Visible设为FALSE，然后在打印之前执行下列语句，那么就可以检测到是否存在打印机了：procedure TFor...