Lazarus使用TSQLQuery更新的一点技巧try with sqAtt do begin Close; DataBase := dmMain.odbcconn; UsePrimaryKeyAsKey:=false; deleteSql.Text:='';//'delete from UserInfo where userid = :userid'; updateSql.Text:='';//'update UserInfo set name=:name where userid=:userid'; insertSql.Text:=''; refr