Application.MessageBox 问题？？？

Question

if  Application.MessageBox('已进行过入库、销售或退货操作，是否确认删除？'+#13
      +'库存数量'+ADOQuery_del_sum.FieldValues['总数'],'药品进销存!',MB_ICONQUESTION+MB_YESNO) = IDYes  then
beginend;加入了ADOQuery_del_sum.FieldValues['总数'] ，提示：Incompatible types: 'String' and 'PAnsiChar'，怎么回事?

Answer 1

if Application.MessageBox('已进行过入库、销售或退货操作，是否确认删除？'+#13
  +'库存数量'+ADOQuery_del_sum.fieldbyname('总数').asstring,'药品进销存!',MB_ICONQUESTION+MB_YESNO) = IDYes then
beginend;

Answer 2

  if Application.MessageBox(pchar('已进行过入库、销售或退货操作，是否确认删除？'+#13
  +'库存数量'+ADOQuery_del_sum.FieldValues['总数']),'药品进销存!',MB_ICONQUESTION+MB_YESNO) = IDYes then
beginend;