Last;
Метод Last осуществляет переход к последней записи в кэше.
Sub UserProc;
Var
MB: IMetabase;
DSInst: IDatasetInstance;
Cache: ICachedDataset;
i: Integer;
Begin
MB := MetabaseClass.Active;
DSInst := MB.ItemById("Table_1").Open(Null) As IDatasetInstance;
Cache := DSInst.OpenCached;
Cache.Last;
i := Cache.RecNo;
Cache.Close;
DSInst.Close;
End Sub UserProc;
После выполнения примера произойдет переход на последнюю запись в кэше и в переменной «i» будет содержаться индекс записи, на которую установился курсор в кэше.
См.также: