请来看看

Question

再如：
 有这样一串代码：
 data1.FIND('USENAME'='aaa');
 IF FOUND() THEN AA:=DATA1.FIELD('ADD');
  意思是在数据库中找到一个USENAME字段值为aaa,如果找到则把相对应的ADD
的值付给AA
 请问怎么用SQL来完成在DELPHI中

Answer 1

var
  v_userName:string;
begin
  with query1 do
  begin
    if active then close;   
    sql.clear;
    sql.add('select * from 表名 where  
             USERNAME= '''+v_userName+'''');
    open;
    if not isempty then AA:=query1.fieldbyname('ADD').asstring;
    close;
  end;
end;

Answer 2

楼上的说得对
如果找到多个记录
用query1.first;
while not query1.eof do
begin  AA:=query1.fieldbyname('ADD').asstring;
    
end;