if adoquery1.RecordCount>0 then begin edit3.Text := adoquery1.fieldbyname('DD').AsString; //显示你要的数据 END ELSE BEGIN showmessage('没找到!'); end