Question

[delphi]求代码解释~~

with ADOQuery DO
begin
ADOQuery.Close ;
ADOQuery.SQL.Clear;
SqlStr:='select * from sp where spmccode like ''%'+UpperCase(TEdit(Sender).Text)+'%''';
ADOQuery.SQL.Add(SqlStr); //????????????????? 这句话什么意思呀 1
ADOQuery.Open ;
SH_spbh.Text:=ADOQuery.fieldByName('spbh').AsString;
//???fieldByName和AsString什么意思，这句话又是什么意思？2
SH_sptm.Text:=ADOQuery.fieldByName('sptm').AsString;
if SH_spmc.Text='' then
begin
SH_spbh.Clear;
SH_sptm.Clear;
end;
end;

Answer 1

1
把要执行的sql脚本 存储到Adoquery中，下面的open 是执行这句sql语句
2
fieldbyname（‘列名1’）是找到列名1所在的列，asstring是将这个值输出成string类型
SH_spbh.Text:=ADOQuery.fieldByName('spbh').AsString;这句话的意思就是
把列spbh的值保存成string并赋值给SH_spbh.Text