Gdc frmG unit.Tgdc frmG.OnCreate
Материал из GedeminWiki
(Различия между версиями)
SYSDBA (обсуждение | вклад) (Новая страница: «{{EventDef_Template|unit=gdc_frmG_unit|class=Tgdc_frmG|visibility=published|src=property OnCreate: TNotifyEvent read FOnCreate write FOnCreate stored IsForm;}} ==…») |
SYSDBA (обсуждение | вклад) |
||
| Строка 5: | Строка 5: | ||
</onlyinclude> | </onlyinclude> | ||
| − | В этом событии мы связываем бизнес-объекты, расположенные на форме, с её свойствами gdcObject, gdcDetailObject. Форма сама откроет бизнес-объекты, нет необходимости открывать их принудительно. Свойство AllowStreamedActive должно быть установлено в False. | + | В этом событии мы связываем бизнес-объекты, расположенные на форме, с её свойствами '''gdcObject''', '''gdcDetailObject'''. Форма сама откроет бизнес-объекты, нет необходимости открывать их принудительно. Свойство '''AllowStreamedActive''' должно быть установлено в '''False'''. |
Пример обработчика OnCreate: | Пример обработчика OnCreate: | ||
Текущая версия на 19:13, 1 июля 2016
| Модуль: gdc_frmG_unit.pas | Тип: event | Видимость: published | Принадлежит: Tgdc_frmG |
Delphi:
property OnCreate: TNotifyEvent read FOnCreate write FOnCreate stored IsForm;
[править] Описание
Вызывается в момент создания экранной формы.
В этом событии мы связываем бизнес-объекты, расположенные на форме, с её свойствами gdcObject, gdcDetailObject. Форма сама откроет бизнес-объекты, нет необходимости открывать их принудительно. Свойство AllowStreamedActive должно быть установлено в False.
Пример обработчика OnCreate:
option explicit sub usrf_wg_shiftOnCreate(ByVal Sender) Sender.GetComponent("usrg_gdcDepartment").ParamByName("RootID").AsInteger = IBLogin.CompanyKey Set Sender.gdcObject = Sender.GetComponent("usrg_gdcDepartment") Set Sender.gdcDetailObject = Sender.GetComponent("usrg_gdcShift") '*** Данный код необходим для вызова встроенного обработчика *** '*** В случае его удаления возможно нарушение работы системы *** call Inherited(Sender, "OnCreate", Array(Sender)) '*** конец кода поддержки встроенного обработчика *** end sub
