加一个类型为TIBDatebase的属性出现问题！(100分)

我做了一个控件包含TIBDatebase类型的属性:
private
Fdb: TIBDatabase;
published
property db: TIBDatabase read Fdb write Fdb;

但是控件注册后工作时出现问题：
在设计时，我在Form1上先拖一个TIBDatabase控件IBDatabase1，
然后再拖一个我做的控件，设置db属性值为IBDatabase1，
然后我删除TIBDatabase控件IBDatabase1，程序出错！
delphi都关不掉了！
请帮助谢谢！

你得继承notification方法，好好看看帮助中component writer help中
关于数据明了控件的写法。
或者看看tdbedit等dbcontrol的原码，注意看
它是如何处理datasource 属性的
以及它如何继承notification方法的

还是接收答案吧，否则我可是答者给分的。