TDataSet.FieldValues和TField.Value当遇到Field值为空时要出错。请换为
TField.AsString或者TField.AsVariant。
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
             毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
       

解决方案 »

  1.   

    我还没有处理你刚才说的那个问题呢,我只是建立了一个连接和一个table,运行的时候就出错了,别的什么都没有做
      

  2.   

    你设断点运行一下嘛
    —————————————————————————————————
    MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
                 毁誉由人,望天上云卷云舒,聚散任风。';
    if Not Assigned(I) then
      I := TI.Create(Nil);
    I.Maxim := MaximStr;
    I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
    I.Desire := '加不加分随你';
    —————————————————————————————————
           
      

  3.   

    我设置了啊,就是在ADOTABLE1.open的时候出错,别的地方没有问题
      

  4.   

    在ADOTABLE1里面有没有设置字段的定义?如果设置了,把定义清除一下看看。