关于在BCB中继承和派生的问题

[jiangjialin]

我在数据库编程中使用了TDBGrid 控件，由于我想使用该控件的基类一些功能，我该如何才能继承或派生他的基类；请给出源代码

[dabaicai]

需要吗?
你通过帮助,查看TDBGrid类,可以追踪到它的每一层父类,想继承哪个就继承那个吧(在代码里面按ctrl和鼠标点击也可以追踪)

[CACACACACA]

??
晕,要什么功能?要从哪层继承?
不说清楚,怎么回复.

[jiangjialin]

TCustomDBGrid的基础类 TCustomGrid 类拥有属性：
col 属性确定当前表格的列；第一列的索引为0；
ROW 属性确定当前表格的行；第一列的索引为0；
ScrllBars 使用该属性可给出水平或者垂直滚动条；
ssNose 无滚动条
ssHoriZontaL 表格有水平滚动条
ssVertical 表格有垂直滚动条
ssBoth 有水平和垂直滚动条
我想写一个派生或者继承类继承TCustomGrid ；然后将DBGrid强制转换为我自己写的类；并且使用上面的3个属性；该怎么做啊

[dabaicai]

Delphi的,改成BCB几个
type
TScrllBarVal =(ssNose,ssHoriZontaL,ssVertical,ssBoth)
type
TMyGrid = class(TCustomGrid)
private
FCol : integer;
FRow : integer;
FScrllbarval : TScrllbarval;
//可选
procedure SetCol(Val : integer);
procedure SetRow(Val : integer);
procedure SetScrllbarvar(Val : TScrllbarVal);
publicshed
Col : integer read FCol write FCol;
...

不过你要把DBGrid强制转换为自己写的类就不好办了,因为db控件绑定了数据集啊

[jiangjialin]

我想知道BCB中应该怎么做，Delphi没学过；

[vfork]

楼下的给答案吧，
我至今delphi都还没能装上。