Процедура
SetFormat (Integer) |
Top Previous Next |
Назначение
|
Процедура
переключает область ввода и соответствующие вкладки, если таковые
имеются. Переключаемыми являются видимые элементы, совпадающие по
положению на экране. |
Доступны
константы, соответствующие именам видимых элементов.
|
Описание
|
procedure
SetFormat (FormatNumber : Integer); |
Параметры
|
FormatNumber
: Integer - номер формата. |
Замечание
|
Определены
константы с идентификаторами, совпадающими с именами видимых
элементов и значениями, равными их номерам. |
Пример
|
В этом
примере при возникновении событий cmDoAnkete,
cmDoTable будет включен соответственно анкетный или
табличный режим ввода данных. |
Screen
AnketeViewer; |
Fields
|
FldOne;
|
FldTwo;
|
FldThree;
|
<<
|
Поле_1
.@@@@@@@@@@@@ |
Поле_2
.@@@@@@@@@@@@ |
Поле_3
.@@@@@@@@@@@@ |
>>
|
end; //screen
|
Browse
TableViewer; |
Fields
|
FldOne;
|
FldTwo;
|
FldThree;
|
end; //Browse
|
HandleEvent
|
cmDoTable :
SetFormat(TableViewer ); |
cmDoAnkete:
SetFormat(AnketeViewer); |
end;
|