Докомпиляция интерфейса L_BASEDOC::VSCHETB

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Руслан
Местный житель
Сообщения: 294
Зарегистрирован: 01 ноя 2011, 14:03
Контактная информация:

Докомпиляция интерфейса L_BASEDOC::VSCHETB

Сообщение Руслан »

Пытаюсь докомпилировать интерфейс расширенной информации ДО на закупку. Добавляю кнопки, но они не отображаются, слетают их координаты. В скрине они есть, через конфигуратор видно.

Код: Выделить всё

window WDOPATTR;
      handleEvent
         cmInit :
         {
            inherited::handleEvent(cmInit);
            var i : integer;
            for (i := 0; i < 2; i++)
            {
!               cfsSetCurrentContainer('VSCHETB.WDOPATTR.SCWDOPATTRBS');
          cfsSetCurrentContainer(cfsGetCurrentContainerSelf);
               cfsCreateObject('button', 'SCWDOPATTRBS', 'ButDistributionValue', FALSE, buttMy_var);
               cfsCreateObject('label', 'SCWDOPATTRBS', 'LableDistributionValue', FALSE, lblMy_var);
               cfsCreateObject('button', 'SCWDOPATTRBS', 'ButDistributionSeeValue', FALSE, buttMy_varSee);
               if (i = 0)
               {
                  cfsSetProp('ButDistributionValue','Visible',FALSE);
                  cfsSetProp('LableDistributionValue','Visible',FALSE);
                  cfsSetProp('ButDistributionSeeValue','Visible',FALSE);
               }
               else
               {
                  cfsSetProp('ButDistributionValue','Visible',TRUE);
                  cfsSetProp('LableDistributionValue','Visible',TRUE);
                  cfsSetProp('ButDistributionSeeValue','Visible',FALSE);
               }
               cfsSetProp('ButDistributionValue','Origin_X', 528);
               cfsSetProp('ButDistributionValue','Origin_Y', 170);
          cfsSetProp('ButDistributionValue','Size_X',239);
               cfsSetProp('ButDistributionValue','Size_Y',25);

          cfsSetProp('LableDistributionValue','Origin_X', 580);
               cfsSetProp('LableDistributionValue','Origin_Y', 202);
              cfsSetProp('LableDistributionValue','Size_X',176);
               cfsSetProp('LableDistributionValue','Size_Y',15);

             cfsSetProp('ButDistributionSeeValue','Origin_X', 528);
               cfsSetProp('ButDistributionSeeValue','Origin_Y', 345);
          cfsSetProp('ButDistributionSeeValue','Size_X',239);
               cfsSetProp('ButDistributionSeeValue','Size_Y',25);

               cfsSetProp('ButDistributionValue','Command', cmButDistributionValue);
               cfsSetProp('ButDistributionSeeValue','Command', cmButDistributionSeeValue);
               cfsSetProp('ButDistributionSeeValue','Title','Просмотр заявок'); 
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5184
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: Докомпиляция интерфейса L_BASEDOC::VSCHETB

Сообщение edward_K »

Читаем тему viewtopic.php?f=2&t=10757&start=15
Имено в верхней части расширенной информации ДО на закупку/продажу такая проблема.
Там даже ПИР написан - можете поинтересоваться в ТП о сроках решения.
Если срочно, то можете кнопки разместить в средней части этого окна или на основном экране окна редактирования.
Еще лучше сделать тулбар - я уже здесь писал как его можно динамически добавлять.
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Re: Докомпиляция интерфейса L_BASEDOC::VSCHETB

Сообщение Алексей »

Вчера слышал, что вроде бы на новом атлантисе 33м решили проблему, но я сам не проверял ещё. Не было возможности.
Ответить