SqlStr := 'Insert ws Values(''' + Edit1.Text + ''', ''' + Edit2.text + ''')';

解决方案 »

  1.   


    sorry
    editlimian
    是edit里面 
      

  2.   

    和Table一样呀!就是要把Query1.RequestLive设置成True;Query1.Insert;
    //...................
      

  3.   

    var 
      TheQuery: TQuery;
      SqlStr: String;
    begin
      TheQuery := TQuery.Create(nil);
      try
        SqlStr := 'Insert ws Values(''' + Edit1.Text + ''', ''' + Edit2.Text + ''')';
        with TheQuery do
        begin
          Close;
          SQL.Clear;
          SQL.Add(SqlStr);
          Execute;
        end;
      finally
        TheQuery.Free;
      end;
    end;
      

  4.   

    1、在QUERY1里面的SQL属性中输入:SELECT XM,DW FROM WS WHERE ....
    2、在BUTTON的事件的适当位置加入以下代码
    with query1 do 
      begin
        append;
        FieldByName('XM').asstring := edit1.text;
        FieldByName('DW').asstring := edit2.text;
        post;
      end;
      

  5.   

    query1.close;
    query1.sql.text:='insert into ws Values(''' + Edit1.Text + ''', ''' + Edit2.text + ''')';
    query1.sql.Execsql; 
      

  6.   

    为什么说我的query是readonly的呢?
      

  7.   

    query是readonly的可能是
    1、你query的requestlive属性可能没有设成true。
    2、如果你是直接从query里录入,而query里的字段属于两个或多个表(数据库里的表),而且没有用updatesql去更新,就可能出现说query是readonly的提示。
    直接用sql语句写入数据库就会不存在这个问题
      

  8.   

    query是readonly的可能是
    你的sql语句是多表查询,或有order by之类
      

  9.   

    to zswang(伴水)(伤心中)  
    和Table一样呀!就是要把Query1.RequestLive设置成True;Query1.Insert;query的RequestLive属性似乎不太好用,:(
     
      

  10.   

    为什么说我的query是readonly的呢? 我也碰见这个问题,在解决中,@_@