关于Memo的使用问题？

Question

我想用把两个memo里的内容一起送到Adoquery的sql中去执行，可这么做好象是不行
他只能接受一个里的内容，（adoquery1.sql.assign(memo1.lines))
请问谁有办法来实现两个一起传送！

Answer 1

with adoquery1 do
begin
active:=false;
sql.add('select * from table where bh>'+''''+edit1.text+''''+' and field>'+''''+edit2.text+'''');
active:=True; 
end;你改动一下就行了。或者通过:号动态传递参数也可以
with adoquery1 do
begin
active:=false;
sql.clear;
sql.add('select * from table where bh>:bh and field>:field');
adoquery1.Parameters.ParamByName('bh').Value:=edit1.text; 
adoquery1.Parameters.ParamByName('field').Value:=edit2.text; 
end;

Answer 2

adoquery1.sql.text := memo1.text + sLineBreak + memo2.text;

Answer 3

var
   s:TStrings;
begin
        s:=TStringList.Create;
        s.AddStrings(memo1.Lines);
        s.AddStrings(memo2.Lines );
        adoquery1.sql.assign(s)
        s.Free;
end;

Answer 4

begin
        adoquery1.sql.clear;
        adoquery1.sql.AddStrings(memo1.Lines);
        adoquery1.sql.AddStrings(memo2.Lines );
end;