|
Не срабатывает УстановитьДействие("Нажатие", "МояПроцедура"); | ☑ | ||
---|---|---|---|---|
0
Aleksandr_
Nikonov 15.04.16
✎
15:34
|
Всем доброго дня пытаюсь сделать рабочий стол кассира для точек продажи кофе
нужно выводить с ночало группы элементов спр.Номенклатуры а при наатии на одну из них удалять реквизиты и встовлять новые но уже элементы так вот вывести группы удалось картинки то же удалось рабочий облась получилась довольно красивой в вот реакции на нажатие нет что елать или что я не так делаю? &НаКлиенте Процедура МояПроцедура(Элемент, ДанныеВыбора, СтандартнаяОбработка) Сообщить("что-нибудь"); КонецПроцедуры &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) аа = 0; Спр = справочники.Номенклатура.Выбрать(); Пока Спр.Следующий() цикл Если Спр.ЭтоГруппа = Истина Тогда аа = аа+1; #Область ДобавлениеРеквизитов МассивДобавляемыхЭлементов = Новый Массив; МассивДобавляемыхЭлементов.Добавить(Новый РеквизитФормы("ВторойРеквизит"+аа, Новый ОписаниеТипов("Строка"), "", "Второй реквизит"+аа)); ИзменитьРеквизиты(МассивДобавляемыхЭлементов); НовыйЭлемент = Элементы.Вставить("ВторойРеквизит"+аа, Тип("ПолеФормы"), Элементы.Группа5); НовыйЭлемент.Заголовок = СОКРЛП(Спр.Наименование); НовыйЭлемент.Видимость = Истина; НовыйЭлемент.Гиперссылка = Истина; НовыйЭлемент.Доступность = Истина; НовыйЭлемент.ПутьКДанным = "ВторойРеквизит"+аа; НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; //НовыйЭлемент.Вид = ВидКнопкиФормы.Гиперссылка; НовыйЭлемент.РастягиватьПоГоризонтали = Истина; НовыйЭлемент.РастягиватьПоВертикали = Ложь; НовыйЭлемент.Ширина = 0; НовыйЭлемент.Высота = 12; НовыйЭлемент.ШрифтЗаголовка = Новый Шрифт(,15,Истина); //отображение картинки при открытии формы справочника Если аа = 1 Тогда ЭтаФорма.ВторойРеквизит1 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; //отображение картинки при открытии формы справочника Если аа = 2 Тогда ЭтаФорма.ВторойРеквизит2 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 3 Тогда ЭтаФорма.ВторойРеквизит3 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 4 Тогда ЭтаФорма.ВторойРеквизит4 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; //устанавливаем автомасштаб для картинки //НовыйЭлемент.РазмерКартинки Если аа = 1 Тогда Элементы.ВторойРеквизит1.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 2 Тогда Элементы.ВторойРеквизит2.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 3 Тогда Элементы.ВторойРеквизит3.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 4 Тогда Элементы.ВторойРеквизит4.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; #КонецОбласти #Область ИзменениеРасположенияРеквизитов #КонецОбласти #Область ДобавлениеСтраницИТаблиц #КонецОбласти #Область ДобавлениеКоманд #КонецОбласти Конецесли; КонецЦикла; Для каждого ТекЭлУпр Из Элементы.Группа5.ПодчиненныеЭлементы Цикл ТекЭлУпр.УстановитьДействие("Нажатие", "МояПроцедура"); КонецЦикла; КонецПроцедуры |
|||
1
Aleksandr_
Nikonov 15.04.16
✎
15:36
|
и что самое интересно ошибок программа не выдает,
так же пытался создать поле ввода типа картинка на форме после создал для нее событие типа нажатие после запустил нажал а реакции 0( то есть эта проблем а не от того что реквизиты создаются программно тогда от чего? |
|||
2
Timon1405
15.04.16
✎
15:36
|
в 1с:Рознице есть добавление панели с быстрыми товарами с картинками товаров в области кнопки. почему бы не посмотреть как там сделано
|
|||
3
salvator
15.04.16
✎
15:37
|
Знаков препинания отсыпать? Читать же такое невозможно!
|
|||
4
Aleksandr_
Nikonov 16.04.16
✎
08:08
|
Посмотрел розницу там реализовано на кнопках с привязкой номенклатуры к конкретной кнопке а мне необходимо что бы раб стол был динамическим добавили новую группы указали отображать на рабочем столе и все
|
|||
5
ДенисЧ
16.04.16
✎
08:15
|
Продам кучку запятых и точек. Дорого.
|
|||
6
Aleksandr_
Nikonov 18.04.16
✎
10:00
|
Ну так что ни кто не знает как установить действие на картинку что бы при нажатии на нее срабатывала функция или как программно добавить картинку на кнопку
вот новый код вывода кнопок в место картинок но теперь проблема с добавлением картинок к кнопке НовыйЭлемент = Элементы.Вставить("ВторойРеквизит"+аа, Тип("КнопкаФормы"), Элементы.Группа5); НовыйЭлемент.Заголовок = СОКРЛП(Спр.Наименование); НовыйЭлемент.Видимость = Истина; // НовыйЭлемент.Гиперссылка = Истина; НовыйЭлемент.Доступность = Истина; // НовыйЭлемент.ПутьКДанным = "ВторойРеквизит"+аа; //НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; НовыйЭлемент.Вид = ВидКнопкиФормы.ОбычнаяКнопка; // НовыйЭлемент.РастягиватьПоГоризонтали = Истина; // НовыйЭлемент.РастягиватьПоВертикали = Ложь; НовыйЭлемент.Ширина = 30; НовыйЭлемент.Высота = 8; НовыйЭлемент.ИмяКоманды = "МояПроцедура"; |
|||
7
aleks_default
18.04.16
✎
10:06
|
(5)еще орфографический словарь ему продай
|
|||
8
KulakoffAlex
18.04.16
✎
10:16
|
Вроде надо еще сделать ЭтаФорма.ИзменитьРеквизиты(МассивРеквизитов) формы
|
|||
9
DDwe
18.04.16
✎
10:18
|
(7) Ему по-фигу, трындит своё...
|
|||
10
Aleksandr_
Nikonov 18.04.16
✎
10:23
|
Может хватит стебаться подскажите как привязать картинку к кнопке но не из БиблиотекиКартинок а из файла
дело в том что если делать так ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл") то это равно пути до картинки то есть тип не определен а необходимо что бы тип был картинка как Спр.Картинка.Ссылка.Файл превратить в картинку? |
|||
11
Карупян
18.04.16
✎
10:27
|
если это кнопки, то нужны команды
|
|||
12
Карупян
18.04.16
✎
10:28
|
(10) на уф не картинки вставляются, а адреса картинок
|
|||
13
Aleksandr_
Nikonov 18.04.16
✎
10:35
|
(10) адрес не подходит кричит не соотвествие типов
|
|||
14
Aleksandr_
Nikonov 18.04.16
✎
10:35
|
+(13) не (10) а для (12)
|
|||
15
Карупян
18.04.16
✎
10:38
|
ты смотрел как адрес получается в типовых?
|
|||
16
Радим1987
18.04.16
✎
10:42
|
ОписаниеПередаваемогоФайла()
|
|||
17
Aleksandr_
Nikonov 18.04.16
✎
10:52
|
+(15) в каких типовых есть данная реализация? что то я не нашел.
если вы о рознице, тогда там не на управляемых формах а на обычных. там я уже давно бы сделал а вот с упр проблема как прикрутить картинку не из библиотеки? не понимаю ((( |
|||
18
Aleksandr_
Nikonov 18.04.16
✎
10:52
|
тип строка не подходит нужно что бы тип был картинка
|
|||
19
zenum
18.04.16
✎
10:53
|
(18) Попробуй добавить в стандартные картинки, свои. Потом обращайся к ним как стандартным.
|
|||
20
elCust
18.04.16
✎
10:55
|
(0) Дак что у тебя не работает?
|
|||
21
Aleksandr_
Nikonov 18.04.16
✎
10:56
|
(19) ага пользователь то может менять картинки и постоянно загружать свои новые как по моему библиотека не проканает (
|
|||
22
Aleksandr_
Nikonov 18.04.16
✎
10:56
|
НовыйЭлемент = Элементы.Вставить("ВторойРеквизит"+аа, Тип("КнопкаФормы"), Элементы.Группа5);
НовыйЭлемент.Заголовок = СОКРЛП(Спр.Наименование); НовыйЭлемент.Видимость = Истина; // НовыйЭлемент.Гиперссылка = Истина; НовыйЭлемент.Доступность = Истина; // НовыйЭлемент.ПутьКДанным = "ВторойРеквизит"+аа; //НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; НовыйЭлемент.Вид = ВидКнопкиФормы.ОбычнаяКнопка; // НовыйЭлемент.РастягиватьПоГоризонтали = Истина; // НовыйЭлемент.РастягиватьПоВертикали = Ложь; НовыйЭлемент.Ширина = 30; НовыйЭлемент.Высота = 8; НовыйЭлемент.ИмяКоманды = "МояПроцедура"; НовыйЭлемент.Отображение = ОтображениеКнопки.Картинка; ФайлКартинки = Спр.Картинка.Ссылка; //Если НЕ ФайлКартинки.Пустая() Тогда АдресКартинки = ПолучитьНавигационнуюСсылку(ФайлКартинки, "Файл"); //Конецесли; //где АдресКартинки реквизит на форме (Тип:Строка) //Справочник ХранимыеФайлы //Реквизит: ДанныеФайла (Тип:Хранилище Значений) //Реквизит: ИмяФайла (Тип:Строка) НовыйЭлемент.Картинка = Новый Картинка(Спр.Картинка.Ссылка.Файл); |
|||
23
Aleksandr_
Nikonov 18.04.16
✎
10:57
|
кричит несоответсвие типов тип картинки должен быть не строка а картинка так вот как тип строка превратить в картинку?
как путь до картинки превратить в тип картинка? |
|||
24
Aleksandr_
Nikonov 18.04.16
✎
10:58
|
если брать
ФайлКартинки = Спр.Картинка.Ссылка; АдресКартинки = ПолучитьНавигационнуюСсылку(ФайлКартинки, "Файл"); то АдресКартинки - ТИП = строка а необходимо что бы тип был = Картинка как реализовать? |
|||
25
Карупян
18.04.16
✎
10:59
|
(24) На уф не нужен тип картинка
|
|||
26
Aleksandr_
Nikonov 18.04.16
✎
11:00
|
(25) да вы что?
а как тогда к кнопке прирулить картинку из файла? |
|||
27
Карупян
18.04.16
✎
11:01
|
еще раз: смотри типовые
|
|||
28
Aleksandr_
Nikonov 18.04.16
✎
11:01
|
(25)
НовыйЭлемент = Элементы.Вставить("ВторойРеквизит"+аа, Тип("КнопкаФормы"), Элементы.Группа5); НовыйЭлемент.Заголовок = СОКРЛП(Спр.Наименование); НовыйЭлемент.Видимость = Истина; // НовыйЭлемент.Гиперссылка = Истина; НовыйЭлемент.Доступность = Истина; // НовыйЭлемент.ПутьКДанным = "ВторойРеквизит"+аа; //НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; НовыйЭлемент.Вид = ВидКнопкиФормы.ОбычнаяКнопка; // НовыйЭлемент.РастягиватьПоГоризонтали = Истина; // НовыйЭлемент.РастягиватьПоВертикали = Ложь; НовыйЭлемент.Ширина = 30; НовыйЭлемент.Высота = 8; НовыйЭлемент.ИмяКоманды = "МояПроцедура"; НовыйЭлемент.Отображение = ОтображениеКнопки.Картинка; ФайлКартинки = Спр.Картинка.Ссылка; АдресКартинки = ПолучитьНавигационнуюСсылку(ФайлКартинки, "Файл"); НовыйЭлемент.Картинка = Что здесь писать тогда? |
|||
29
Карупян
18.04.16
✎
11:01
|
форма номенклатуры в ут например
|
|||
30
Aleksandr_
Nikonov 18.04.16
✎
11:02
|
(27) в каких типовых и где там смотреть?
|
|||
31
Aleksandr_
Nikonov 18.04.16
✎
11:03
|
(29) как вывести картинку на форму я знаю в упр формах поле типа строка но вид типа картинка
но как прикрутить картинку к кнопке ? |
|||
32
Карупян
18.04.16
✎
11:03
|
||||
33
Aleksandr_
Nikonov 18.04.16
✎
11:05
|
(32) так тут мы получим ссылку на картинку а не картинку кнопка будет ругаться о несоответсвие типов
или я ошибаюсь ? |
|||
34
Aleksandr_
Nikonov 18.04.16
✎
11:08
|
в (28) я написал код (32) дополни его где надо спасибо!
|
|||
35
Карупян
18.04.16
✎
11:09
|
Хотя да для кнопки никак
v8: УФ. Как присвоить картинку команде или кнопке при создании на сервере? |
|||
36
Aleksandr_
Nikonov 18.04.16
✎
11:15
|
А если помещать кртинку под уникальным именем которое в том числе писать в спр (в элементе номенкл)
после как получить данную картинку из библиотеке? |
|||
37
Карупян
18.04.16
✎
11:17
|
Ну если ты хакнешь 1с, то молодец
|
|||
38
Aleksandr_
Nikonov 18.04.16
✎
11:18
|
лады тогда по каким причинам не работает (0)?
|
|||
39
Карупян
18.04.16
✎
11:19
|
нажатие на кнопку делается через команды
|
|||
40
Aleksandr_
Nikonov 18.04.16
✎
11:21
|
минутку в (0) там тип то не кнопка а картинка соответсвенно я добавил туда команду но она не реагирует почему почитай код внимательней
|
|||
41
Aleksandr_
Nikonov 18.04.16
✎
11:28
|
в общем задача получается не решаема на УФ (
|
|||
42
Карупян
18.04.16
✎
11:33
|
у нажатия другие параметры
Реквизит2Нажатие(Элемент, СтандартнаяОбработка) |
|||
43
Aleksandr_
Nikonov 18.04.16
✎
11:35
|
с другой стороны когда ручками на форму кидаешь кнопку то имеется возможность к ней привязать картинку из файла
но не нахожу как из файла прикрутить программно ( |
|||
44
Aleksandr_
Nikonov 18.04.16
✎
11:35
|
(42) то есть если я так напишу система начнет реагировать на нажатия?
|
|||
45
Serginio1
18.04.16
✎
11:38
|
(28)
КнопкаФормы (FormButton) Картинка (Picture) Использование: Чтение и запись. Описание: Тип: Картинка. Содержит картинку, отображаемую на кнопке. Доступность: Тонкий клиент, веб-клиент, сервер, толстый клиент, мобильное приложение(клиент), мобильное приложение(сервер). Изменение свойства на клиенте требует обращения к серверу. Примечание: Если картинка задается программно, может быть установлена картина вида Пустая или ИзБиблиотеки. |
|||
46
Aleksandr_
Nikonov 18.04.16
✎
11:42
|
(45) спасибо читал (
|
|||
47
Aleksandr_
Nikonov 18.04.16
✎
11:43
|
(42) сделал как ты написал не реагирует
довайте теперь разбераться почему поле вид НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; не реагирует на нажатия вот код &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) аа = 0; Спр = справочники.Номенклатура.Выбрать(); Пока Спр.Следующий() цикл Если Спр.ЭтоГруппа = Истина Тогда аа = аа+1; #Область ДобавлениеРеквизитов МассивДобавляемыхЭлементов = Новый Массив; МассивДобавляемыхЭлементов.Добавить(Новый РеквизитФормы("ВторойРеквизит"+аа, Новый ОписаниеТипов("Строка"), "", "Второй реквизит"+аа)); ИзменитьРеквизиты(МассивДобавляемыхЭлементов); НовыйЭлемент = Элементы.Вставить("ВторойРеквизит"+аа, Тип("ПолеФормы"), Элементы.Группа5); НовыйЭлемент.Заголовок = СОКРЛП(Спр.Наименование); НовыйЭлемент.Видимость = Истина; НовыйЭлемент.Гиперссылка = Истина; НовыйЭлемент.Доступность = Истина; НовыйЭлемент.ПутьКДанным = "ВторойРеквизит"+аа; НовыйЭлемент.Вид = ВидПоляФормы.ПолеКартинки; //НовыйЭлемент.Вид = ВидКнопкиФормы.Гиперссылка; НовыйЭлемент.РастягиватьПоГоризонтали = Истина; НовыйЭлемент.РастягиватьПоВертикали = Ложь; НовыйЭлемент.Ширина = 0; НовыйЭлемент.Высота = 12; НовыйЭлемент.ШрифтЗаголовка = Новый Шрифт(,15,Истина); //отображение картинки при открытии формы справочника Если аа = 1 Тогда ЭтаФорма.ВторойРеквизит1 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; //отображение картинки при открытии формы справочника Если аа = 2 Тогда ЭтаФорма.ВторойРеквизит2 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 3 Тогда ЭтаФорма.ВторойРеквизит3 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 4 Тогда ЭтаФорма.ВторойРеквизит4 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; //устанавливаем автомасштаб для картинки //НовыйЭлемент.РазмерКартинки Если аа = 1 Тогда Элементы.ВторойРеквизит1.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 2 Тогда Элементы.ВторойРеквизит2.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 3 Тогда Элементы.ВторойРеквизит3.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; Если аа = 4 Тогда Элементы.ВторойРеквизит4.РазмерКартинки = РазмерКартинки.АвтоРазмер; КонецЕсли; #КонецОбласти #Область ИзменениеРасположенияРеквизитов #КонецОбласти #Область ДобавлениеСтраницИТаблиц #КонецОбласти #Область ДобавлениеКоманд #КонецОбласти Конецесли; КонецЦикла; Для каждого ТекЭлУпр Из Элементы.Группа5.ПодчиненныеЭлементы Цикл ТекЭлУпр.УстановитьДействие("Нажатие", "Поле1Нажатие"); КонецЦикла; КонецПроцедуры &НаКлиенте Процедура Поле1Нажатие(Элемент, СтандартнаяОбработка) Поле1НажатиеНаСервере(); КонецПроцедуры &НаСервере Процедура Поле1НажатиеНаСервере() Сообщить("Работает!"); КонецПроцедуры |
|||
48
Aleksandr_
Nikonov 18.04.16
✎
11:45
|
что интересно тчо если даже не программно добавить картинку на форму и установить для нее команду нажатие
то при нажатии на картинку нечего не происходит ( отладчик так же не реагирует на нее почему? работает только команда перетаскивание и все ( |
|||
49
Карупян
18.04.16
✎
11:47
|
можешь обработку написать непривязанную к справочнику?
|
|||
50
Aleksandr_
Nikonov 18.04.16
✎
11:48
|
(49) не понял? обоснуй
|
|||
51
Карупян
18.04.16
✎
11:49
|
Чтоб можно было запустить на любой конфе и увидеть эффект.
Тестовый пример |
|||
52
Aleksandr_
Nikonov 18.04.16
✎
11:51
|
да я тебе конфигу скину она мало весит там только один спр и одна обработка и все
|
|||
53
Aleksandr_
Nikonov 18.04.16
✎
11:54
|
||||
54
Aleksandr_
Nikonov 18.04.16
✎
11:57
|
+(53) не ту слил повтори загрузку в первой нету обработки во второй есть (доступна по той же ссыль
|
|||
55
hhhh
18.04.16
✎
11:59
|
(54) вот открыл благодаря тебе синтакс-помощник. У поля формы нет события "Нажатие". Там есть ПриИзменении.
|
|||
56
Aleksandr_
Nikonov 18.04.16
✎
12:00
|
Вид поставь Поле картинки
|
|||
57
Aleksandr_
Nikonov 18.04.16
✎
12:02
|
в общем проблему на реакцию нажатие решил путем
Элементы.ВторойРеквизит1.Гиперссылка = Истина; теперь работает теперь вопрос как через это Для каждого ТекЭлУпр Из Элементы.Группа5.ПодчиненныеЭлементы Цикл ТекЭлУпр.УстановитьДействие("Нажатие", "Поле1Нажатие"); КонецЦикла; передать имя нажатой картинки? |
|||
58
Карупян
18.04.16
✎
12:04
|
У тебя 1 параметром элемент
|
|||
59
Aleksandr_
Nikonov 18.04.16
✎
12:05
|
ребята теперь если не трудно объясните мне как обойти это условие?
Если аа = 1 Тогда ЭтаФорма.ВторойРеквизит1 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); Элементы.ВторойРеквизит1.Гиперссылка = Истина; КонецЕсли; //отображение картинки при открытии формы справочника Если аа = 2 Тогда ЭтаФорма.ВторойРеквизит2 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 3 Тогда ЭтаФорма.ВторойРеквизит3 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; Если аа = 4 Тогда ЭтаФорма.ВторойРеквизит4 = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); КонецЕсли; надо что бы я не задовал = второй реквизит и т д а что бы было типа второйреквизит+аа но так не канает |
|||
60
Aleksandr_
Nikonov 18.04.16
✎
12:05
|
то есть хотелось бы ввобще без этого условия обойтись знаю что можно но не помню как
ЭтаФорма.ВторойРеквизит+аа = ПолучитьНавигационнуюСсылку(Спр.Картинка.Ссылка, "Файл"); |
|||
61
Aleksandr_
Nikonov 18.04.16
✎
12:08
|
(57) для тех у кого при этом вылезет окно со ссылкой проблема решается путем
СтандартнаяОбработка = Ложь; |
|||
62
Aleksandr_
Nikonov 18.04.16
✎
12:08
|
ну что по (59 - 61) кто поможет?
|
|||
63
Карупян
18.04.16
✎
12:16
|
ЭтаФорма["ВторойРеквизит"+аа]
|
|||
64
Aleksandr_
Nikonov 18.04.16
✎
12:57
|
вопросов нет спасибо за помощь!
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |