Переключение на Главную Страницу Страницы: 1 [2]  ОтправитьПечать
Горячая тема (более 10 ответов) Картинка в выпадающем меню (число прочтений - 7952 )
astars
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 12
Зарегистрирован: 22. Ноября 2007
Re: Картинка в выпадающем меню
Ответ #15 - 23. Ноября 2007 :: 07:12
Печать  
vandalsvq писал(а) 22. Ноября 2007 :: 17:27:
[quote author=vip link=1195730037/0#3 date=1195743124]
Кстати подумал а почему такое поле не сделать обычным строковым реквизитом с педалькой и при нажатии на педальку через Сервис.ВыбратьЗначение() подставлять меню там и картинки и раскраска и многоуровневое меню рисовать можно...

и вообще я обиделся  Нерешительный


Более конкретная постановка вопроса.
Необходимо добавить картинки к пунктам меню, всплывающему при щелчке правой кнопкой.
  
Наверх
 
IP записан
 
vandalsvq
1c++ power user
Отсутствует


Я всего лишь als-особиратель
;-)

Сообщений: 2487
Местоположение: Уфа
Зарегистрирован: 18. Июля 2007
Пол: Мужской
Re: Картинка в выпадающем меню
Ответ #16 - 23. Ноября 2007 :: 07:43
Печать  
astars писал(а) 23. Ноября 2007 :: 07:12:
vandalsvq писал(а) 22. Ноября 2007 :: 17:27:
[quote author=vip link=1195730037/0#3 date=1195743124]
Кстати подумал а почему такое поле не сделать обычным строковым реквизитом с педалькой и при нажатии на педальку через Сервис.ВыбратьЗначение() подставлять меню там и картинки и раскраска и многоуровневое меню рисовать можно...

и вообще я обиделся  Нерешительный


Более конкретная постановка вопроса.
Необходимо добавить картинки к пунктам меню, всплывающему при щелчке правой кнопкой.


Смотри обработку в одном из постов выше... или вот пример кода

Код
Выбрать все
Картинка = СоздатьОбъект("Картинка");
АдресКартинки = КаталогИБ()+"ExtForms\ICO\row_work.bmp"; // или идентификатор картинки  из базы
Картинка.Загрузить(АдресКартинки);
лСЗ_Меню = СоздатьОбъект("СписокЗначений");
лСЗ_Меню.ДобавитьЗначение(1,"[icon:1]Добавить новую запись (Ins)");
лСЗ_Меню.ДобавитьЗначение(2,"[icon:2]Копировать текущую строку (F9)");
лСЗ_Меню.ДобавитьЗначение(3,"[icon:3]Изменить текущую строку (F2)");
лСЗ_Меню.ДобавитьЗначение(4,"[icon:4]Удалить текущую строку (Del)");
Значение = "";
Если глСервис.ВыбратьЗначение(лСЗ_Меню,Значение,"",0,2,Картинка) = 1 Тогда

КонецЕсли; 



только помни что картинки должны быть 256 цветов и 16х16 размером.
  

Отхожу от дел. Долго и мучительно.
Наверх
IP записан
 
astars
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 12
Зарегистрирован: 22. Ноября 2007
Re: Картинка в выпадающем меню
Ответ #17 - 23. Ноября 2007 :: 07:53
Печать  
vandalsvq писал(а) 23. Ноября 2007 :: 07:43:
Смотри обработку в одном из постов выше... или вот пример кода

Код
Выбрать все
Картинка = СоздатьОбъект("Картинка");
АдресКартинки = КаталогИБ()+"ExtForms\ICO\row_work.bmp"; // или идентификатор картинки  из базы
Картинка.Загрузить(АдресКартинки);
лСЗ_Меню = СоздатьОбъект("СписокЗначений");
лСЗ_Меню.ДобавитьЗначение(1,"[icon:1]Добавить новую запись (Ins)");
лСЗ_Меню.ДобавитьЗначение(2,"[icon:2]Копировать текущую строку (F9)");
лСЗ_Меню.ДобавитьЗначение(3,"[icon:3]Изменить текущую строку (F2)");
лСЗ_Меню.ДобавитьЗначение(4,"[icon:4]Удалить текущую строку (Del)");
Значение = "";
Если глСервис.ВыбратьЗначение(лСЗ_Меню,Значение,"",0,2,Картинка) = 1 Тогда

КонецЕсли; 



только помни что картинки должны быть 256 цветов и 16х16 размером.


Просмотрел, извеняюсь.
Ограмное спасибо. Улыбка

Но проблема в том, что не проходит, сделал как в примере, разрешил раскраску списков, получается каждое меню выглядет как в точности как представление, т.е. [icon:1]Добавить новую запись (Ins) и т.д.
Картинка загружается нормально, размер и битность нормальная. Что может быть не так?
Версия 1cpp - 2.0.3.7
  
Наверх
 
IP записан
 
vandalsvq
1c++ power user
Отсутствует


Я всего лишь als-особиратель
;-)

