Вызов функций одной формы из другой

[zinius]

Насколько я понимаю в OnLookUp надо делать EXIT(TRUE) дабы показать что выбор произошёл иначе присваивания не произойдёт. Это нужно в случае если значение пихать через переменную OnLookup 'Text'
Пример:

PHP код:

CLEAR(EmplListForm);
EmplListForm.LOOKUPMODE := TRUE;
IF EmplListForm.RUNMODAL = ACTION::LookupOK THEN BEGIN
  EmplListForm.GETRECORD(Employee);
  IF STRLEN(Text) + STRLEN(Employee."No.") > MAXSTRLEN(Text) THEN
    ERROR(Text57000);
  Text += Employee."No.";
  EXIT(TRUE);
END;