Разработка приложений баз данных в Delphi. Шейкер Т.Д. - 54 стр.

UptoLike

Составители: 

54
Способ 1. Использование методов класса TBookmark. Для выполнения
действий с переменной типа
TBookmark можно использовать методы:
function GetBookmark:TBookmark установить закладку в таблице;
procedure GotoBookmark(Bookmark:TBookmark)
перейти на закладку;
procedure FreeBookmark(Bookmark:TBookmark)
освободить память.
Предлагается реализовать такой алгоритм работы с закладкой:
объявить переменную типа
TBookmark
установить закладку функцией GetBookmark;
выполнить нужные перемещения по таблице;
перейти на закладку с помощью процедуры
GotoBookmark;
освободить память процедурой
FreeBookmark.
Вызов
GetBookmark возвращает переменную типа TBookmark. Класс
TBookmark содержит достаточно информации, чтобы найти местоположение
текущего указателя. Поэтому для немедленного перехода на закладку можно
просто передать значение переменной типа
TBookmark функции GotoBook-
mark
. Так как вызов GetBookmark выделяет память для TBookmark, то необ-
ходимо вызывать
FreeBookmark до окончания программы и перед каждой по-
пыткой повторного использования
TBookmark (в GetBookMark) для освобож-
дения памяти.
Способ 2. Использование свойства
Bookmark таблицы TTable. Свойство
Bookmark класса TDataSet имеет тип TBookmarkstr. Алгоритм решения задачи:
запомнить значение свойства
Bookmark в локальной переменной;
выполнить нужные перемещения по таблице;
восстановить значение свойства
Bookmark из локальной переменной.
Для запоминания положения курсора помимо закладок можно использо-
вать свойство
RecNo, содержащее номер текущей записи.
Способ 3. Использование свойства
RecNo таблицы TTable. Свойство
RecNo класса TBDEDataSet имеет тип Longint. Алгоритм решения задачи:
запомнить значение свойства
RecNo в локальной переменной;
     Способ 1. Использование методов класса TBookmark. Для выполнения
действий с переменной типа TBookmark можно использовать методы:
function GetBookmark:TBookmark – установить закладку в таблице;
procedure GotoBookmark(Bookmark:TBookmark) – перейти на закладку;
procedure FreeBookmark(Bookmark:TBookmark) – освободить память.
     Предлагается реализовать такой алгоритм работы с закладкой:
     − объявить переменную типа TBookmark
     −   установить закладку функцией GetBookmark;
     − выполнить нужные перемещения по таблице;
     − перейти на закладку с помощью процедуры GotoBookmark;
     − освободить память процедурой FreeBookmark.
     Вызов GetBookmark возвращает переменную типа TBookmark. Класс
TBookmark содержит достаточно информации, чтобы найти местоположение
текущего указателя. Поэтому для немедленного перехода на закладку можно
просто передать значение переменной типа TBookmark функции GotoBook-
mark. Так как вызов GetBookmark выделяет память для TBookmark, то необ-
ходимо вызывать FreeBookmark до окончания программы и перед каждой по-
пыткой повторного использования TBookmark (в GetBookMark) для освобож-
дения памяти.
     Способ 2. Использование свойства Bookmark таблицы TTable. Свойство
Bookmark класса TDataSet имеет тип TBookmarkstr. Алгоритм решения задачи:
     – запомнить значение свойства Bookmark в локальной переменной;
     – выполнить нужные перемещения по таблице;
     – восстановить значение свойства Bookmark из локальной переменной.
     Для запоминания положения курсора помимо закладок можно использо-
вать свойство RecNo, содержащее номер текущей записи.
     Способ 3. Использование свойства RecNo таблицы TTable. Свойство
RecNo класса TBDEDataSet имеет тип Longint. Алгоритм решения задачи:
     – запомнить значение свойства RecNo в локальной переменной;

                                    54