Сообщений: 2487
Местоположение: Уфа
Зарегистрирован: 18. Июля 2007
Пол: Мужской
Re: Картинка в выпадающем меню
Ответ #18 - 23. Ноября 2007 :: 08:44
Печать  
Сделай вот так:

Создай на форме объект картинка, потом используй его
(создавать объект картинка не надо)
КартинкаНаФорме.Загрузить(АдресКартинки);
Потом уже смотри внимательно чтобы КартинкаНаФорме была 6-м параметром... и не строкой а просто переменной, а то может ты пишешь "КартинкаНаФорме"

В общем давай кусок кода свой если это не поможет  Улыбка
  

Отхожу от дел. Долго и мучительно.
Наверх
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Картинка в выпадающем меню
Ответ #19 - 23. Ноября 2007 :: 08:44
Печать  
astars писал(а) 23. Ноября 2007 :: 07:53:
Версия 1cpp - 2.0.3.7

По-моему поддеррку иконок сделали в отдельном формексе. В составе 1cpp у формекса вроде этого еще не было.
  
Наверх
 
IP записан
 
vandalsvq
1c++ power user
Отсутствует


Я всего лишь als-особиратель
;-)

Сообщений: 2487
Местоположение: Уфа
Зарегистрирован: 18. Июля 2007
Пол: Мужской
Re: Картинка в выпадающем меню
Ответ #20 - 23. Ноября 2007 :: 08:48
Печать  
Arta писал(а) 23. Ноября 2007 :: 08:44:
astars писал(а) 23. Ноября 2007 :: 07:53:
Версия 1cpp - 2.0.3.7

По-моему поддеррку иконок сделали в отдельном формексе. В составе 1cpp у формекса вроде этого еще не было.


Кстати вполне возможно... я пользуюсь отдельно 1С++ и FormEx так что у меня все работает.
  

Отхожу от дел. Долго и мучительно.
Наверх
IP записан
 
vip
1c++ power user
Отсутствует



Сообщений: 1570
Зарегистрирован: 19. Мая 2006
Re: Картинка в выпадающем меню
Ответ #21 - 23. Ноября 2007 :: 08:50
Печать  
Arta писал(а) 23. Ноября 2007 :: 08:44:
astars писал(а) 23. Ноября 2007 :: 07:53:
Версия 1cpp - 2.0.3.7

По-моему поддеррку иконок сделали в отдельном формексе. В составе 1cpp у формекса вроде этого еще не было.

Таки ты прав. И кроме этого много чего в отдельном FormEx.
  
Наверх
ICQ  
IP записан
 
astars
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 12
Зарегистрирован: 22. Ноября 2007
Re: Картинка в выпадающем меню
Ответ #22 - 23. Ноября 2007 :: 09:37
Печать  
vandalsvq писал(а) 23. Ноября 2007 :: 08:48:
Кстати вполне возможно... я пользуюсь отдельно 1С++ и FormEx так что у меня все работает.

Так и есть. Всем спасибо, заработало.
Тема закрыта.
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1 [2] 
ОтправитьПечать