Q
Qingzhong
Unregistered / Unconfirmed
GUEST, unregistred user!
昨天晚上，我发了两个贴子，761649，761277
问题：我希望有一个我自己的表单基本类TMyBaseForm，让我所有的表单均继承于TMyBaseForm
目的：在TMyBaseForm中设置字体、Icon，管理按键模仿DOS的回車（而不是可恶的Tab），
去掉烦人的Beep，那么我所有的表单就不用再管这些事了。
思路：将TMyBaseForm存为模板，放到Repository中，并选上New Form复选框
难点：使用File=>New=>Form或者按下快捷按钮New Form时，新建的表单
是： TMyBaseForm1=class(TForm);
//拷贝TMyBaseForm
而不是我所希望的：TMyBaseForm1=class(TMyBaseForm);
//继承
这个问题我晚上9点多提出，直到凌晨我不断地将问题提前，居然没人会？
我感到悲哀，也有些吃惊，难道老虾们每新建一个表单都重复我上述那些琐碎的操作。
就没想过办法？因为这是每一个新手都会遇到的问题。
我于是再次自己寻求解决方案，2个小时后我完美地解决了，可我提问居然花了我4个
小时。我不过是个Delphi菜鸟，有6年Foxpro,VFP的编程经验。
希望下面的问题不要难倒你：
回车时的Beep很讨厌，于是你花了好大力气把每一个表单的回车Beep去掉了，可有一天
你碰到了一个客户，他说他喜欢Beep，但有时又不喜欢，那么你将如何满足他的要求？
问题：我希望有一个我自己的表单基本类TMyBaseForm，让我所有的表单均继承于TMyBaseForm
目的：在TMyBaseForm中设置字体、Icon，管理按键模仿DOS的回車（而不是可恶的Tab），
去掉烦人的Beep，那么我所有的表单就不用再管这些事了。
思路：将TMyBaseForm存为模板，放到Repository中，并选上New Form复选框
难点：使用File=>New=>Form或者按下快捷按钮New Form时，新建的表单
是： TMyBaseForm1=class(TForm);
//拷贝TMyBaseForm
而不是我所希望的：TMyBaseForm1=class(TMyBaseForm);
//继承
这个问题我晚上9点多提出，直到凌晨我不断地将问题提前，居然没人会？
我感到悲哀，也有些吃惊，难道老虾们每新建一个表单都重复我上述那些琐碎的操作。
就没想过办法？因为这是每一个新手都会遇到的问题。
我于是再次自己寻求解决方案，2个小时后我完美地解决了，可我提问居然花了我4个
小时。我不过是个Delphi菜鸟，有6年Foxpro,VFP的编程经验。
希望下面的问题不要难倒你：
回车时的Beep很讨厌，于是你花了好大力气把每一个表单的回车Beep去掉了，可有一天
你碰到了一个客户，他说他喜欢Beep，但有时又不喜欢，那么你将如何满足他的要求？
