Как программно передвинуть контрол?

[madm]

Здравствуйте.
Меняю стандартную форму DocuView, нужно в init программно изменить нижнюю часть формы, а именно добавить туда Tab с несколькими закладками. Это я делаю без проблем.
Но нужно на одну из этих вкладок перенести контрол HtmlView - не подскажите как это сделать?

[AndyD]

public void init()
{
    FormTabControl tab;
    FormTabPageControl tabPage;
    FormActiveXControl html;
    ;
    super();
    tab = this.design().addControl(FormControlType::Tab, "Tab");
    tab.widthMode(1);
    tab.heightMode(1);
    tabPage = tab.addControl(FormControlType::TabPage, "Page1");
    tabPage.widthMode(1);
    tabPage.heightMode(1);
    tabPage.caption("HTML View");
    html = tabPage.addControl(FormControlType::ActiveX, "HTMLView");
    html.widthMode(1);
    html.heightMode(1);
    html.className("Shell.Explorer");
    html.Navigate("c:\\Temp\\Книга1.htm");

    tabPage = tab.addControl(FormControlType::TabPage, "Page1");
    tabPage.widthMode(1);
    tabPage.heightMode(1);
    tabPage.caption("Просто Tab Page");
}

[madm]

Там на форме DocuView уже есть контрол HTMLView. Я хочу именно передвинуть его т.к. на нем определены методы и он в том месте где он находиться в стандарте мне не нужен.
А этот код:

Цитата:

html = tabPage.addControl(FormControlType::ActiveX, "HTMLView");

создает новый а не переносит. Нельзя ли как-то перенести существующий?

[mazzy]

Цитата:

Сообщение от madm

Нельзя ли как-то перенести существующий?

Можно.

Но для этого вам нужно отключить авторазмещение элементов на форме.
Что сразу же выключит функциональность, связанную morphX (роли, безопасность, лицензии, доработки).
Если вы так сделаете, вас буду проклинать все последующие программисты, которые будут работать с вашей формой.

Как отключить авторазмещение см. форму tutorial_Form_freeform

Про безопасность см. http://axapta.mazzy.ru/screenshots/common/example.html

[madm]

Т.е. то что так просто делается drag&drop'ом при создании формы так трудно реализовать программно?

Цитата:

Но для этого вам нужно отключить авторазмещение элементов на форме.

О нет. Этого я делать точно не могу.

[madm]

А moveControl что делает? Название уж больно подходящее но не перемещает...
Может еще можно как-то изменить containerId?

[mazzy]

Цитата:

Сообщение от madm

Т.е. то что так просто делается drag&drop'ом при создании формы так трудно реализовать программно?

Конечно же нет, drag&drop возможен только при отключенном авторазмещении.

Цитата:

Сообщение от madm

А moveControl что делает? Название уж больно подходящее но не перемещает...

Потому что срабатывает авторазмещение и возвращает контрол на свое место.

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

[madm]

mazzy помоему Вы не совсем поняли мою задачу

Вот когда аторазмещение включено я же все равно могу в среде разработки взять и передвинуть контролы(в дереве design формы) - поменять их порядок или перетащить stringedit из одной группы в другую например... Т.е. мне не нужно задавать произвольное положение по координатам (как в Делфи например) мне фактически нужно сменить порядок в дереве.

З.Ы. Мою задачу я уже решил иначе, без перемещений. Но вопрос открыт - для развития

[mazzy]

Цитата:

Сообщение от madm

Вот когда аторазмещение включено я же все равно могу в среде разработки взять и передвинуть контролы

Не можете.

[madm]

Мы наверное все же о разных вещах говорим

Я только что передвинул и все работает.

[mazzy]

Цитата:

Сообщение от madm

Мы наверное все же о разных вещах говорим

Я только что передвинул и все работает.

Что ж, скройте другие контролы.
Посмотрите работает ли авторазмещения для вашего передвинутого

Для того, чтобы передвинуть контрол, у свойства Top и Left надо выключить Auto и поставить любое число. Выключение auto эквивалентно отключению авторазмещенния.

Для того, чтобы вручную изменять размер, у свойства Width и Heght надо выключить Auto и поставить любое число. Выключение auto в этих свойствах эквиваленто отключению функции автоматического подбора размера контрола.

Еще раз: drag&drop выключает авторазмещение.

[madm]

Цитата:

Что ж, скройте другие контролы.
Посмотрите работает ли авторазмещения для вашего передвинутого

Все работает.

[kashperuk]

Цитата:

Сообщение от madm

Вот когда аторазмещение включено я же все равно могу в среде разработки взять и передвинуть контролы(в дереве design формы) -

2 mazzy: madm, к сожалению, прав, по-своему - он говорит о совсем другом перемещенни - читать выделенное красным. Так всегда можно переместить, и авторазмещение не причем.

2 madm: Нет, после открытия формы вы не можете менять что-либо в дизайне этой формы. Дальше см. ответ mazzy

[madm]

Цитата:

Сообщение от kashperuk

Нет, после открытия формы вы не можете менять что-либо в дизайне этой формы.

Понятно... Жаль

[mazzy]

Цитата:

Сообщение от kashperuk

читать выделенное красным.

Посыпаю голову пеплом!!!
Спасибо, я действительно не правильно понял... Переместить в дереве... Ужас какой-то...


Перемещать программно в открытых формах можно не в дереве AOT, а в пользовательских настройках.
См. Правую кнопку мыши, Настройка.
Но опять же для некоторых контролов и такое перемещение может быть запрещено в свойствах контрола.

[vallys]

Цитата:

Сообщение от madm

... нужно на одну из этих вкладок перенести контрол HtmlView - не подскажите как это сделать?

Думаю, что movecontrol() сделает то что Вам нужно...

void init()
{
    ...
    // test -->
    FormTabControl                      newFormTabControl;
    FormTabPageControl                  newFormTabPageControl;
    // test <--
    ...
    super();
    ...
    // test -->
    // Overview и HtmlView - контролы формы с AutoDeclaration = Yes, т.е. можно ссылатся на них в коде. Иначе использовать element.design().controlName(ControlName) или element.design().control(control::ControlName)
    newFormTabControl = Overview.addControl(FormControlType::Tab, "NewTab");
    newFormTabControl.heightMode(FormHeight::ColumnHeight);
    newFormTabControl.widthMode(FormWidth::ColumnWidth);
    newFormTabPageControl = newFormTabControl.addControl(FormControlType::TabPage, "NewTabPage");
    newFormTabPageControl.caption("NewTabPage");
    newFormTabPageControl.moveControl(HtmlView.id());
    // test <--
}

madm, это то, о чем Вы спрашивали (см. рисунок)?

P.S.

Цитата:

Сообщение от kashperuk

... после открытия формы вы не можете менять что-либо в дизайне этой формы...

Делал подобное и после Run(). Кроме изменения размеров и перерисовки формы ничего побочного не выскакивало (тут уж от специфичности кода в ините и ран формы все зависит)

[madm]

Да Валентин именно это я и хотел получить. Странно но я писал подобный код и у меня он не работал... Попробую Ваш как-нибудь. Спасибо!