ADOQUERY2的SQL属性是SELECT SUM(DXCB)AS H_DXCB from CB WHERE CPDM=:CPDM 
-----------------------------------
但是,我怎么显示不处我的LABEL10啊?if trim(edit3.Text)<>'' then
   begin
   if adoquery2.Active then
   begin
   adoquery2.Active:=false;
   adoquery2.Parameters[0].Value:=trim(edit3.Text);
   adoquery2.Active:=true;
  label10.caption:=adoquery2.FieldValues['h_dxcb'].ASSTRING <-----能执行,不能显示
   end;
   end;

解决方案 »

  1.   

    这样:
    label10.caption:=adoquery2.FieldValues['h_dxcb'];
      

  2.   

    label10.caption:=adoquery2.FieldBYName('h_dxcb').ASSTRING;
    如果取数Query的值尽量用FieldBYName('')
      

  3.   

    如果你查询出来确实有结果,那应该没有问题啊?
    要不试一试
      if trim(edit3.Text)<>'' then
       begin
         with adoquery2 do
          try
            close;
            sql.clear;
            sql.add('SELECT SUM(DXCB)AS H_DXCB from CB WHERE CPDM=:CPDM');
            parameters.paramByNaem('cpdm').value:=trim(edit3.Text);
            prepared;
            open;
            If adoquery2.recordcount>0 then
              Begin
                Label10.caption:=feilds[0].ASSTRING ;
              End
          except
            messgebox('data operation Erroe!');
            exit;
          end;
      

  4.   

    if trim(edit3.Text)<>'' then
       begin
         with adoquery2 do
           begin
             close;
             sql.clear;
             sql.add('SELECT SUM(DXCB)AS H_DXCB from CB WHERE CPDM=:CPDM'); 
             parameters.paramvalues['CPDM ']:=trim(edit3.Text);
             open;
           end;
         label10.caption:=adoquery2.FieldValues['h_dxcb'];
       end;
      

  5.   

    还是不行。我还有一个ADOQUERY1 他的SQL属性是:select * from cb where cpdm=:cpdm2会不会有影响呢?大家帮忙啊,不明白到底是怎么回事
      

  6.   

    换edit试一试,或showmessage()看看有没有结果!!应该没问题的,换成静态文本试试:)
      

  7.   

    if trim(edit3.Text)<>'' then
       begin
         with adoquery2 do
           begin
             close;
             sql.clear;
             sql.add('SELECT SUM(DXCB)AS H_DXCB from CB WHERE CPDM=:CPDM'); 
             parameters.paramvalues['CPDM ']:=trim(edit3.Text);
             open;
           end;
         if recordcount<>0 then
           label10.caption:=adoquery2.FieldValues['h_dxcb'];
       end;首先调用close;sql.clear不会影响的
      

  8.   


    我按照以下的代码使用,出现‘至少一个参数值没有被指定’
    if trim(edit3.Text)<>'' then
       begin
         with adoquery2 do
          try
            close;
            sql.clear;
            sql.add('SELECT SUM(gc_DXCB) AS H_DXCB from CPGC WHERE CPDM=:ZCCB');
            parameters.paramByName('ZCCB').value:=trim(edit3.Text);
            prepared;
            open;
            If adoquery2.recordcount>0 then
              Begin
                Label10.caption:=fields[0].AsString;
              End
          except
           application.MessageBox('data operation Erroe!','提示信息');
            exit;
          end;    end;求求大家了,到底是怎么回事啊?
      

  9.   

    那樓主有沒有看到
    adoquery2.FieldValues['h_dxcb'].ASSTRING 
    的值為多少?