Метод SetWindowCalendarContext

Назначение

Устанавливает контекст aContext для окна #Win. Для главного окна интерфейса используется константа -1 (минус 1). Не заданным контекстам присваивается значение 0.

У окна интерфейса (объект TAbstractInterface) вводится внутреннее поле контекста календаря. Данная функция устанавливает этот контекст.

Описание

function SetWindowCalendarContext (#Win : integer,
								 aContext : comp
								) : comp;

Параметры

#Win - идентификатор окна.

aContext - устанавливаемый контекст.

Возвращаемое значение

Функция возвращает старый контекст. Если 1-ый параметр недействителен, то возвращает 0.

Замечания

Обработка исключений - при передаче в функции невалидных значений вырабатывается исключение ExWindowNotExist (ExVip), которое по умолчанию выводит сообщение и продолжает работу программы с возвратом кода ошибки.

Пример

const caTest1 = 999; // контекст календаря 1
const caTest2 = 9; // контекст календаря 2
interface test 'Тест';
  show at ( 1, 1, 80, 34);
  create view as select aDate from Dates;
  browse bwFields;
	fields
	aDate 'Дата' : [20], Protect;
  end;
  handleEvent
	cmInit : {
	SetFieldCalendarContext (#aDate, caTest2);
	SetWindowCalendarContext (-1, caTest1); 
}
  end;
end.