数据窗口检查重复行

dw_1.SetSort ("user_id A")
dw_1.Sort()
dw_1.SetFilter ("user_id = user_id[-1]")
dw_1.Filter()

if dw_1.RowCount() > 0 then
Messagebox("注意", "用户编码重复.")
end if

dw_1.SetFilter ("")
dw_1.Filter()