(UTC)
  1С++ users forum › 1С++ и прочие расширения v7 › FormEx › Добавить кнопку
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Нет Темы ›
Переключение на Главную Страницу Страницы: [1] 2 3 ... 6 ОтправитьПечать
Очень популярная тема (более 25 ответов) Добавить кнопку (число прочтений - 96083 )
xxc
Junior Member
**
Отсутствует



Сообщений: 19
Местоположение: Краснодар
Зарегистрирован: 18. Августа 2012
Пол: Мужской
Добавить кнопку
30. Января 2013 :: 18:04
Печать  
Здравствуйте! Существует ли возможность добавить свою кнопку в Панель инструментов формы?

[img]http://savepic.org/2684664m.png[/img]
  
Наверх
ICQ  
IP записан
 
Eprst
God Member
*****
Отсутствует



Сообщений: 3397
Зарегистрирован: 08. Октября 2007
Re: Добавить кнопку
Ответ #1 - 31. Января 2013 :: 05:13
Печать  
http://forum.infostart.ru/forum9/topic78815/
  
Наверх
 
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #2 - 01. Февраля 2013 :: 14:35
Печать  
А что кнопка должна делать?
Поскольку добавить-то можно, а вот обработать нажание....пока не уверен.
  
Наверх
 
IP записан
 
xxc
Junior Member
**
Отсутствует



Сообщений: 19
Местоположение: Краснодар
Зарегистрирован: 18. Августа 2012
Пол: Мужской
Re: Добавить кнопку
Ответ #3 - 01. Февраля 2013 :: 20:01
Печать  
MiracleV8 от Abadonna пожалуй сгодится:

http://forum.infostart.ru/bitrix/components/bitrix/forum.interface/show_file.php...

P.S. Благодар за подсказку не мне, а Ёпрст.
  
Наверх
ICQ  
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #4 - 07. Февраля 2013 :: 07:34
Печать  
А можно MiracleV8 куда-нить скинуть, а то скачать не смог.
Если еще и пример будет, то было бы здорово.

У меня пока вот как получилось. Как обычно на DWX+VBS.

PS
Посмотрел, как это работает...видимо, по такому же принципу можно добавлять кнопки в Плавающие Панели.
  
Clipboard06.jpg ( 33 KB | Загрузки )
Clipboard06.jpg
Наверх
 
IP записан
 
Eprst
God Member
*****
Отсутствует



Сообщений: 3397
Зарегистрирован: 08. Октября 2007
Re: Добавить кнопку
Ответ #5 - 07. Февраля 2013 :: 07:43
Печать  
NewToolButton(Лево, ИмяКнопки, ФайлКартинки, Хинт) где
Лево: целое - положение слева на тулбаре формы;
ИмяКнопки: строка - любое имя по английски;
ФайлКартинки: спрока - полное имя файла для картинки на кнопку, картинка 16х16
Хинт: строка - хинт (подсказка) кнопки
Кнопка при нажатии генерирует внешнее событие:
Источник="MiracleV8"; Событие="ToolButtonClick"; Данные=ИмяКнопки
Пример:

Код
Выбрать все
Процедура ОбработкаВнешнегоСобытия(Источник,Событие,Данные)
    Если Событие="ToolButtonClick" Тогда
	  Сообщить("Нажата кнопка "+Данные);

    КонецЕсли;
КонецПроцедуры

Процедура Сформировать()
    L.NewToolButton(100,"TBt1","c:\MiracleV8_TestBase77\btpict.bmp","Скрыть форму");
    L.NewToolButton(130,"TBt2","c:\MiracleV8_TestBase77\Закрыть.bmp","Показать форму");
КонецПроцедуры


©Abadonna
  
MiracleV8.rar ( 1035 KB | Загрузки )
Наверх
 
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #6 - 07. Февраля 2013 :: 07:56
Печать  
Eprst, спс!
  
Наверх
 
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #7 - 07. Февраля 2013 :: 08:28
Печать  
А как ее запустить под 77?
Нашел на форуме старый релиз, но там нет методов работы с кнопками тулбара.
  
Наверх
 
IP записан
 
Eprst
God Member
*****
Отсутствует



