with query1 do begin close; sql.clear; sql.add('select * from table1 where 条件 =:aa'); Parameters.ParamByName('aa').value := 'hh'; open; edit1.text := Fieldbyname('f1').AsString; ..................//依次取值就可以了,注意数据类型转换 end;
with query1 do begin close; sql.clear; sql.add('select * from table1 where 条件 =:aa'); perpared open; end; if query1.FieldValues('dd')<>null edit1.text := query1.FieldValues('dd');
begin
close;
sql.clear;
sql.add('select * from table1 where 条件 =:aa');
Parameters.ParamByName('aa').value := 'hh';
open;
edit1.text := Fieldbyname('f1').AsString;
..................//依次取值就可以了,注意数据类型转换
end;
begin
close;
sql.clear;
sql.add('select * from table1 where 条件 =:aa');
perpared
open;
end;
if query1.FieldValues('dd')<>null
edit1.text := query1.FieldValues('dd');