7.7 Как программно изменять размер элемента формы

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 7.7"", создана пользователем krasdok, 25 янв 2013.

  1. TopicStarter Overlay
    krasdok
    Offline

    krasdok Опытный в 1С

    Регистрация:
    22 июн 2011
    Сообщения:
    130
    Симпатии:
    0
    Баллы:
    26
    Здравствуйте!
    Вот интересует к примеру как задать положение и размеры на форме Кнопке.
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.523
    Симпатии:
    407
    Баллы:
    104
    без ВК ни как... FormEx или 1с++
  3. TopicStarter Overlay
    krasdok
    Offline

    krasdok Опытный в 1С

    Регистрация:
    22 июн 2011
    Сообщения:
    130
    Симпатии:
    0
    Баллы:
    26
    ВК FormEx и 1с++ свободно распространяются?
  4. TopicStarter Overlay
    krasdok
    Offline

    krasdok Опытный в 1С

    Регистрация:
    22 июн 2011
    Сообщения:
    130
    Симпатии:
    0
    Баллы:
    26
    Пример на FormEx с заданием ширины и высоты например для кнопки мог бы кто кинуть...
  5. GlukAl
    Offline

    GlukAl Опытный в 1С

    Регистрация:
    4 окт 2012
    Сообщения:
    187
    Симпатии:
    7
    Баллы:
    29
    Код:
    Перем ФормЭх;
    
    
    Код:
    Попытка
    ФормЭх=СоздатьОбъект("РасширениеФормы");
    Исключение
    Если ЗагрузитьВнешнююКомпоненту("FormEx.dll")=1 Тогда
    ФормЭх=СоздатьОбъект("РасширениеФормы");
    Иначе
    СтатусВозврата(0);
    КонецЕсли;
    КонецПопытки;
    ФормЭх.УстановитьФорму(Форма);
    
    Код:
    Процедура ПриИзмененииРазмераОкна(ТипСобытия,Шир,Выс)
    Перем хх_,уу_,шир_,выс_;
    Выс=ФормЭх.Высота;
    Шир=ФормЭх.Ширина;
    
    ФормЭх.ПолучитьАтрибут("идРеквизитаФормы1").ПолучитьКоординаты(хх_,уу_,шир_,выс_);
    
    ФормЭх.ПолучитьАтрибут("идРеквизитаФормы2").УстановитьКоординаты(хх_,уу_,шир_,выс_);
    
    //ИЛИ ПРИМЕР РАСТЯГИВАНИЯ КНОПКИ / ПОЛЯ ВВОДА / ... ПРИ ИЗМЕНЕНИИ РАЗМЕРА ОКНА ФОРМЫ
    кнФорм=ФормЭх.ПолучитьАтрибут("идРеквизитаФормы3");
    
    кнФорм.УстановитьКоординаты(10,10,Шир-20,50);
    КонецПроцедуры
    

Поделиться этой страницей