if messagebox(form1.Handle,'要删除' + adotable1.fieldbyname('name').asstring + '记录吗?','删除',mb_yesno+mb_iconinformation)=mryes then

解决方案 »

  1.   

    回复上面的大哥..我试了可是不对亚...adotable1没有filed.....这个属性.
      

  2.   

    不会吧???ADOTable会没有FieldByName吗?????????
    或者用Fields[0].AsString也可以。
      

  3.   

    还是不对提示
    Incompatible types: '<name>' and '<name>'  类型不兼容请问应该怎么作呀.
      

  4.   

    adotable有FieldbyName属性。
    另外,你的那个字段是string类型的吗。
      

  5.   

    字段是姓名...肯定是STRING类型的..那里还不对那?
      

  6.   

    var
      s:string;
    begin
      s:='要删除'+ADOTable1.FieldByName('name').AsString+'记录吗?’;
      if messageBox(handle,pChar(s),'',mb_yesno+mb_iconinformation)=mryes then
        …………
      

  7.   

    messagebox()中的text和caption是pchar类型的不是string类型的。你遇到的错误是类型
    不匹配的错误。