Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Контекстное меню с иконками (число прочтений - 7887 )
yudin
Full Member
***
Отсутствует


Краткость - с.т.

Сообщений: 131
Местоположение: Ростов - на - Дону
Зарегистрирован: 25. Мая 2006
Пол: Мужской
Контекстное меню с иконками
12. Февраля 2009 :: 07:11
Печать  
Кто то умел контекстное меню с иконками (какая то компонента), я был уверен что это Formex, но в описании выбратьзначение ничего похожего не нашел.
Formex не умеет выбратьзначение с иконками?
  

С уваженьем, дата, подпись
Наверх
wwwICQ  
IP записан
 
АЛьФ
FormEx developer
1c++ developer
Отсутствует



Сообщений: 1538
Местоположение: Санкт-Петербург
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #1 - 12. Февраля 2009 :: 09:08
Печать  
Умеет.
Смотри в хистори.
Цитата:
[.0] объект Сервис: Установка цвета фона и текста выделения текущего пункта, цвет фона меню, цвет текста меню и пиктограммы в меню метода ВыбратьЗначение
/*
Шестым параметром передается объект "Картинка" с нужными пиктограммами, в формате как для ТЗ.
В списке значений (первый параметр) добавляем в начале представления "[icon:N]", где N - порядковый номер пиктограммы в катинке. Если пиктограмма отображается, то строка "[icon:N]" от представления отрезается при выводе.
Седьмой параметр - список значений с параметрами цвета: значение - число цвета, представление - имя параметра.
Имя параметра может быть одним из следующих:
ЦветФонаВыделения
ЦветШрифтаВыделения
ЦветРамкиВыделения
ЦветФона
ЦветШрифта
*/
  

FormEx developer
Наверх
www  
IP записан
 
MrDen
Junior Member
**
Отсутствует



Сообщений: 50
Местоположение: Краснодар
Зарегистрирован: 19. Ноября 2008
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #2 - 12. Февраля 2009 :: 14:50
Печать  
АЛьФ писал(а) 12. Февраля 2009 :: 09:08:
Седьмой параметр - список значений с параметрами цвета: значение - число цвета, представление - имя параметра.
Имя параметра может быть одним из следующих:
ЦветФонаВыделения
ЦветШрифтаВыделения
ЦветРамкиВыделения
ЦветФона
ЦветШрифта

Красиво отображается, спасибо за FormEx!
Можно ли в качестве просьбы добавить возможность отображения жирного шрифта или сам шрифт с параметрами, красиво смотрится
И еще не могу понять почему при выводе в режиме 2 - простой выбор (без привязки к активному реквизиту)
при отображении неактивного пункта наблюдается отличие цвета фона от активного
  
Наверх
ICQ  
IP записан
 
yudin
Full Member
***
Отсутствует


Краткость - с.т.

Сообщений: 131
Местоположение: Ростов - на - Дону
Зарегистрирован: 25. Мая 2006
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #3 - 13. Февраля 2009 :: 08:55
Печать  
А вот если кто не понял о чем речь:

Код
Выбрать все
Процедура РеквТабличноеПолеПриКонтекстномМеню(ТипРегиона, Колонка, ИДполя)


	Док=ТабличноеПоле.ТекущиеДанные.Получить("Док");
	Список = СоздатьОбъект("СписокЗначений");
	Картинки=СоздатьОбъект("Картинка");
	Картинки.Загрузить(КаталогИБ()+"Иконки меню журнала.bmp");
	Список.ДобавитьЗначение(1,"[icon:1]Новый");
	Список.ДобавитьЗначение(2,"[icon:2]Открыть");
	Список.ДобавитьЗначение(3,"[icon:3]Просмотр");
	Список.ДобавитьЗначение(4,"[icon:4]Копировать");
	Если Док.ПометкаУдаления()=0 Тогда

		Список.ДобавитьЗначение(5,"[icon:5]Пометить на удаление");
	Иначе
		Список.ДобавитьЗначение(5,"[icon:5]Снять пометку удаления");
	КонецЕсли;
	 //Разделитель
	Список.ДобавитьЗначение(0,"-");
	// создаем вложенный список
	СписокДоп = СоздатьОбъект("СписокЗначений");
	СписокДоп.ДобавитьЗначение(551,"По Фирме");
	СписокДоп.ДобавитьЗначение(552,"По Контрагенту");
	СписокДоп.ДобавитьЗначение(553,"По Заявителю");

	// добавляем вложенный список
	Список.ДобавитьЗначение(СписокДоп,"[icon:6]Установить фильтр");
	Если рКОнтрагент)<>3 Тогда

		Список.ДобавитьЗначение(6,"[icon:7]Снять все фильтры");
	КонецЕсли;

	Список.ДобавитьЗначение(7,"Запомнить");

	Выб = "";
	Если СервисРасшФормы.ВыбратьЗначение(Список,Выб,"выбор значения",0,2,Картинки) = 1 Тогда
		Если Выб=1 Тогда
			НовыйДокумент();

		ИначеЕсли Выб=2 Тогда
