procedure Tmainform.Button7Click(Sender: TObject); begin kbmMWClientQuery3.Query.Text:='insert into t1 (fid,fname,fint,fint64) values (:id,:name,:int,:int64)'; //kbmMWClientQuery3.Params.ParamByName('id').DataType:=ftString; //kbmMWClientQuery3.Param…