0
vitgl
04.11.11
✎
23:54
|
Добрый вечер!
Я добавил в систему несколько новых констант и сделал форму для их изменения. Потом решил исправить основную форму констант в конфигурации и в стандартную форму "ОсновнаяФормаКонстант" дописал следующий код:
Процедура ГиперссылказскНастройки(Элемент)
Если НЕ РольДоступна("ПолныеПрава") Тогда
Предупреждение("Нарушение прав доступа");
Возврат;
КонецЕсли;
ПолучитьФорму("ОбщаяФорма.зскКонстанты").Открыть();
КонецПроцедуры
ЭтаФорма.Высота = ЭтаФорма.Высота + 200;
зскГиперссылка = ЭтаФорма.ЭлементыФормы.Добавить(Тип("Надпись"), "зскКонстанты", Истина);
зскГиперссылка.Заголовок = "зскКонстанты";
зскГиперссылка.Лево = 8;
зскГиперссылка.Верх = 285;
зскГиперссылка.Высота = 20;
зскГиперссылка.Ширина = 310;
зскГиперссылка.Гиперссылка = Истина;
зскГиперссылка.ЦветТекста = ЦветаСтиля.ЦветГиперссылки;
зскНажатиеДействие = Новый Действие("ГиперссылказскНастройки");
зскГиперссылка.УстановитьДействие("Нажатие", зскНажатиеДействие);
зскОписание = ЭтаФорма.ЭлементыФормы.Добавить(Тип("Надпись"), "зскКонстантыОписание", Истина);
зскОписание.Заголовок = "Настрайка основных компонентов написанных для ЗСК";
зскОписание.Лево = 8;
зскОписание.Верх = 325;
зскОписание.Высота = 20;
зскОписание.Ширина = 310;
зскОписание.ЦветТекста = ЦветаСтиля.ТекстСправочнойНадписи;
Когда этот код отрабатывает и форма отображается на экране, то получается, что надпись зскОписание размещается прямо на надписи зскГиперссылка. Если же я изменяю размер формы в конфигураторе, то все надписи выводятся нормально на своих местах.
Подскажите, почему не получилось изменить программно размер формы?
Заранее спасибо!
|
|