Question

delphi7 代码报错 incompatible types:' tstrings' and string

query.Close;
query.SQL :='select yddh,dby,dbclr,bjzl,ysgsyh from jcdbm_khydzb where ysgsyh='
+''''+edtexpno.Text+'''';
query.Open;

oracle数据库 ，Tquery控件， 想要把ysgsyh等于文本框里的值得数据查出来，不明白怎么报这个错 求高手帮忙解决下

Answer 1

Query.SQL是TStrings,要添加 ，必须使用TStrings.Add()，即Query.SQL.Add(Str)

Answer 2

query.SQL.Add('select yddh,dby,dbclr,bjzl,ysgsyh from jcdbm_khydzb where ysgsyh='
+''''+edtexpno.Text+'''');

Answer 3

使用
query.SQL.text='select yddh,dby,dbclr,bjzl,ysgsyh from jcdbm_khydzb where ysgsyh='
+''''+edtexpno.Text+'''';
属性也可以。
条条大路通罗马，看喜好。