Подмена Lookup формы

[Fordewind]

Цитата:

Сообщение от unalexia

Employee No. OnLookUp()
IF FORM.RUNMODAL(ReductiveFormNumber,Employee) = ACTION::LookupOK
THEN "Employee No." := Employee."No.";

Присвоение Employee No. не происходит остается пустым. Где собака порылась????????????

А если так написать:

IF ReductiveFormNumber.RUNMODAL = ACTION::LookupOK THEN BEGIN
  ReductiveFormNumber.GETRECORD(Employee);
  "Employee No." := Employee."No.";
END;