用TQuery写SQL语句:       sxsql:='Select * from zbtable where sxparent='+inttostr(idsx);
       With Query1 Do
       Begin
         Close;
         SQl.Clear;
         SQl.add(sxsql);
         ExecSQL;
         Active:=true;
       End;
  

解决方案 »

  1.   

    TQuery的SQL属性;TSTrings类型;
    TADODataSet的commandtext属性;WideString类型;Example:
    Query1:Tquery
    query.close;
    query1.sql.clear;
    query.sql.text:='select * from tablename';
    query.open;
      

  2.   

    可不可以不用dataset,直接在程序中写
    比如:
    function IsUserExist(name,pass:string):short;
    var
    i:short;
    name,pass:string;begin
    select count(yhbm)
    into :i
    from user
    where name = :name and pass = :pass;
    result ;= i;
    end;
      

  3.   

    TClientDataSet.commandtext:='select * from table_name';
      

  4.   

    query1:Tquery;
    query1.sql.add('select * from Table_Name');
      

  5.   

    不能像Pb那样在Delphi的代码中直接写SQL语句,
    但可以象楼上那几位说的那样使用SQL命令.
      

  6.   

    呵呵,不能直接在代码中写,不过你到可以给borland公司提个建议。
      

  7.   

    我建议你使用ADO控件,它都可以使用SQL语言。