4922
社区成员
自定义组件开发
我想编写一个组件。 组件的任务是一种 dbf 格式的表 和 Delphi 7.0 创建连接。还把表里的数据导出到Delphi 来， 还能把数据写入表里去。 如果能编写成功的话做导入导出数据任务。 在Delphi 里有 BDE , ADO 组件板页。 继承哪个组件的属性，方法， 事件 才能跟接近我想做的组件任务。 需要大家的意见和帮助。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
kasiet 2013-05-04
为什么在只有 ObjectInspector 中可以看到 ConnectionString 属性， 而的源代码当中找不到 ConnectionString 属性该再这里发布才对啊？？？？？？
{ TADOTable }
TADOTable = class(TCustomADODataSet)
private
function GetTableDirect: Boolean;
procedure SetTableDirect(const Value: Boolean);
function GetReadOnly: Boolean;
procedure SetReadOnly(const Value: Boolean);
public
constructor Create(AOwner: TComponent); override;
procedure GetIndexNames(List: TStrings);
property IndexDefs;
published
property CommandTimeout;
property EnableBCD;
property IndexFieldNames;
property IndexName;
property MasterFields;
property MasterSource: TDataSource read GetDataSource write SetDataSource;
property ReadOnly: Boolean read GetReadOnly write SetReadOnly stored False;
property TableDirect: Boolean read GetTableDirect write SetTableDirect default False;
property TableName: WideString read GetCommandText write SetCommandText;
end;
lyhoo163 2013-05-04
最好自己写代码，也是学习提高之途径。
kasiet 2013-05-04
kasiet 2013-05-04
{ TADOTable }
TADOTable = class(TCustomADODataSet)
private
function GetTableDirect: Boolean;
procedure SetTableDirect(const Value: Boolean);
function GetReadOnly: Boolean;
procedure SetReadOnly(const Value: Boolean);
public
constructor Create(AOwner: TComponent); override;
procedure GetIndexNames(List: TStrings);
property IndexDefs;
published
property CommandTimeout;
property EnableBCD;
property IndexFieldNames;
property IndexName;
property MasterFields;
property MasterSource: TDataSource read GetDataSource write SetDataSource;
property ReadOnly: Boolean read GetReadOnly write SetReadOnly stored False;
property TableDirect: Boolean read GetTableDirect write SetTableDirect default False;
property TableName: WideString read GetCommandText write SetCommandText;
end;
这里我为什么找不到 ADOTable 的 ConnectionString 属性？ 在 ObjectInspector 中有而这里没有？
TADOTable = class(TCustomADODataSet)
private
function GetTableDirect: Boolean;
procedure SetTableDirect(const Value: Boolean);
function GetReadOnly: Boolean;
procedure SetReadOnly(const Value: Boolean);
public
constructor Create(AOwner: TComponent); override;
procedure GetIndexNames(List: TStrings);
property IndexDefs;
published
property CommandTimeout;
property EnableBCD;
property IndexFieldNames;
property IndexName;
property MasterFields;
property MasterSource: TDataSource read GetDataSource write SetDataSource;
property ReadOnly: Boolean read GetReadOnly write SetReadOnly stored False;
property TableDirect: Boolean read GetTableDirect write SetTableDirect default False;
property TableName: WideString read GetCommandText write SetCommandText;
end;
这里我为什么找不到 ADOTable 的 ConnectionString 属性？ 在 ObjectInspector 中有而这里没有？
多壮志 2013-05-03
这个太简单了，用得着继承别人的吗？
kasiet 2013-05-03
您说的对， 不过我也没办法
sololie 2013-05-03
嗯，你也挺精灵的嘛，直接继承unidac，啥代码不用写就实现要求了，老湿也没话说
kasiet 2013-05-03
不过这个是我的作业，所以一定完成。 您说的是Universal Data Access Components 吗？
sololie 2013-05-03
dbf太古老了吧
不用自己写，第三方组件都有这功能，如unidac、ehlib
《Android自定义组件开发详解》 6.2 自定义组件的基本结构 164 6.3 重写onMeasure方法 166 6.4 组件属性 175 6.4.1 属性的基本定义 175 6.4.2 读取来自style和theme中的属性 181 6.5 案例1：圆形ImageView组件 186 6.6 案例2：验证码组件CodeView ...
Uni-app 自定义组件开发 思考了半天都没有找到合适的办法，后面前端的同事突然和我说可以用组件开发，把要跳转的页面做成组件，通过条件判断来显示隐藏不同的组件来实现这样的效果。嗯，说干就干 *创建组件* 我这是把之前做好的页面转换成...
钉钉小程序自定义组件开发 以下是我自己开发钉钉小程序组件的经验 新建组件页面 你的组件想放在哪个目录就在那个目录上鼠标右击，选择新建小程序组件 然后打开你刚建的小程序组建的js文件就会发先里面有一套代码，类似这样的 Component({ ...
home-assistant-custom-components:用于自定义组件开发的公共存储库-源码 Home-Assistant 自定义组件 我为家庭助理设计的一些自定义组件的第一次迭代。 ( ) 组件概览 pfSense 规则开关组件 编写此组件以打开（启用）或关闭（禁用）pfSense 防火墙规则。 我的一个问题是为什么世界上会有人想...
Streamsets自定义组件开发 需求痛点 在实际项目的使用过程中，有些情况下现有的组件不能完全满足具体的业务需求，...按照官方文档提供的指南实现起来还是很容易的，下面就以JdbcQueryExecutor为例，详细介绍一下自定义开发的过程： #...
Winform中的自定义组件开发（附带一些Windows GDI编程） 下面进入正题：在实际开发中，我们会经常遇到系统给定的控件无法满足我们的需求，或者是重复机械去拖同样的控件，这样就很难控制它的位置或者样式，所以我们需要为自己定制一个合适项目的组件！我个人在使用的过程中...
微信小程序-自定义组件开发微信小程序的框架 W2X框架致力于以"自定义组件"的方式快速开发微信小程序，这些自定义组件以组件库的形式进行组织。 一个使用W2X组件库的页面代码举例如下： > W2X提供了wx.html文件格式把cssdomjs聚合在一个文件中 .abc { ...
jQuery自定义组件(导入组件) //自定义导入组件 $.fn.customImport = function(methodOroptions,value){ if(typeof methodOroptions == "string"){//存在方法时，调用方法 return $.fn.customImport.methods[methodOroptions](this, value); } ...
