烦人的代码转换问题???

Question

但是用计算字段都要先从field-editer中先设固定的字段对象。如果你的数据源配置不是在设计时而是在运行时，那不是就不行了吗？我现在的系统的数据源是通过VB传进来的(比较特殊),所以无法在设计时在field-editer中增加字段.有其它好方法吗?

Answer 1

使用TField的SetText和GetText事件。
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 2

可以用在SQL里用Case语句。aa=Case when '1' then 'a' ,
        when '2' then 'b' ,
        else  'c'