Добрый день всем. В интерфейс карточек складского учёта добавляю свой browse. Для этого увеличил высоту окна wKartStorMC с 31 до 38 и в образовавшееся место пытаюсь вставить новый browse:
alter interface KartStorage;
...
create view
...
Window wKartStorMC;
Panel p3;
Table tmain;
Browse brMain ('Распределение по Производственным заказам', , sci147EnEsc);
Show at (, 32, , 37);
...
end;
Handleevent
cmInit:
{
if inherited::handleEvent(cmInit) = heOk {}
if cfsSetCurrentContainer(cfsGetCurrentContainerSelf) = cfOk {}
if cfsGetObjInfo('wKartStorMC', cur_obj, l0, cont_inf, aObjType) = cfOk then
{
if cfsSetProp(l0, cfpRectB_Y, double(38)) <> cfOk then {}
}
}
end;
end;
end.
Получаю: Ошибка: Область ввода (1.00, 32.00, 109.00, 37.00) не помещается в окно (0, 0, 110.00, 31.00) C:\Viper\160519_KartStorage\KartStorage.vip(стр. 127, поз. 24)
Почему не компилятор не видит увеличение высоты окна и пишет исходную высоту?
Строку cfsSetProp(l0, cfpRectB_Y, double(38)) добавлял и в cmInit гланого окна- результат тот же.