hy5声明的是不是Integer类型的?

解决方案 »

  1.   

    你的hy5是什么类型,好像是字符串型,不能这样:hy5:=StrToInt(hy5)+1;  应该定义一个整形变量。var iTemp:intger;
    iTemp:=StrToInt(hy5)+1;
    下面的IntToStr(hy5);错误,因为hy5是字符串量,改为IntToStr(iTemp);
      

  2.   

    来晚一步,同意gzmhero(hihihi)。
      

  3.   

    那就是的。你的hy5是string的,但是,你转换成int后又负值给他,当然出错了。
      

  4.   

    hy5:=StrToInt(hy5)+1;  

    hy5:=IntToStr(StrToInt(hy5)+1);  
      

  5.   

    hy5:=copy(hy,3,6);
    hy5:=inttostr(StrToInt(hy5)+1);  第99行
    cid:='KH'+hy5;  第100行
      

  6.   

    hy5:=copy(hy,3,6);
    hy5:=inttostr(StrToInt(hy5)+1);  第99行
    cid:='KH'+hy5;  第100行
      

  7.   

    hy:=Datamodule1.clientcompanyuser.fieldbyname('coding').asstring;
    cid:='KH'+IntToStr( StrToInt( Copy( hy, 3, 6 ) ) + 1 );
      

  8.   

    hy5:=StrToInt(hy5)+1;  第99行
    cid:='KH'+inttostr(hy5);  第100行改成 cid:='KH'+inttostr(StrToInt(hy5)+1);