edit.text:=s1
   ...
Tquery.sql.add('insert into table('clumn') values('+s1+')');
 ....
系统报错缺少表达式,问题出在哪里?麻烦指点一下,谢谢

解决方案 »

  1.   

    query.sql.add('insert into table('clumn') values('''+s1+''')');
    注意字符串连接在delphi的用法。
    query(变量)而非TQuery(类)
      

  2.   

    column前后‘可去掉。
    query.sql.add('insert into table(clumn) values('''+s1+''')');
      

  3.   

    strsql:='insert into table(clumn) values(:clumn)';
    with query do
    begin
    close;
    sql.clear;
    sql.add(strsql);
    Parameters.ParamByName(clumn).Value := edit.text;
    ExecSQL
    end;
      

  4.   

    wl := 'insert into table(clumn) values(' + '''' + clumn + '''' + ')';
    query.close;
    query.sql.clear;
    query.sql.add(wl);
    query.execSQL;