取值
怎样获得qry1.SQL.Text:='select brxm from zysf_zydj where tmh='+edt1.Text的值
[解决办法]
Open以后，FieldByName('brxm').AsString;
[解决办法]

qry1.close;
qry1.SQL.Text:='select brxm from zysf_zydj where tmh='+quotedstr(edt1.Text);
qry1.open;
edit2.text:=qry1.fieldbyname('brxm').asstring;