Имя: Пароль:
1C
1С v8
УПП 1.3.16 Динамическое изменения размера формы
0 vitgl
 
04.11.11
23:54
Добрый вечер!

 Я добавил в систему несколько новых констант и сделал форму для их изменения. Потом решил исправить основную форму констант в конфигурации и в стандартную форму "ОсновнаяФормаКонстант" дописал следующий код:

Процедура ГиперссылказскНастройки(Элемент)
   
   Если НЕ РольДоступна("ПолныеПрава") Тогда
       Предупреждение("Нарушение прав доступа");
       Возврат;
   КонецЕсли;
   ПолучитьФорму("ОбщаяФорма.зскКонстанты").Открыть();
   
КонецПроцедуры

ЭтаФорма.Высота = ЭтаФорма.Высота + 200;

зскГиперссылка = ЭтаФорма.ЭлементыФормы.Добавить(Тип("Надпись"), "зскКонстанты", Истина);
зскГиперссылка.Заголовок = "зскКонстанты";
зскГиперссылка.Лево = 8;
зскГиперссылка.Верх = 285;
зскГиперссылка.Высота = 20;
зскГиперссылка.Ширина = 310;
зскГиперссылка.Гиперссылка = Истина;
зскГиперссылка.ЦветТекста = ЦветаСтиля.ЦветГиперссылки;
зскНажатиеДействие = Новый Действие("ГиперссылказскНастройки");
зскГиперссылка.УстановитьДействие("Нажатие", зскНажатиеДействие);

зскОписание = ЭтаФорма.ЭлементыФормы.Добавить(Тип("Надпись"), "зскКонстантыОписание", Истина);
зскОписание.Заголовок = "Настрайка основных компонентов написанных для ЗСК";
зскОписание.Лево = 8;
зскОписание.Верх = 325;
зскОписание.Высота = 20;
зскОписание.Ширина = 310;
зскОписание.ЦветТекста = ЦветаСтиля.ТекстСправочнойНадписи;

 Когда этот код отрабатывает и форма отображается на экране, то получается, что надпись зскОписание размещается прямо на надписи зскГиперссылка. Если же я изменяю размер формы в конфигураторе, то все надписи выводятся нормально на своих местах.

 Подскажите, почему не получилось изменить программно размер формы?

Заранее спасибо!
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший