我使用带有基于TFrame的层次结构的选项卡界面.我创建一个选项卡并将TFrame链接到它.

我照顾所有的crud plumbing,并发控制使用标准的MysqL存储过程实现. CustomerSEL,CustomerGET,CustomerUPD,CustomerDEL等…

我的主窗体主要包含导航栏面板和包含TPageControl的面板

我的层次结构中的类的一个例子

TFRAME
TMFrame – 我的派生,接口实现捕获OnShow,OnHide和其他一些细节

–TWebBrowserFrame
–TDataAwareFrame
–TObjectEditFrame
–TCustomerEditFrame
–TOrderEditFrame
等等…
–TObjectListFrame
–TCustomerListFrame

等等…

和一些对话框..

TDialog
TMDialog
–TDataAwareDialog
–TObjectEditDialog
– TContactEditDialog
等等..
–TObjectSelectDialog
–TContactSelectDialog

等等…

当我添加一个新对象进行管理时,它可能是客户的新属性,假设我们要跟踪客户拥有的车辆.

创建表CustomerVehicles
我运行我的特殊的sproc发生器,创建我的SEL,GET,UPD,DEL
测试那些…

从上面提到的基类派生出一些控件.向TCustomerEdit添加选项卡.

Delphi一直将Dataset作为抽象层,通过DataSource将其公开给您的GUI.将数据集添加到客户数据模块,然后“注册”.我自己的自定义函数在我的派生数据模型类TMDataModule中

安全控制在框架中也是同样的照顾.我注册了要求安全标志可见或启用的组件.

我通常可以添加一个新对象,构建sprocs,在一小时内添加维护屏幕.

当然,这通常只是开始,通常当你添加东西,你使用它不仅仅是跟踪.如果这是一个车库应用程序,我们要添加客户带入车库的车辆,可以跟踪历史.但即使如此,这是快的.

我尝试使用“较新的开发工具”对年轻人进行分包,当我说我可以用Delphi快十倍时,他们似乎并不相信我我可以在两个小时内做无bug,看起来他们两天,他们还有bug

DO – 仔细规划您的VFI！正如有人提到的,如果你想改变你的一个父类的一个组件的名称,准备好麻烦.您将需要打开并编辑层次结构中的每个孩子,即使您清理DCU,您仍然可以拥有一些DFM地狱.我可以在2006年向你保证,这仍然是一个问题.

不要创建一个怪物数据模块

你花时间在前期设计,重构后,你创造了一大堆的家属可以是一个有趣的挑战,但一个噩梦,当你必须快速获得新的工作！