大家帮我做一个方案。 ( 积分: 5 )

写程序碰到这样一个问题，怎么都找不到理想的方案。
程序里面要显示一个窗体form2，这个form2要根据配置文件生成多个Tedit类的控件。
现在的关键是：这些Tedit控件在失去焦点的时候要执行一个函数，这个函数的函数名在Tedit的一个属性中第一了，比如定义edit1的函数名是func1，这样edit1失去焦点的时候应当执行func1；函数 func1就是送到后台做交易，交易做完后，有的还要根据返回的情况设置form2上相应tedit的值，就比如func1 执行完后要根据后台返回的值设置form2上的edit5的text值。
程序的关键是在于“开放性”，这样我只要设置每个edit要执行func，然后再编写相应的func。
所以最好就是能把这些func放在一个单独的包或者库里面，这样我只要在配置文件里面配置每个edit的要执行的函数，再在这个包里面编写相应的函数或者过程。这样每次增建函数的时候就不需要动主程序了，达到开放性的效果。

可是如果把这些func放在包或者库里面，好像又没有办法访问form2窗口。
所以大家帮我看看有没有什么好的解决方案。

写程序碰到这样一个问题，怎么都找不到理想的方案。
程序里面要显示一个窗体form2，这个form2要根据配置文件生成多个Tedit类的控件。
现在的关键是：这些Tedit控件在失去焦点的时候要执行一个函数，这个函数的函数名在Tedit的一个属性中第一了，比如定义edit1的函数名是func1，这样edit1失去焦点的时候应当执行func1；函数 func1就是送到后台做交易，交易做完后，有的还要根据返回的情况设置form2上相应tedit的值，就比如func1 执行完后要根据后台返回的值设置form2上的edit5的text值。
程序的关键是在于“开放性”，这样我只要设置每个edit要执行func，然后再编写相应的func。
所以最好就是能把这些func放在一个单独的包或者库里面，这样我只要在配置文件里面配置每个edit的要执行的函数，再在这个包里面编写相应的函数或者过程。这样每次增建函数的时候就不需要动主程序了，达到开放性的效果。

可是如果把这些func放在包或者库里面，好像又没有办法访问form2窗口。
所以大家帮我看看有没有什么好的解决方案。

5分一个方案？好便宜。

各位大侠们，俺在delphi bbs论坛上刚刚注册没几天，所以“钱”不多啊。
俺也知道5分太便宜了，可是没办法啊，俺现在就除了这5分外就剩下1分可以用了。

所以啊，还希望各位前辈不吝赐教啊。
谢了先。

^_^，查了N多国外资料，今天终于搞定了最好的最可扩展性的方案，好爽啊，
既然大家嫌5分少，5分还是自己赚了。呵呵