![]() |
#2 |
Участник
|
Код на триггере OnLookup соотв. элемента на реквестформе (для, скажем, товарных категорий):
CLEAR(ItemCats); ItemCats.LOOKUPMODE(TRUE); IF ItemCats.RUNMODAL = ACTION::LookupOK THEN BEGIN ItemCats.GETRECORD(ItemCat); Text := ItemCat.Code; EXIT(TRUE); END ELSE EXIT(FALSE); ItemCats - форма списка тов. категорий для Lookup по умолчанию (св-во LookupFormID соотв. табл., здесь - ItemCat). Если такой список не подходит - придется создавать свою форму нужного списка. |
|