delphi中sql的用法?

Question

procedure TForm1.BitBtn1Click(Sender: TObject);
var
s:string;
begin
     s:=memo1.Text;
     with adoquery1 do
        begin
            Close;
            sql.Clear;
            sql.Add(s);
            open;
        end;
end;

Answer 1

对于Edit组件和MaskEdit组件，在对象编辑器中列举了Text属性，对于Memo组件和RichEdit组件却没有列举，而改成了L i n e s属性。
实际上Memo组件和RichEdit组件同样具有Text属性，可以通过代码改变Text属性的值。好像没有办法调用sql的语法检查功能，所以检测sql正确性比较难，除非自己写一个语法分析的函数。

Answer 2

procedure TForm1.BitBtn1Click(Sender: TObject);
var
s:string;
begin
     s:=memo1.Text;
     with adoquery1 do
        begin
            Close;
            sql.Clear;
            sql.Add(s);
            open;
        end;
end;代码没有问题，一定是你的adoquery1没有设置连接属性

Answer 3

ADOQUERY的ACTIVE在最初一定要设成FALSE。
只有在赋给它正确的SQL时才能设为TRUE。
楼上的几位所写的语句都没有问题！
你还是再查一下控件！