DbServer.Found 属性 |
命名空间: XSharp.VO.SDK
1CLASS Sales INHERIT DBServer 2... 3 4METHOD Init() CLASS Sales 5... 6SELF:SetIndex("sales") 7... 8FUNCTION FoundDemo() 9LOCAL oDBSales AS Sales 10oDBSales := Sales{} 11oDBSales:Seek("1000") 12? DBSales:Found // 结果:FALSE 13oDBSales:Seek("100") 14? DBSales:Found // 结果:TRUE 15DBSales:Skip() 16? DBSales:Found // 结果:FALSE