| Функция
GetGrOrEq (Integer, Integer) : Boolean |
Top Previous Next |
| Назначение
|
| Функция
ищет запись в таблице со значениями ключевых полей, большими или
равными текущим значениям в буфере по любому ключу. Ключи
нумеруются с нуля. |
| Константы
с именами ключей не доступны. |
| Описание
|
| function
GetGrOrEq (iTable : Integer; iIndex : Integer) : Boolean;
|
| Параметры
|
| iTable
: Integer - в какой корневой таблице необходимо искать.
|
| iIndex
: Byte - номер индекса. |
| Возвращаемое
значение |
| Логическая
"истина", если нашли. |
| Замечание
|
| Доступны
константы tn<имя таблицы>, значения которых равны внутреннему
номеру корневой таблицы. |
| Пример
|
| В
примере реализован поиск сотрудника по имени. Для запроса имени
используется диалог, который должен находится в ресурсе с именем
"GetNameForSearch". В диалоге должно быть описано одно поле
типа String[50]. |
| Interface
Example; |
| create view
|
| Var Tmp :
String [50]; |
| as select *
from employee; |
| HandleEvent
|
| cmSearch : {
|
| RunDialog(GetNameForSearch,Tmp);
|
| PushPos(#Employee);
|
| Name := Tmp;
|
| if
(GetGrOrEq(#Employee,1)) { |
| DropPos(#Employee);
|
| RescanPanel(#Employee);
|
| } else
PopPos(#Employee); |
| }
|
| end;
|
| end; //
Interface |