procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
  begin
with query1 do
        begin
        sql.clear;
        sql.add('select * from basic order by id');
        open;
        if query1.canmodify then
        begin
        insert;
        FieldByName('name').Value:='121';
        fieldbyname('password').Value:='user';
        post;
       end;
        end;
end;end.组件为:database,query,querytableproducer.    插入不进去数值!如果去掉if ... then ...出现错误的意思好象是数据没有处于编辑状态。请教高手!谢谢!