如何写出象TTable, TAdoTable ,Tquery,_程序员之家(VCL(四) 如何写出象TTable, TAdoTable ,Tquery,TAdoQuery 等控件一样的自动下拉显示Field属性)

开发技术指南» 文章正文

引言：如何写出象TTable, TAdoTable ,Tquery,

摘要： delphi的属性是一个很有特色的功能，这一特性在c#里得到了很好的继承。对于一个类来说，属性是对类中的数据进行有效修改和访问的特殊接口。在vcl中，被published的属性还有一个特性，就是可以在界面设计过程中对属性进行设置.属性的类型数字、字符、布尔、枚举、tstrings、集合，类对象或者接口类型等示例:tenumtest=(etnone,ettestint,etteststring);......

·扫雷外挂的设计与实现（三） »显示摘要«

摘要：文/jorge如上述，本程序分为了接口层和算法层。上述全局变量和常量，基本都属于接口层的内容。下面，来看接口层的具体实现。其工作的第一步，是要捕获扫雷窗口并取得其信息。这由函数getminewindow来完成：=================================================================//试图取得可用的扫雷窗口，返回值表示是否成功。若成功，则......

VCL(四) 如何写出象TTable, TAdoTable ,Tquery,TAdoQuery 等控件一样的自动下拉显示Field属性

如何写出象ttable, tadotable ,tquery,tadoquery 等控件一样的自动下拉显示field属性

delphi vcl在delphi 中有很多源码,但是有些关键的属性编辑器却找不到,下面我将举几个例子来说明一下【程序编程相关:Delphi中的布尔类型】

【推荐阅读:怎么样知道硬盘上有哪几个分区或者指定的分】

我们可以研究一下tdbedit的两个关键属性一个datasource,datafield. 【扩展信息:Delphi连接关系数据库，不支持自动获】

示例如下

ttestcontrol=class(twincontrol)

private

fdatalink: tfielddatalink; //定义一个存储字段的属性

function getdatafield: string;

function getdatasource: tdatasource;

procedure setdatafield(const value: string);

procedure setdatasource(const value: tdatasource);

published

//下面说明时要用到

//property resultfield :string read getdatafield write setdatafield;

property datafield: string read getdatafield write setdatafield;

property datasource: tdatasource read getdatasource write setdatasource;

end;

//获取字段名

function ttestcontrol.getdatafield: string;

begin

result := fdatalink.fieldname; //

end;

//获取数据源

... 下一页

·扫雷外挂的设计与实现（二） »显示摘要«

摘要：文/jorge有了前述的数据，编写接口层似乎已经不成问题了。现在来构思一下程序运行的过程。说句实话，那种对于某种变化实时作出响应的程序，一般都用什么方法编成，本人并不很了解，推测无非是两种思想，一种是用一个线程不断地对这个变化进行检查，发现改变则动作；另一种是注册一个类似于钩子的东西，用回调函数来处理。无疑第二种方式要更节省系统资源，只是难在本人对windows的钩子掌握的还一塌糊涂。若换了个高......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：