Application.messagebox对话框样式

if Application.MessageBox('删除不能恢复,确认删除吗?', '删除提示', MB_OKCANCEL + MB_ICONQUESTION)=mrOk thenbegin  ShowMessage('你选择的OK!');end;1.   警告信息框     Applicati...

2018-03-09 08:56:28

阅读数 95

评论数 0

Delphi之TComponent类

TComponent类TComponent类直接由TPersistent派生。TComponent的独特特征是它的属性能够在设计期间通过ObjectInspector来控制,能够拥有其他组件。非可视组件也是从TComponent派生的,因此它们也继承了在设计期间可以被控制的能力。TComponen...

2018-03-08 08:24:13

阅读数 216

评论数 0

Delphi数据库程序设计----使用BDE组件

Delphi访问数据库的方式有:ADO、BDE、dbExpress、InterBase Express。一、TDataSet组件虽然Delphi有多种方式访问数据库,但它们必须依赖TDataSet。它用来显示从数据库单一或多个数据表取得的所有记录。1、TDataSet常用属性Active:指定或取...

2018-03-08 08:22:43

阅读数 114

评论数 0

DBGrid和DBGridEH

二、应用实例 Enlib3.0组件包安装成功后 A、定制标题行 1、制作复杂标题行 标题行可设为2行以上高度,并可以为多列创建一个共同的父标题行。为实现这个效果,需在各个列标题属性中以“|”分隔父标题和子标题,如办公用品包括代码和名称两部分,具体属性设置如下: usemulti...

2018-03-08 08:19:16

阅读数 378

评论数 0

DBGrideh 实现自动排序

一、点击标题自动排序1.在optioneh中设置:AutosortMarking:=True2.设置DbGridEh的属性:(不一定总要设置,与使用的数据连接有关)sortlocal:=True;3.uses 单元Ado------ehlibADoTclientData------ehlibCDS...

2018-03-08 08:18:05

阅读数 100

评论数 0

Delphi - 数组 详解

技术交流,DH讲解.首先我们要知道什么是数组?数组是一堆相同特性数据的一个集合,也就是每个元素的类型必须是一样的,当然在其他一些弱语法的语言里面,数组的元素可以千奇百怪. 例子:123456Var  A: Array[ 0..2 ] Of Integer ;Begin  A[ 0 ] := 1 ;...

2018-03-05 10:31:09

阅读数 6441

评论数 0

Delphi - 数组和结构体

技术交流,DH讲解.记得很早之前我就说过,数组和结构体在内存中其实一样的,他们都是连续分布的.例如:1234TMyStruct = record  A,B,C:Integer;end;T3IntArray = array[0..2]of Integer;这两个都占12字节,而且TMyStruct....

2018-03-05 10:28:34

阅读数 674

评论数 0

Delphi 数据连接规范

建议大家采用另外一种编码风格,不要在程序中到处都有这种LZ程序生成的代码:beginwith qryMain dobegintryClose;SQL.Clear;SQL.Add('Delete From MONTASK where TASKID=:TASKID');ParamByName('TAS...

2018-03-05 10:27:39

阅读数 74

评论数 0

Delphi 窗体的创建和释放

Delphi中的窗体分为模式窗体和无模式窗体。二者的区别在于,用户可以在无模式窗体和其他窗体之间切换。这样,用户就可以同时工作于一个应用程序的几个部分。Delphi中窗体的初始化有两种情况,动态创建,和自动创建。通过show显示一个无模式窗体,ShowModal显示一个模式窗体。窗体有创建对应的也...

2018-03-02 09:07:42

阅读数 224

评论数 0

Delphi考虑sql注入 QuotedStr

之前只在BS架构的项目中考虑了Sql注入问题,却很少考虑到用了多年的Delphi项目也应该考虑Sql注入的问题,今天做了个实验,成功完成注入,把表里数据全部删除,以后再做Delphi项目还真的考虑这个问题。总体讲,大体知道有两种方式可以避免Delphi中的Sql注入:1、用QuotedStr替代'...

2018-03-02 09:06:47

阅读数 457

评论数 0

Delphi数据库的备份及还原

实例应用1: //备份procedure TF_DataBaseBackUp.Btn_bfClick(Sender: TObject); var i:integer; begin if SaveDialog1.Execute then begin ADOConnection1.C...

2018-03-01 08:48:49

阅读数 776

评论数 0

Delphi 实现检测线程类TThread是否结束

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TMY...

2018-03-01 08:47:47

阅读数 445

评论数 0

Delphi Ole操作Word,判断是否有打开的文档,并且给关闭

Function ChkWordIsOpen(const AFullFileName: string): boolean;var  WordApp: variant;  CurrDoc: variant;begin  Result := False;  WordApp := GetActiveOl...

2018-02-27 09:54:17

阅读数 544

评论数 0

Delphi 在Object Pascal中,实现了两个级别的封装:类级和单元级

一 、类级别的封装类级别的封装是最常见的封装形式。每个Object Pascal的类,有四种访问级别:private、protected、public、published。其中,public的成员可以被外界的所有客户代码直接访问;published和public差不多,区别仅在于published...

2018-02-27 09:52:17

阅读数 106

评论数 0

用Delphi创建服务程序

Windows 2000/XP和2003等支持一种叫做"服务程序"的东西.程序作为服务启动有以下几个好处:(1)不用登陆进系统即可运行.(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它的.笔者在2003年为一公司开发机顶盒项目的时候,曾经写过课件上...

2018-02-27 09:42:30

阅读数 91

评论数 0

EhLib使用全攻略

EhLib使用全攻略  使用 TDBSumList 组件   还记得以前有朋友问过这样一个问题:在 DBGrid 下如何像 Excel 一样能够做统计计算,实话说,使用 DBGrid 来做的话着实不易,不过现在有了这个咚咚,相信会简单些。以下是摘录的一些使用上的说明:【TDBSumList说明】 ...

2018-02-27 09:40:10

阅读数 590

评论数 0

DELPHI写的几个基类型

//用惯JAVA或C#的人可能对DELPHI非常生气,连基本的类型都没有,我平时工作中,经常会曾试着把一些函数集合在一起,也经常做一些属于自己的基础类型的函数,此处把它们弄出来,有不当之处,请大家点评.unit BaseClass;interfaceuses  SysUtils, Classes,...

2018-02-27 09:36:27

阅读数 67

评论数 0

Delphi中易混淆的概念 Owner, Parent, Self, Sender, Clientheight, Height

一、Owner和Parent的区别:  Parent属性是指构件的包容器,构件只能在此范围内显示和移动。举例子如下:  (1)在Form1的窗体上,放一个Panel1,并将Panel1拉大,  (2)在Panel1上放一Button1;  (3)在Form1上放一Button2。  现在如果移动P...

2018-02-27 09:33:35

阅读数 68

评论数 0

Delphi实现文件下载的几种方法

笔者最近开发的系统中需要写一个下载文件的功能。以前用BCB调用API写的很烦琐,忽然想起有一个API就可以搞定了,于是一大早就来搜索。这个API就是UrlDownloadToFile。不仅如此,Delphi的一些控件也可以轻松实现下载,如NMHTTP,指定NMHTTP1.InputFileMode...

2018-02-26 09:43:57

阅读数 558

评论数 0

GridEh排序

添加pas文件 EhLibADO.pas EhLibCDS.pas EhLibFireDAC.pas 支持FireDAC 设置GridEh的属性     DBGridEh1->SortLocal = true;     DBGridEh1->Opt...

2017-11-22 08:46:11

阅读数 254

评论数 0

提示
确定要删除当前文章?
取消 删除