Сообщений: 3397
Зарегистрирован: 08. Октября 2007
Re: Добавить кнопку
Ответ #8 - 07. Февраля 2013 :: 09:57
Печать  

Код
Выбрать все
ЗагрузитьВнешнююКомпоненту("MiracleV8.dll");
L = СоздатьОбъект("AddIn.MiracleClass");
L.NewToolButton(300,"TBt1",4,"Скрыть форму");
  
Наверх
 
IP записан
 
alyuev
God Member
*****
Отсутствует


Гражданин Вселенной

Сообщений: 854
Местоположение: Одесса
Зарегистрирован: 07. Декабря 2007
Пол: Мужской
Re: Добавить кнопку
Ответ #9 - 07. Февраля 2013 :: 09:57
Печать  
Код
Выбрать все
ЗагрузитьВнешнююКомпоненту("MiracleV8.dll");
ОбжМиракл=СоздатьОбъект("AddIn.MiracleClass");
bmp","Сопоставить цену");


обработка нажатий происходит в
Код
Выбрать все
Процедура ОбработкаВнешнегоСобытия(Ист,Событие,Данные)
	Если (Ист="M8_ToolButton")и(Статус<>3) Тогда
		Если Данные="ToolButtonRefresh"		Тогда	ПоказатьИзменения();КонецЕсли;
	КонецЕсли;
КонецПроцедуры


У нас NewToolButton почему-то не взлетел. Пришлось остаться на старом методе CreateToolButton
  
1C 7.7.025; 1C++ 3.2.4.3; Formex 2.0.5.94; 1sqlite
Наверх
Skype/VoIPICQ  
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #10 - 07. Февраля 2013 :: 10:14
Печать  
Eprst писал(а) 07. Февраля 2013 :: 09:57:
Код
Выбрать все
ЗагрузитьВнешнююКомпоненту("MiracleV8.dll");
L = СоздатьОбъект("AddIn.MiracleClass");
L.NewToolButton(300,"TBt1",4,"Скрыть форму");


Ошибка при загрузке компоненты c:\5\MiracleV8.dll. Компонента не загружена.
  
Наверх
 
IP записан
 
alyuev
God Member
*****
Отсутствует


Гражданин Вселенной

Сообщений: 854
Местоположение: Одесса
Зарегистрирован: 07. Декабря 2007
Пол: Мужской
Re: Добавить кнопку
Ответ #11 - 07. Февраля 2013 :: 10:52
Печать  
Если это старая версия типа 1.9.... То её нужно зарегистрировать regsvr32. А если это версия старше 2, то по идее она уже сама регистрируется.
У нас 2.1.3.29
  
1C 7.7.025; 1C++ 3.2.4.3; Formex 2.0.5.94; 1sqlite
Наверх
Skype/VoIPICQ  
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #12 - 07. Февраля 2013 :: 11:05
Печать  
alyuev писал(а) 07. Февраля 2013 :: 10:52:
Если это старая версия типа 1.9.... То её нужно зарегистрировать regsvr32. А если это версия старше 2, то по идее она уже сама регистрируется.
У нас 2.1.3.29


У меня 2.2.0.3
Ладно, фиг с ней.
У меня собственно вопрос вот какой - эти новые кнопки, сделаны абсолютно как в 1С или просто как картинки на тулбаре?
  
Наверх
 
IP записан
 
Eprst
God Member
*****
Отсутствует



Сообщений: 3397
Зарегистрирован: 08. Октября 2007
Re: Добавить кнопку
Ответ #13 - 07. Февраля 2013 :: 11:29
Печать  
Ну, как кнопки.. с эффектом нажатия и всё такое

ЗЫ: ты попробуй миракл зарегить всё же.
  
Наверх
 
IP записан
 
chessman
God Member
*****
Отсутствует



Сообщений: 1084
Зарегистрирован: 10. Августа 2007
Re: Добавить кнопку
Ответ #14 - 07. Февраля 2013 :: 11:33
Печать  
Eprst писал(а) 07. Февраля 2013 :: 11:29:
ЗЫ: ты попробуй миракл зарегить всё же.


У меня не регится, может потому что вин7?
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: [1] 2 3 ... 6
ОтправитьПечать
‹ Предыдущая Тема | Нет Темы ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge