tpmc:string;
if tpmc in ['基本信息';'荣誉证书','认证信息','其他'] then exit else tpcm='补充说明'

解决方案 »

  1.   

    tpmc:string;  
    if  tpmc  in  ['基本信息','荣誉证书','认证信息','其他']  then  exit  else  tpmc='补充说明'   上面是笔误
      

  2.   

    一个关于in语法的小问题  
    http://community.csdn.net/Expert/topic/3634/3634006.xml?temp=.6339838
      

  3.   

    tpmc:string;  
    if  (tpmc  in  ['基本信息','荣誉证书','认证信息','其他'])  then 
     exit
    else
      tpmc='补充说明';