И так далее
 

  

С уваженьем, дата, подпись
Наверх
wwwICQ  
IP записан
 
Devilsrage
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 4
Зарегистрирован: 21. Августа 2013
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #4 - 21. Августа 2013 :: 07:45
Печать  
Господа, очень прошу помощи уже пару дней бьюсь и все бесполезно...
Вызваю контекстное меню из таблицызначений в обработке и с самим его формированием проблем нет, но не удается прикрепить пиктограммы к пунктам и управлять доступностью пунктов меню
По поводу пиктограмм: проверял - картинка грузится, специально вынес ее на форму. Также проверил ее на таблице значений, пиктограммы отрабатываются отлично ()
Что с доступностью не могу понять абсоютно, даже флаги не появляются после Пометки.
Прилагаю код:
Цитата:
Процедура ПриОтжатииПравойКнопки(Сост, Х, У)
     
     Если Форма.АктивныйЭлемент() = "Журнал" Тогда
           Сервис            = СоздатьОбъект("Сервис");
           //Картинки      = СоздатьОбъект("Картинка");
           Картинки.Загрузить(КаталогИБ() + "Journals_icons.bmp");
           Список            = СоздатьОбъект("СписокЗначений");
           Список.ДобавитьЗначение(1, "[icon:1] Новый                             Insert");
           Список.ДобавитьЗначение(2, "Открыть");
           Список.ДобавитьЗначение(3, "Просморт");
           Список.ДобавитьЗначение(4, "Копировать");
           Список.ДобавитьЗначение(5, "Пометить на удаление     Del");
           Список.ДобавитьЗначение(6, "Ввести на основании");
           Список.ДобавитьЗначение(0, "-");
           Список.ДобавитьЗначение(7, "Сделать непроведенным");
           Список.Пометка(7,1);
           Список.ДобавитьЗначение(8, "Изменить время документа...");
           Список.ДобавитьЗначение(9, "Движения документа");
           Список.ДобавитьЗначение(10, "Подчиненные документы");
           Список.ДобавитьЗначение(0, "-");
           Список.ДобавитьЗначение(11, "Интервал");
           Выб = "";
           Если Сервис.ВыбратьЗначение(Список, Выб,, 0, 0, Картинки) = 1 Тогда
                 Сообщить(Выб);
                 Если Выб = 1 Тогда
                       ОткрытьФорму("Документ.СчетПоставщика", "Обработка.ЖурналИнвойсовИнопоставщиков");
                 КонецЕсли;                        
           КонецЕсли;
     КонецЕсли;  
     
КонецПроцедуры


Хоть тема и старая, очень надеюсь на помощь, перечитал здесь все относительно данных проблем и не могу понять, что делаю не так, может у меня устаревшая версия формекса... Использую последнюю сборку 1с++ с формексом в комплекте, скачивал 2 дня назад
  

_________002.JPG ( 112 KB | Загрузки )
_________002.JPG
Наверх
 
IP записан
 
Eprst
God Member
*****
Отсутствует



Сообщений: 3397
Зарегистрирован: 08. Октября 2007
Re: Контекстное меню с иконками
Ответ #5 - 21. Августа 2013 :: 08:05
Печать  
Цитата:
Использую последнюю сборку 1с++ с формексом в комплекте


Это и есть ошибка

1cpp и формекс.. сто лет в обед разные компоненты.

формекс брать тут
1cpp брать тут
  
Наверх
 
IP записан
 
Devilsrage
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 4
Зарегистрирован: 21. Августа 2013
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #6 - 21. Августа 2013 :: 08:10
Печать  
Спасибо, попробую
  
Наверх
 
IP записан
 
Devilsrage
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 4
Зарегистрирован: 21. Августа 2013
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #7 - 21. Августа 2013 :: 08:24
Печать  
Спасибо еще раз, иконки заработали, но вот с доступностью пунктов по прежнему проблема...
читал эту тему http://www.1cpp.ru/forum/YaBB.pl?num=1319090437, но так и не понял что я делаю не так
  
Наверх
 
IP записан
 
Devilsrage
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 4
Зарегистрирован: 21. Августа 2013
Пол: Мужской
Re: Контекстное меню с иконками
Ответ #8 - 21. Августа 2013 :: 11:13
Печать  
Все, разобрался, тема закрыта Улыбка
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать