ToolBars & Menu

[Calvin]

Уважаемые, подскажите пож-та:
Вот допустим возьмем Эксел. Есть строка меню и панели инструментов. Если мы отключаем все панели, то остается только меню, а та "область", в которой находились панели инструментов "сварачивается". Меня интересует следующее: если создается новая панель инструментов (в VB6 на форме), то она располагается в области меню или в области формы?

[RayShade]

Куда положишь контрол ToolBar там и создастся.

[Calvin]

Но только не на форму. Я вот исходя из примера по Экселю, думаю, как в том случае располагаются ToolBars (в области меню или нет? т.к. когда их скрываешь, то область сварачивается - почему?). Да вот еще - я случаем не путаю ToolBars с CommandBars?
Я в VB6 попробовал в облать меню перетянуть тулбар, но ничего не выходит, а хотелось бы сделать форму, похожую на данный интерфейс....

[Cyrax]

в офисе,имхо, используются Sheridan'овские панели инструментов (или что-то подобное им). исходи из этого, и меню в офисе представляет собой панель инструментов (соответствующим образом оформленную).
в VB6 поместить контрол ToolBar в строку меню не получится...

а для придания панели инструментов вида как в офисе используй контрол CoolBar, на котором размещяется ToolBar. сам CoolBar лежит в Microsoft Windows Common Controls.
это из стандартного набора... из нестандартного - DataDynamics ActiveBar.

[goro]

Лучше всего использовать контролы от http://vbaccelerator.com/
Там и проблем не будет с меню и тулбарами. ИМХО

[Emzari]

Лучше всего использовать контролы от http://vbaccelerator.com/
Там и проблем не будет с меню и тулбарами. ИМХО

Не понимаю это толко у меня не работают примеры с vbaccelerator.com или в чем то ешё дело.

[goro]

Установи все библы которые требуют контролы с сайта.

[Calvin]

Их просто нужно кинуть в папку с проектом или нет?
я вот только SSubTmr6.dll нашел.....

[goro]

Их просто нужно кинуть в папку с проектом или нет?
я вот только SSubTmr6.dll нашел.....

Их надо зарегистрировать с помощью regsvr32.exe <имя файла>
а вот ссылка на SSubTmr6.dll http://vbaccelerator.com/zip.asp?id=714

[Calvin]

goro объясни пож-та тупому (т.е. мне ), как зарегистрировать и куда? Я нашел regsvr32.exe аж два файла (C:\WINN и C:\WINN\system32), а потом что?

[Emzari]

To Calvin

для того чтобы зарегистрировать библиотеку надо нажать на
Пуск потом Выполнить а потом в командной строке набрать команду regsvr32 C:\...\MyDll.dll

To Goro

Эти библиотеки у меня установлены но этим проблема не снимается

[goro]

To Calvin

для того чтобы зарегистрировать библиотеку надо нажать на
Пуск потом Выполнить а потом в командной строке набрать команду regsvr32 C:\...\MyDll.dll

To Goro

Эти библиотеки у меня установлены но этим проблема не снимается

А какие конкретно проблемы.

[Emzari]

проблемы возникают такие:
при запуске TestIconMenu.exe которй прилагается к исходникам IconMenu выдается ошибка ActivX component can't create object
А при запуске самого проекта Path not found
При запуске тестового проекта на выполнение гворит что библиотека is Missing тоесть испорчена.

[goro]

проблемы возникают такие:
при запуске TestIconMenu.exe которй прилагается к исходникам IconMenu выдается ошибка ActivX component can't create object
А при запуске самого проекта Path not found
При запуске тестового проекта на выполнение гворит что библиотека is Missing тоесть испорчена.

Попробуй скачать исходники ОСХ и заново их перекомпилируй у себя на машине, а потом попробуй запустить пример.

[Calvin]

Тема похоже не закрыта, т.к. у меня появились проблемы с CoolBar-ом:
с добавлением и удалением Band-ов в CoolBar нет проблем, но к сожалению каждый из них имеет ширину, строго привязанную к ширине CoolBar-а, т.е. уже не так, как, например, в экселе (там панели (Band-ы в нашем случае) - можно менять их ширину...если я не прав, то поравьте пож-та)...., а во-вторых у меня не получается программно добавить в Band контролы - вот это тоже проблема.
Помогите пож-та

[RayShade]

У Band'a есть проперть Child она отвечает за объект, который там будет находиться.

Так что добавить можно так:

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

set mycoolbar.bands(1).child = myobject


[Calvin]

А как перед этим задать MyObject, допустим CommandButton? Ему еще к тому же нужно куча пропертов прописать?