вывод кнопки на форму интерфейса

[Espada]

Доброго дня, необходимо создать кнопку по нажатию на которую будет выводиться кое-какая информация. Управление договорами - Документы - Договоры - Редактирование договора

В коде прописываю обращение к интерфейсу, но кнопка так и не появляется... может сможете подсказать, что я делаю не так?)

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

#component "L_Dogovor"
const
	cmbut1=143213;
end;
 alter interface DOGOVOR;

var
  basedocnrec:comp
 window SCDOGOVOREDITMAIN;
handleevent 

	 cmInit:
            {
			 if(Inherited::HandleEvent(cmInit) = heOk)
              {
			}
			var pobj1,pobj2:longint;
              var err:string;

       if(GetDoubleParameter('Windows','FixedFontSize','$0000') = 8)
       {
              cfsCreateObject ('button','SCSCDOGOVOREDITMAIN','but1',False,pobj2);
              cfsSetProp(pobj2,'Origin_X',545);
              cfsSetProp(pobj2,'Origin_Y',275);
              cfsSetProp(pobj2,'Size_X',298);
              cfsSetProp(pobj2,'Size_Y',25);
              cfsSetProp(pobj2,'Title','Пересчет остатка');
              cfsSetProp(pobj2,'StatusCtx',sci13Esc);
              cfsSetProp(pobj2,'Command',cmBut1)
       };
    }
	cmbut1:
{
Message('Запрос выполняется', Information);
}
end;
end;
end.  

[Den]

Потому что ни окна SCDOGOVOREDITMAIN ни скрина SCSCDOGOVOREDITMAIN в данном интерфейсе нет