怎么根据递增来判断逻辑变量 再根据逻辑变量来确定是否运行自定义的一个事件过程

如何根据递增来判断逻辑变量 再根据逻辑变量来确定是否运行自定义的一个事件过程
for i :=1 to qry.recordcount do
                        //如果i=1 就检查逻辑变量comflag1 如果i=2 就检查comflag2 comflag1为真 就运行自定义的comgo1事件 如果comflag2为真就运行comgo2函数 也就是根据i的值来判断comflag(i)变量 再根据逻辑变量来确定是否运行自定义的一个事件过程
------解决方案--------------------
是，是反射。

comflagN 是某个对象的 N 个属性，
当获得 i 值时，比如i=6
则拼成自符串comflag6，
用反射的技术取得对象的comflag6属性值，
若值为真，则再度使用反射技术，询问对象是否有comgo6事件，
若有，则调用该事件。

所以，关键是使用反射技术。
请你查询Delphi从哪个版本使用反射技术，
旧的Delphi版本没有支持反射，但有提供另一个类似的东西，也可以试试。
------解决方案--------------------
D7 只有RTTI可用，
能否实现上述我形容的反射，我不知道。
你自己百度一下，
或请其他人补充。
------解决方案--------------------

引用:

Quote: 引用:

用case或if语句可以实现，
RTTI实现不了用字符串来访问变量的功能

可是返回结果不确定 那不是得多写很多

是得写很多语句
返回结果不确定，但是你知道你有哪些变量存在，只判断存在的变量就可以了啊