├── БуферОбмена1С ├── .settings │ ├── com.e1c.v8codestyle.autosort.prefs │ ├── org.eclipse.core.resources.prefs │ ├── com.e1c.v8codestyle.prefs │ └── com.e1c.v8codestyle.bsl.prefs ├── DT-INF │ └── PROJECT.PMF ├── src │ ├── Configuration │ │ ├── CommandInterface.cmi │ │ ├── MainSectionCommandInterface.cmi │ │ └── Configuration.mdo │ ├── Subsystems │ │ └── БуферО_БуферОбмена1С │ │ │ ├── CommandInterface.cmi │ │ │ └── БуферО_БуферОбмена1С.mdo │ ├── CommonTemplates │ │ └── БуферО_КомпонентаДляРаботыСБуферомОбмена │ │ │ ├── Template.addin │ │ │ └── БуферО_КомпонентаДляРаботыСБуферомОбмена.mdo │ ├── CommonModules │ │ ├── БуферО_БуферОбменаКлиент │ │ │ ├── БуферО_БуферОбменаКлиент.mdo │ │ │ └── Module.bsl │ │ ├── БуферО_БуферОбменаКомпонентаКлиент │ │ │ ├── БуферО_БуферОбменаКомпонентаКлиент.mdo │ │ │ └── Module.bsl │ │ └── БуферО_БуферОбменаПлатформаКлиент │ │ │ ├── БуферО_БуферОбменаПлатформаКлиент.mdo │ │ │ └── Module.bsl │ └── DataProcessors │ │ └── БуферО_ТестоваяОбработка │ │ ├── БуферО_ТестоваяОбработка.mdo │ │ └── Forms │ │ └── Форма │ │ ├── Module.bsl │ │ └── Form.form └── .project ├── README.md └── LICENSE /БуферОбмена1С/.settings/com.e1c.v8codestyle.autosort.prefs: -------------------------------------------------------------------------------- 1 | eclipse.preferences.version=1 2 | topObjects=false 3 | -------------------------------------------------------------------------------- /БуферОбмена1С/.settings/org.eclipse.core.resources.prefs: -------------------------------------------------------------------------------- 1 | eclipse.preferences.version=1 2 | encoding/=UTF-8 3 | -------------------------------------------------------------------------------- /БуферОбмена1С/DT-INF/PROJECT.PMF: -------------------------------------------------------------------------------- 1 | Manifest-Version: 1.0 2 | Runtime-Version: 8.3.12 3 | Base-Project: ТестоваяДляРазработкиУИ 4 | -------------------------------------------------------------------------------- /БуферОбмена1С/.settings/com.e1c.v8codestyle.prefs: -------------------------------------------------------------------------------- 1 | commonChecks=true 2 | eclipse.preferences.version=1 3 | standardChecks=true 4 | -------------------------------------------------------------------------------- /БуферОбмена1С/.settings/com.e1c.v8codestyle.bsl.prefs: -------------------------------------------------------------------------------- 1 | addModuleStrictTypesAnnotation=false 2 | createModuleStructure=true 3 | eclipse.preferences.version=1 4 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/Configuration/CommandInterface.cmi: -------------------------------------------------------------------------------- 1 | 2 | 3 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/Configuration/MainSectionCommandInterface.cmi: -------------------------------------------------------------------------------- 1 | 2 | 3 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/Subsystems/БуферО_БуферОбмена1С/CommandInterface.cmi: -------------------------------------------------------------------------------- 1 | 2 | 3 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | # clipboard_1c 2 | Подсистема работы с буфером обмена из 1С 3 | 4 | Основана на компоненте https://github.com/lintest/1cWinCtrl. 5 | 6 | Содержит программный интерфейс для работы с буфером обмена. -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonTemplates/БуферО_КомпонентаДляРаботыСБуферомОбмена/Template.addin: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/cpr1c/clipboard_1c/HEAD/БуферОбмена1С/src/CommonTemplates/БуферО_КомпонентаДляРаботыСБуферомОбмена/Template.addin -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаКлиент/БуферО_БуферОбменаКлиент.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферО_БуферОбменаКлиент 4 | true 5 | true 6 | 7 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаКомпонентаКлиент/БуферО_БуферОбменаКомпонентаКлиент.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферО_БуферОбменаКомпонентаКлиент 4 | true 5 | true 6 | 7 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonTemplates/БуферО_КомпонентаДляРаботыСБуферомОбмена/БуферО_КомпонентаДляРаботыСБуферомОбмена.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферО_КомпонентаДляРаботыСБуферомОбмена 4 | 5 | ru 6 | VanessaExt 7 | 8 | AddIn 9 | 10 | -------------------------------------------------------------------------------- /БуферОбмена1С/.project: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферОбмена1С 4 | 5 | 6 | 7 | 8 | 9 | org.eclipse.xtext.ui.shared.xtextBuilder 10 | 11 | 12 | 13 | 14 | 15 | org.eclipse.xtext.ui.shared.xtextNature 16 | com._1c.g5.v8.dt.core.V8ExtensionNature 17 | 18 | 19 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаПлатформаКлиент/БуферО_БуферОбменаПлатформаКлиент.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферО_БуферОбменаПлатформаКлиент 4 | 5 | ru 6 | Буфер обмена платформа клиент 7 | 8 | true 9 | true 10 | 11 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/Subsystems/БуферО_БуферОбмена1С/БуферО_БуферОбмена1С.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферО_БуферОбмена1С 4 | 5 | ru 6 | Буфер обмена 1С 7 | 8 | true 9 | true 10 | DataProcessor.БуферО_ТестоваяОбработка 11 | 12 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/DataProcessors/БуферО_ТестоваяОбработка/БуферО_ТестоваяОбработка.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | БуферО_ТестоваяОбработка 8 | 9 | ru 10 | Тестовая обработка 11 | 12 | true 13 | DataProcessor.БуферО_ТестоваяОбработка.Form.Форма 14 | 15 | Форма 16 | PersonalComputer 17 | MobileDevice 18 | 19 | 20 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/Configuration/Configuration.mdo: -------------------------------------------------------------------------------- 1 | 2 | 3 | БуферОбмена1С 4 | 5 | ru 6 | Буфер обмена1 С 7 | 8 | Adopted 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | БуферО_ 17 | 8.3.12 18 | Customization 19 | Russian 20 | ООО "Центр прикладных разработок" 21 | 2.0.2 22 | 23 | ru 24 | Подсистема работы с буфером обмена из 1С 25 | 26 | 27 | ru 28 | ООО "Центр прикладных разработок" 29 | 30 | 31 | ru 32 | https://github.com/cpr1c 33 | 34 | 35 | ru 36 | https://github.com/cpr1c/clipboard_1c 37 | 38 | Managed 39 | NotAutoFree 40 | DontUse 41 | 42 | Русский 43 | Adopted 44 | 45 | Checked 46 | 47 | ru 48 | 49 | Subsystem.БуферО_БуферОбмена1С 50 | CommonTemplate.БуферО_КомпонентаДляРаботыСБуферомОбмена 51 | CommonModule.БуферО_БуферОбменаКлиент 52 | CommonModule.БуферО_БуферОбменаПлатформаКлиент 53 | CommonModule.БуферО_БуферОбменаКомпонентаКлиент 54 | DataProcessor.БуферО_ТестоваяОбработка 55 | 56 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/DataProcessors/БуферО_ТестоваяОбработка/Forms/Форма/Module.bsl: -------------------------------------------------------------------------------- 1 | 2 | #Область ОбработчикиКомандФормы 3 | 4 | #КонецОбласти 5 | &НаКлиенте 6 | Процедура ПриОткрытии(Отказ) 7 | БуферО_БуферОбменаКомпонентаКлиент.НачатьПолучениеВерсииКомпоненты(Новый ОписаниеОповещения("ПриОткрытииЗавершение", 8 | ЭтотОбъект)); 9 | КонецПроцедуры 10 | 11 | &НаКлиенте 12 | Процедура ПриОткрытииЗавершение(Результат, ДополнительныеПараметры) Экспорт 13 | ВерсияКомпоненты=Результат; 14 | КонецПроцедуры 15 | 16 | &НаКлиенте 17 | Процедура КартинкаИзБуфера(Команда) 18 | БуферО_БуферОбменаКлиент.НачатьПолучениеКартинкиИзБуфера(Новый ОписаниеОповещения("КартинкаИзБуфераЗавершение", ЭтотОбъект), "ДвоичныеДанные"); 19 | КонецПроцедуры 20 | 21 | &НаКлиенте 22 | Процедура КартинкаИзБуфераЗавершение(Результат, ДополнительныеПараметры) Экспорт 23 | АдресКартинки=ПоместитьВоВременноеХранилище(Результат, УникальныйИдентификатор); 24 | КонецПроцедуры 25 | 26 | &НаКлиенте 27 | Процедура ОчиститьБуфер(Команда) 28 | БуферО_БуферОбменаКлиент.НачатьОчисткуБуфераОбмена(Новый ОписаниеОповещения("ОчиститьБуферЗавершение", ЭтотОбъект)); 29 | КонецПроцедуры 30 | 31 | &НаКлиенте 32 | Процедура ОчиститьБуферЗавершение(Результат, ДополнительныеПараметры) Экспорт 33 | 34 | КонецПроцедуры 35 | 36 | &НаКлиенте 37 | Процедура УстановитьТекстВБуфере(Команда) 38 | БуферО_БуферОбменаКлиент.НачатьКопированиеСтрокиВБуфер(ТекстБуфера,Новый ОписаниеОповещения("УстановитьТекстВБуфереЗавершение", ЭтотОбъект)); 39 | КонецПроцедуры 40 | 41 | &НаКлиенте 42 | Процедура УстановитьТекстВБуфереЗавершение(Результат, ДополнительныеПараметры) Экспорт 43 | 44 | КонецПроцедуры 45 | 46 | &НаКлиенте 47 | Процедура ПолучитьТекстИзБуфера(Команда) 48 | БуферО_БуферОбменаКлиент.НачатьПолучениеСтрокиИзБуфера(Новый ОписаниеОповещения("ПолучитьТекстИзБуфераЗавершение", ЭтотОбъект)); 49 | КонецПроцедуры 50 | 51 | &НаКлиенте 52 | Процедура ПолучитьТекстИзБуфераЗавершение(Результат, ДополнительныеПараметры) Экспорт 53 | ТекстБуфера=Результат; 54 | КонецПроцедуры 55 | 56 | &НаКлиенте 57 | Процедура СкопироватьКартинкуВБуфер(Команда) 58 | БуферО_БуферОбменаКлиент.НачатьКопированиеКартинкиВБуфер(АдресКартинки,Новый ОписаниеОповещения("СкопироватьКартинкуВБуферЗавершение", ЭтотОбъект)); 59 | КонецПроцедуры 60 | 61 | &НаКлиенте 62 | Процедура СкопироватьКартинкуВБуферЗавершение(Результат, ДополнительныеПараметры) Экспорт 63 | 64 | КонецПроцедуры 65 | 66 | 67 | &НаКлиенте 68 | Процедура УстановитьКартнкуИзФайла(Команда) 69 | ДВФ=Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); 70 | ДВФ.МножественныйВыбор=Ложь; 71 | Если ДВФ.Выбрать() Тогда 72 | Картинка=Новый Картинка(ДВФ.ПолноеИмяФайла); 73 | КК=Картинка.Преобразовать(ФорматКартинки.PNG); 74 | АдресКартинки=ПоместитьВоВременноеХранилище(КК.ПолучитьДвоичныеДанные(), УникальныйИдентификатор); 75 | КонецЕсли; 76 | 77 | КонецПроцедуры 78 | 79 | &НаКлиенте 80 | Процедура ФорматБуфераОбмена(Команда) 81 | БуферО_БуферОбменаКлиент.НачатьПолучениеФорматаБуфераОбмена(Новый ОписаниеОповещения("ФорматБуфераОбменаЗавершение", ЭтотОбъект)); 82 | КонецПроцедуры 83 | 84 | &НаКлиенте 85 | Процедура ФорматБуфераОбменаЗавершение(Результат, ДополнительныеПараметры) Экспорт 86 | Формат=Результат; 87 | КонецПроцедуры 88 | 89 | 90 | &НаКлиенте 91 | Процедура КартинкаИзБуфераВВидеКартинки(Команда) 92 | БуферО_БуферОбменаКлиент.НачатьПолучениеКартинкиИзБуфера(Новый ОписаниеОповещения("КартинкаИзБуфераВВидеКартинкиЗавершение", ЭтотОбъект), "Картинка"); 93 | КонецПроцедуры 94 | 95 | &НаКлиенте 96 | Процедура КартинкаИзБуфераВВидеКартинкиЗавершение(Результат, ДополнительныеПараметры) Экспорт 97 | КартинкаТест=Результат; 98 | КонецПроцедуры 99 | 100 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаПлатформаКлиент/Module.bsl: -------------------------------------------------------------------------------- 1 | 2 | #Область ПрограммныйИнтерфейс 3 | 4 | // Использование платформенного буфера обмена доступно. 5 | // 6 | // Возвращаемое значение: 7 | // Булево 8 | Функция ИспользованиеПлатформенногоБуфераОбменаДоступно() Экспорт 9 | Возврат СредстваБуфераОбмена.ИспользованиеДоступно(); 10 | КонецФункции 11 | 12 | // Начинает очистку содержимого буфера обмена 13 | // 14 | // Параметры: 15 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 16 | // <РезультатОчистки> – Результат очистки, Тип: Булево. Неопределено- если не удалось подключить компоненту 17 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 18 | Асинх Процедура НачатьОчисткуБуфераОбмена(ОписаниеОповещения) Экспорт 19 | МассивДанных = Новый Массив; 20 | МассивДанных.Добавить(Новый ЭлементБуфераОбмена(СтандартныйФорматДанныхБуфераОбмена.Текст,"")); 21 | 22 | Результат = Ждать СредстваБуфераОбмена.ПоместитьДанныеАсинх(МассивДанных); 23 | 24 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Результат); 25 | КонецПроцедуры 26 | 27 | // Начинает помещение картинку в буфер обмена 28 | // 29 | // Параметры: 30 | // Картинка - Картинка- 31 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 32 | // <Результат> – Результат установки картинки в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 33 | // <ПараметрыВызова> - Массив параметров вызова метода компоненты 34 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 35 | Асинх Процедура НачатьКопированиеКартинкиВБуфер(Картинка, ОписаниеОповещения) Экспорт 36 | ПоддерживаетсяФормат = Ждать СредстваБуфераОбмена.ПоддерживаетсяФорматДанных(СтандартныйФорматДанныхБуфераОбмена.Картинка); 37 | Если Не ПоддерживаетсяФормат Тогда 38 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Ложь); 39 | КонецЕсли; 40 | Результат = Ждать СредстваБуфераОбмена.ПоместитьДанныеАсинх(Новый ЭлементБуфераОбмена(СтандартныйФорматДанныхБуфераОбмена.Картинка,Картинка)); 41 | 42 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Результат); 43 | КонецПроцедуры 44 | 45 | // Начинает получение картинки из буфера обмена 46 | // 47 | // Параметры: 48 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 49 | // <ДанныеКартинки> – Данные картинки в запрошенном формате, Тип: Строка, ДвоичныеДанные, Картинка. Неопределено- если не удалось подключить компоненту или в буфере нет картинки 50 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 51 | // ВариантПолучения - Строка 52 | // Один из варинатов: 53 | // ДвоичныеДанные- получение двоичных данных картинки 54 | // Картинка- Преобразованное к типу "Картинка" содержание буфера 55 | // Адрес- Адрес двоичных данных картинки во временном хранилище 56 | Асинх Процедура НачатьПолучениеКартинкиИзБуфера(ОписаниеОповещения, ВариантПолучения = "Картинка") Экспорт 57 | СодержитДанные = Ждать СредстваБуфераОбмена.СодержитДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Картинка); 58 | Если Не СодержитДанные Тогда 59 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Неопределено); 60 | Возврат; 61 | КонецЕсли; 62 | Результат = Ждать СредстваБуфераОбмена.ПолучитьДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Картинка); 63 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, КартинкаВНужномФорматеИзБуфера(Результат, 64 | ВариантПолучения)); 65 | КонецПроцедуры 66 | 67 | // Начинает помещение текста в буфер обмена 68 | // 69 | // Параметры: 70 | // СтрокаКопирования- Строка- Строка, которую необходимо поместить в буфер обмена 71 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 72 | // <Результат> – Результат установки текста в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 73 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 74 | Асинх Процедура НачатьКопированиеСтрокиВБуфер(СтрокаКопирования, ОписаниеОповещения) Экспорт 75 | ПоддерживаетсяФормат = Ждать СредстваБуфераОбмена.ПоддерживаетсяФорматДанных(СтандартныйФорматДанныхБуфераОбмена.Текст); 76 | Если Не ПоддерживаетсяФормат Тогда 77 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Ложь); 78 | Возврат; 79 | КонецЕсли; 80 | Результат = Ждать СредстваБуфераОбмена.ПоместитьДанныеАсинх(Новый ЭлементБуфераОбмена(СтандартныйФорматДанныхБуфераОбмена.Текст,СтрокаКопирования)); 81 | 82 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Результат); 83 | КонецПроцедуры 84 | 85 | 86 | // Начинает получение текста из буфера обмена 87 | // 88 | // Параметры: 89 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 90 | // <Результат> – Текст из буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 91 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 92 | Асинх Процедура НачатьПолучениеСтрокиИзБуфера(ОписаниеОповещения) Экспорт 93 | СодержитДанные = Ждать СредстваБуфераОбмена.СодержитДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Текст); 94 | Если Не СодержитДанные Тогда 95 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, ""); 96 | Возврат; 97 | КонецЕсли; 98 | Результат = Ждать СредстваБуфераОбмена.ПолучитьДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Текст); 99 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, Результат); 100 | КонецПроцедуры 101 | 102 | 103 | // Начинает получение формата текущего значения в буфере обмена 104 | // 105 | // Параметры: 106 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 107 | // <Результат> – Строка в формате JSON, содержащая описание формата содержимого буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 108 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 109 | Асинх Процедура НачатьПолучениеФорматаБуфераОбмена(ОписаниеОповещения) Экспорт 110 | 111 | СодержитДанные = Ждать СредстваБуфераОбмена.СодержитДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Картинка); 112 | Если СодержитДанные Тогда 113 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, "Картинка"); 114 | Возврат; 115 | КонецЕсли; 116 | СодержитДанные = Ждать СредстваБуфераОбмена.СодержитДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.HTML); 117 | Если СодержитДанные Тогда 118 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, "HTML"); 119 | Возврат; 120 | КонецЕсли; 121 | СодержитДанные = Ждать СредстваБуфераОбмена.СодержитДанныеАсинх(СтандартныйФорматДанныхБуфераОбмена.Текст); 122 | Если СодержитДанные Тогда 123 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, "Текст"); 124 | Возврат; 125 | КонецЕсли; 126 | ВыполнитьОбработкуОповещения(ОписаниеОповещения, ""); 127 | 128 | КонецПроцедуры 129 | 130 | 131 | #КонецОбласти 132 | 133 | #Область СлужебныйПрограммныйИнтерфейс 134 | 135 | 136 | #КонецОбласти 137 | 138 | #Область СлужебныеПроцедурыИФункции 139 | 140 | Функция КартинкаВНужномФорматеИзБуфера(ДанныеБуфера, ВариантПолучения) 141 | Если ТипЗнч(ДанныеБуфера) <> Тип("Картинка") Тогда 142 | Возврат Неопределено; 143 | КонецЕсли; 144 | 145 | Если НРег(ВариантПолучения) = "двоичныеданные" Тогда 146 | Возврат ДанныеБуфера.ПолучитьДвоичныеДанные(); 147 | ИначеЕсли НРег(ВариантПолучения) = "адрес" Тогда 148 | Возврат ПоместитьВоВременноеХранилище(ДанныеБуфера.ПолучитьДвоичныеДанные()); 149 | Иначе 150 | Возврат ДанныеБуфера; 151 | КонецЕсли; 152 | КонецФункции 153 | 154 | #КонецОбласти 155 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаКлиент/Module.bsl: -------------------------------------------------------------------------------- 1 | // Работа с буфером обмена из 1С 2 | // 3 | // Copyright 2020 ООО "Центр прикладных разработок" 4 | // 5 | // Licensed under the Apache License, Version 2.0 (the "License"); 6 | // you may not use this file except in compliance with the License. 7 | // You may obtain a copy of the License at 8 | // 9 | // http://www.apache.org/licenses/LICENSE-2.0 10 | // 11 | // Unless required by applicable law or agreed to in writing, software 12 | // distributed under the License is distributed on an "AS IS" BASIS, 13 | // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 14 | // See the License for the specific language governing permissions and 15 | // limitations under the License. 16 | // 17 | // 18 | // URL: https://github.com/cpr1c/clipboard_1c 19 | // Требования: платформа 1С версии 8.3.14 и выше 20 | // С более ранними платформами могут быть проблемы с подключением компоненты, а также с работой некоторых методов 21 | 22 | #Область ПрограммныйИнтерфейс 23 | 24 | // Возвращает текущую версию подсистемы 25 | // 26 | // Возвращаемое значение: 27 | // Строка - Версия подсистемы работы с буфером обмена 28 | Функция ВерсияПодсистемы() Экспорт 29 | Возврат "2.0.2"; 30 | КонецФункции 31 | 32 | // Доступно использование платформенных возможностей. 33 | // 34 | // Возвращаемое значение: 35 | // Булево 36 | Функция ДоступноИспользованиеПлатформенныхВозможностей() Экспорт 37 | Если ВерсияПлатформыНеМладше("8.3.24") Тогда 38 | Возврат БуферО_БуферОбменаПлатформаКлиент.ИспользованиеПлатформенногоБуфераОбменаДоступно(); 39 | КонецЕсли; 40 | 41 | Возврат Ложь; 42 | КонецФункции 43 | 44 | // Начинает очистку содержимого буфера обмена 45 | // 46 | // Параметры: 47 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 48 | // <РезультатОчистки> – Результат очистки, Тип: Булево. Неопределено- если не удалось подключить компоненту 49 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 50 | Процедура НачатьОчисткуБуфераОбмена(ОписаниеОповещения) Экспорт 51 | МодульБуфераОбменаДляИспользования().НачатьОчисткуБуфераОбмена(ОписаниеОповещения); 52 | КонецПроцедуры 53 | 54 | // Начинает помещение картинку в буфер обмена 55 | // 56 | // Параметры: 57 | // Картинка - Картинка, Строка, ДвоичныеДанные - 58 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 59 | // <Результат> – Результат установки картинки в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 60 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 61 | Процедура НачатьКопированиеКартинкиВБуфер(Картинка, ОписаниеОповещения) Экспорт 62 | КаринкаДляКопирования = КартинкаДляКопированияВБуфер(Картинка); 63 | Если КаринкаДляКопирования = Неопределено Тогда 64 | Возврат; 65 | КонецЕсли; 66 | МодульБуфераОбменаДляРаботыСКартинками().НачатьКопированиеКартинкиВБуфер(КаринкаДляКопирования, ОписаниеОповещения); 67 | КонецПроцедуры 68 | 69 | // Начинает получение картинки из буфера обмена 70 | // 71 | // Параметры: 72 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 73 | // <ДанныеКартинки> – Данные картинки в запрошенном формате, Тип: Строка, ДвоичныеДанные, Картинка. Неопределено- если не удалось подключить компоненту или в буфере нет картинки 74 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 75 | // ВариантПолучения - Строка 76 | // Один из варинатов: 77 | // ДвоичныеДанные- получение двоичных данных картинки 78 | // Картинка- Преобразованное к типу "Картинка" содержание буфера 79 | // Адрес- Адрес двоичных данных картинки во временном хранилище 80 | Процедура НачатьПолучениеКартинкиИзБуфера(ОписаниеОповещения, ВариантПолучения = "Картинка") Экспорт 81 | МодульБуфераОбменаДляРаботыСКартинками().НачатьПолучениеКартинкиИзБуфера(ОписаниеОповещения, ВариантПолучения); 82 | КонецПроцедуры 83 | 84 | // Начинает помещение текста в буфер обмена 85 | // 86 | // Параметры: 87 | // СтрокаКопирования- Строка- Строка, которую необходимо поместить в буфер обмена 88 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 89 | // <Результат> – Результат установки текста в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 90 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 91 | Процедура НачатьКопированиеСтрокиВБуфер(СтрокаКопирования, ОписаниеОповещения) Экспорт 92 | МодульБуфераОбменаДляИспользования().НачатьКопированиеСтрокиВБуфер(СтрокаКопирования, ОписаниеОповещения); 93 | КонецПроцедуры 94 | 95 | 96 | // Начинает получение текста из буфера обмена 97 | // 98 | // Параметры: 99 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 100 | // <Результат> – Текст из буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 101 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 102 | Процедура НачатьПолучениеСтрокиИзБуфера(ОписаниеОповещения) Экспорт 103 | МодульБуфераОбменаДляИспользования().НачатьПолучениеСтрокиИзБуфера(ОписаниеОповещения); 104 | КонецПроцедуры 105 | 106 | 107 | // Начинает получение формата текущего значения в буфере обмена 108 | // 109 | // Параметры: 110 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 111 | // <Результат> – Строка в формате JSON, содержащая описание формата содержимого буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 112 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 113 | Процедура НачатьПолучениеФорматаБуфераОбмена(ОписаниеОповещения) Экспорт 114 | МодульБуфераОбменаДляИспользования().НачатьПолучениеФорматаБуфераОбмена(ОписаниеОповещения); 115 | КонецПроцедуры 116 | 117 | 118 | #КонецОбласти 119 | 120 | #Область СлужебныйПрограммныйИнтерфейс 121 | 122 | 123 | #КонецОбласти 124 | 125 | #Область СлужебныеПроцедурыИФункции 126 | 127 | // Модуль буфера обмена для использования. 128 | // 129 | // Возвращаемое значение: 130 | // ОбщийМодуль 131 | Функция МодульБуфераОбменаДляИспользования() 132 | Если ДоступноИспользованиеПлатформенныхВозможностей() Тогда 133 | Возврат БуферО_БуферОбменаПлатформаКлиент; 134 | Иначе 135 | Возврат БуферО_БуферОбменаКомпонентаКлиент; 136 | КонецЕсли; 137 | КонецФункции 138 | 139 | // Модуль буфера обмена для использования. 140 | // 141 | // Возвращаемое значение: 142 | // ОбщийМодуль 143 | Функция МодульБуфераОбменаДляРаботыСКартинками() 144 | Если ДоступноИспользованиеПлатформенныхВозможностей() И Не ЭтоLinux() Тогда 145 | Возврат БуферО_БуферОбменаПлатформаКлиент; 146 | Иначе 147 | Возврат БуферО_БуферОбменаКомпонентаКлиент; 148 | КонецЕсли; 149 | КонецФункции 150 | 151 | // Текущая версия платформы1 с предприятие. 152 | // 153 | // Возвращаемое значение: 154 | // Строка - Текущая версия платформы 1С предприятие 155 | Функция ТекущаяВерсияПлатформы1СПредприятие() 156 | 157 | СистИнфо = Новый СистемнаяИнформация; 158 | Возврат СистИнфо.ВерсияПриложения; 159 | 160 | КонецФункции 161 | 162 | // Версия платформы не младше. 163 | // 164 | // Параметры: 165 | // ВерсияДляСравнения - Строка - Версия для сравнения 166 | // 167 | // Возвращаемое значение: 168 | // Булево - Версия платформы не младше 169 | Функция ВерсияПлатформыНеМладше(ВерсияДляСравнения) 170 | ВерсияБезСборки=ВерсияКонфигурацииБезНомераСборки(ТекущаяВерсияПлатформы1СПредприятие()); 171 | 172 | Возврат СравнитьВерсииБезНомераСборки(ВерсияБезСборки, ВерсияДляСравнения)>=0; 173 | КонецФункции 174 | 175 | // Получает номер версии конфигурации без номера сборки. 176 | // 177 | // Параметры: 178 | // Версия - Строка - версия конфигурации в формате РР.ПП.ЗЗ.СС, 179 | // где СС - номер сборки, который будет удален. 180 | // 181 | // Возвращаемое значение: 182 | // Строка - номер версии конфигурации без номера сборки в формате РР.ПП.ЗЗ. 183 | // 184 | Функция ВерсияКонфигурацииБезНомераСборки(Знач Версия) 185 | 186 | Массив = СтрРазделить(Версия, "."); 187 | 188 | Если Массив.Количество() < 3 Тогда 189 | Возврат Версия; 190 | КонецЕсли; 191 | 192 | Результат = "[Редакция].[Подредакция].[Релиз]"; 193 | Результат = СтрЗаменить(Результат, "[Редакция]", Массив[0]); 194 | Результат = СтрЗаменить(Результат, "[Подредакция]", Массив[1]); 195 | Результат = СтрЗаменить(Результат, "[Релиз]", Массив[2]); 196 | 197 | Возврат Результат; 198 | КонецФункции 199 | 200 | // Сравнить две строки версий. 201 | // 202 | // Параметры: 203 | // СтрокаВерсии1 - Строка - номер версии в формате РР.{П|ПП}.ЗЗ. 204 | // СтрокаВерсии2 - Строка - второй сравниваемый номер версии. 205 | // 206 | // Возвращаемое значение: 207 | // Число - больше 0, если СтрокаВерсии1 > СтрокаВерсии2; 0, если версии равны. 208 | // 209 | Функция СравнитьВерсииБезНомераСборки(Знач СтрокаВерсии1, Знач СтрокаВерсии2) 210 | 211 | Строка1 = ?(ПустаяСтрока(СтрокаВерсии1), "0.0.0", СтрокаВерсии1); 212 | Строка2 = ?(ПустаяСтрока(СтрокаВерсии2), "0.0.0", СтрокаВерсии2); 213 | Версия1 = СтрРазделить(Строка1, "."); 214 | Если Версия1.Количество() <> 3 Тогда 215 | ВызватьИсключение СтрШаблон(НСтр("ru = 'Неправильный формат параметра СтрокаВерсии1: %1'"), СтрокаВерсии1); 216 | КонецЕсли; 217 | Версия2 = СтрРазделить(Строка2, "."); 218 | Если Версия2.Количество() <> 3 Тогда 219 | ВызватьИсключение СтрШаблон(НСтр("ru = 'Неправильный формат параметра СтрокаВерсии2: %1'"), СтрокаВерсии2); 220 | КонецЕсли; 221 | 222 | Результат = 0; 223 | Для Разряд = 0 По 2 Цикл 224 | Результат = Число(Версия1[Разряд]) - Число(Версия2[Разряд]); 225 | Если Результат <> 0 Тогда 226 | Возврат Результат; 227 | КонецЕсли; 228 | КонецЦикла; 229 | Возврат Результат; 230 | 231 | КонецФункции 232 | 233 | // Картинка для копирования в буфер. 234 | // 235 | // Параметры: 236 | // Картинка- Строка, Картинка, ДвоичныеДанные - Картинка 237 | // 238 | // Возвращаемое значение: 239 | // Неопределено, Картинка - Картинка для копирования в буфер 240 | Функция КартинкаДляКопированияВБуфер(Картинка) 241 | Если ТипЗнч(Картинка) = Тип("Строка") И ЭтоАдресВременногоХранилища(Картинка) Тогда 242 | ТекКартинка=ПолучитьИзВременногоХранилища(Картинка); 243 | Иначе 244 | ТекКартинка=Картинка; 245 | КонецЕсли; 246 | 247 | Если ТипЗнч(ТекКартинка) = Тип("Картинка") Тогда 248 | Возврат ТекКартинка; 249 | ИначеЕсли ТипЗнч(ТекКартинка) = Тип("ДвоичныеДанные") Тогда 250 | Возврат Новый Картинка(ТекКартинка); 251 | Иначе 252 | Сообщить("Неверный тип картинки"); 253 | Возврат Неопределено; 254 | КонецЕсли; 255 | КонецФункции 256 | 257 | // Это linux. 258 | // 259 | // Возвращаемое значение: 260 | // Булево - Это linux 261 | Функция ЭтоLinux() Экспорт 262 | СистемнаяИнформация = Новый СистемнаяИнформация; 263 | Возврат СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Linux_x86 Или СистемнаяИнформация.ТипПлатформы 264 | = ТипПлатформы.Linux_x86_64; 265 | КонецФункции 266 | 267 | 268 | 269 | #КонецОбласти -------------------------------------------------------------------------------- /LICENSE: -------------------------------------------------------------------------------- 1 | Apache License 2 | Version 2.0, January 2004 3 | http://www.apache.org/licenses/ 4 | 5 | TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION 6 | 7 | 1. Definitions. 8 | 9 | "License" shall mean the terms and conditions for use, reproduction, 10 | and distribution as defined by Sections 1 through 9 of this document. 11 | 12 | "Licensor" shall mean the copyright owner or entity authorized by 13 | the copyright owner that is granting the License. 14 | 15 | "Legal Entity" shall mean the union of the acting entity and all 16 | other entities that control, are controlled by, or are under common 17 | control with that entity. For the purposes of this definition, 18 | "control" means (i) the power, direct or indirect, to cause the 19 | direction or management of such entity, whether by contract or 20 | otherwise, or (ii) ownership of fifty percent (50%) or more of the 21 | outstanding shares, or (iii) beneficial ownership of such entity. 22 | 23 | "You" (or "Your") shall mean an individual or Legal Entity 24 | exercising permissions granted by this License. 25 | 26 | "Source" form shall mean the preferred form for making modifications, 27 | including but not limited to software source code, documentation 28 | source, and configuration files. 29 | 30 | "Object" form shall mean any form resulting from mechanical 31 | transformation or translation of a Source form, including but 32 | not limited to compiled object code, generated documentation, 33 | and conversions to other media types. 34 | 35 | "Work" shall mean the work of authorship, whether in Source or 36 | Object form, made available under the License, as indicated by a 37 | copyright notice that is included in or attached to the work 38 | (an example is provided in the Appendix below). 39 | 40 | "Derivative Works" shall mean any work, whether in Source or Object 41 | form, that is based on (or derived from) the Work and for which the 42 | editorial revisions, annotations, elaborations, or other modifications 43 | represent, as a whole, an original work of authorship. For the purposes 44 | of this License, Derivative Works shall not include works that remain 45 | separable from, or merely link (or bind by name) to the interfaces of, 46 | the Work and Derivative Works thereof. 47 | 48 | "Contribution" shall mean any work of authorship, including 49 | the original version of the Work and any modifications or additions 50 | to that Work or Derivative Works thereof, that is intentionally 51 | submitted to Licensor for inclusion in the Work by the copyright owner 52 | or by an individual or Legal Entity authorized to submit on behalf of 53 | the copyright owner. For the purposes of this definition, "submitted" 54 | means any form of electronic, verbal, or written communication sent 55 | to the Licensor or its representatives, including but not limited to 56 | communication on electronic mailing lists, source code control systems, 57 | and issue tracking systems that are managed by, or on behalf of, the 58 | Licensor for the purpose of discussing and improving the Work, but 59 | excluding communication that is conspicuously marked or otherwise 60 | designated in writing by the copyright owner as "Not a Contribution." 61 | 62 | "Contributor" shall mean Licensor and any individual or Legal Entity 63 | on behalf of whom a Contribution has been received by Licensor and 64 | subsequently incorporated within the Work. 65 | 66 | 2. Grant of Copyright License. Subject to the terms and conditions of 67 | this License, each Contributor hereby grants to You a perpetual, 68 | worldwide, non-exclusive, no-charge, royalty-free, irrevocable 69 | copyright license to reproduce, prepare Derivative Works of, 70 | publicly display, publicly perform, sublicense, and distribute the 71 | Work and such Derivative Works in Source or Object form. 72 | 73 | 3. Grant of Patent License. Subject to the terms and conditions of 74 | this License, each Contributor hereby grants to You a perpetual, 75 | worldwide, non-exclusive, no-charge, royalty-free, irrevocable 76 | (except as stated in this section) patent license to make, have made, 77 | use, offer to sell, sell, import, and otherwise transfer the Work, 78 | where such license applies only to those patent claims licensable 79 | by such Contributor that are necessarily infringed by their 80 | Contribution(s) alone or by combination of their Contribution(s) 81 | with the Work to which such Contribution(s) was submitted. If You 82 | institute patent litigation against any entity (including a 83 | cross-claim or counterclaim in a lawsuit) alleging that the Work 84 | or a Contribution incorporated within the Work constitutes direct 85 | or contributory patent infringement, then any patent licenses 86 | granted to You under this License for that Work shall terminate 87 | as of the date such litigation is filed. 88 | 89 | 4. Redistribution. You may reproduce and distribute copies of the 90 | Work or Derivative Works thereof in any medium, with or without 91 | modifications, and in Source or Object form, provided that You 92 | meet the following conditions: 93 | 94 | (a) You must give any other recipients of the Work or 95 | Derivative Works a copy of this License; and 96 | 97 | (b) You must cause any modified files to carry prominent notices 98 | stating that You changed the files; and 99 | 100 | (c) You must retain, in the Source form of any Derivative Works 101 | that You distribute, all copyright, patent, trademark, and 102 | attribution notices from the Source form of the Work, 103 | excluding those notices that do not pertain to any part of 104 | the Derivative Works; and 105 | 106 | (d) If the Work includes a "NOTICE" text file as part of its 107 | distribution, then any Derivative Works that You distribute must 108 | include a readable copy of the attribution notices contained 109 | within such NOTICE file, excluding those notices that do not 110 | pertain to any part of the Derivative Works, in at least one 111 | of the following places: within a NOTICE text file distributed 112 | as part of the Derivative Works; within the Source form or 113 | documentation, if provided along with the Derivative Works; or, 114 | within a display generated by the Derivative Works, if and 115 | wherever such third-party notices normally appear. The contents 116 | of the NOTICE file are for informational purposes only and 117 | do not modify the License. You may add Your own attribution 118 | notices within Derivative Works that You distribute, alongside 119 | or as an addendum to the NOTICE text from the Work, provided 120 | that such additional attribution notices cannot be construed 121 | as modifying the License. 122 | 123 | You may add Your own copyright statement to Your modifications and 124 | may provide additional or different license terms and conditions 125 | for use, reproduction, or distribution of Your modifications, or 126 | for any such Derivative Works as a whole, provided Your use, 127 | reproduction, and distribution of the Work otherwise complies with 128 | the conditions stated in this License. 129 | 130 | 5. Submission of Contributions. Unless You explicitly state otherwise, 131 | any Contribution intentionally submitted for inclusion in the Work 132 | by You to the Licensor shall be under the terms and conditions of 133 | this License, without any additional terms or conditions. 134 | Notwithstanding the above, nothing herein shall supersede or modify 135 | the terms of any separate license agreement you may have executed 136 | with Licensor regarding such Contributions. 137 | 138 | 6. Trademarks. This License does not grant permission to use the trade 139 | names, trademarks, service marks, or product names of the Licensor, 140 | except as required for reasonable and customary use in describing the 141 | origin of the Work and reproducing the content of the NOTICE file. 142 | 143 | 7. Disclaimer of Warranty. Unless required by applicable law or 144 | agreed to in writing, Licensor provides the Work (and each 145 | Contributor provides its Contributions) on an "AS IS" BASIS, 146 | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 147 | implied, including, without limitation, any warranties or conditions 148 | of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A 149 | PARTICULAR PURPOSE. You are solely responsible for determining the 150 | appropriateness of using or redistributing the Work and assume any 151 | risks associated with Your exercise of permissions under this License. 152 | 153 | 8. Limitation of Liability. In no event and under no legal theory, 154 | whether in tort (including negligence), contract, or otherwise, 155 | unless required by applicable law (such as deliberate and grossly 156 | negligent acts) or agreed to in writing, shall any Contributor be 157 | liable to You for damages, including any direct, indirect, special, 158 | incidental, or consequential damages of any character arising as a 159 | result of this License or out of the use or inability to use the 160 | Work (including but not limited to damages for loss of goodwill, 161 | work stoppage, computer failure or malfunction, or any and all 162 | other commercial damages or losses), even if such Contributor 163 | has been advised of the possibility of such damages. 164 | 165 | 9. Accepting Warranty or Additional Liability. While redistributing 166 | the Work or Derivative Works thereof, You may choose to offer, 167 | and charge a fee for, acceptance of support, warranty, indemnity, 168 | or other liability obligations and/or rights consistent with this 169 | License. However, in accepting such obligations, You may act only 170 | on Your own behalf and on Your sole responsibility, not on behalf 171 | of any other Contributor, and only if You agree to indemnify, 172 | defend, and hold each Contributor harmless for any liability 173 | incurred by, or claims asserted against, such Contributor by reason 174 | of your accepting any such warranty or additional liability. 175 | 176 | END OF TERMS AND CONDITIONS 177 | 178 | APPENDIX: How to apply the Apache License to your work. 179 | 180 | To apply the Apache License to your work, attach the following 181 | boilerplate notice, with the fields enclosed by brackets "[]" 182 | replaced with your own identifying information. (Don't include 183 | the brackets!) The text should be enclosed in the appropriate 184 | comment syntax for the file format. We also recommend that a 185 | file or class name and description of purpose be included on the 186 | same "printed page" as the copyright notice for easier 187 | identification within third-party archives. 188 | 189 | Copyright 2020 ООО "Центр прикладных разработок" 190 | 191 | Licensed under the Apache License, Version 2.0 (the "License"); 192 | you may not use this file except in compliance with the License. 193 | You may obtain a copy of the License at 194 | 195 | http://www.apache.org/licenses/LICENSE-2.0 196 | 197 | Unless required by applicable law or agreed to in writing, software 198 | distributed under the License is distributed on an "AS IS" BASIS, 199 | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 200 | See the License for the specific language governing permissions and 201 | limitations under the License. 202 | -------------------------------------------------------------------------------- /БуферОбмена1С/src/CommonModules/БуферО_БуферОбменаКомпонентаКлиент/Module.bsl: -------------------------------------------------------------------------------- 1 | // Работа с буфером обмена из 1С 2 | // 3 | // Copyright 2020 ООО "Центр прикладных разработок" 4 | // 5 | // Licensed under the Apache License, Version 2.0 (the "License"); 6 | // you may not use this file except in compliance with the License. 7 | // You may obtain a copy of the License at 8 | // 9 | // http://www.apache.org/licenses/LICENSE-2.0 10 | // 11 | // Unless required by applicable law or agreed to in writing, software 12 | // distributed under the License is distributed on an "AS IS" BASIS, 13 | // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 14 | // See the License for the specific language governing permissions and 15 | // limitations under the License. 16 | // 17 | // 18 | // URL: https://github.com/cpr1c/clipboard_1c 19 | // Требования: платформа 1С версии 8.3.14 и выше 20 | // С более ранними платформами могут быть проблемы с подключением компоненты, а также с работой некоторых методов 21 | 22 | #Область ПрограммныйИнтерфейс 23 | 24 | // Возвращает текущую версию подсистемы 25 | // 26 | // Возвращаемое значение: 27 | // Строка - Версия подсистемы работы с буфером обмена 28 | Функция ВерсияПодсистемы() Экспорт 29 | Возврат "1.0.2"; 30 | КонецФункции 31 | 32 | // Возвращает объект компоненты работы с буфером обмена. Компонента должна быть предвариательно подключена. 33 | // При неподключенной компоненте вызовется исключение 34 | // 35 | // Возвращаемое значение: 36 | // ВнешняяКомпонентаОбъект - Объект внешней компоненты работы с буфером обмена. 37 | Функция ОбъектКомпоненты() Экспорт 38 | Возврат Новый ("AddIn." + ИдентификаторКомпоненты() + ".ClipboardControl"); 39 | КонецФункции 40 | 41 | #Область СинхронныеМетоды 42 | 43 | // Используются синхронные вызовы 44 | // Возвращает объект компоненты работы с буфером обмена. При необходимости происходит подключение и установка компоненты 45 | // 46 | // Возвращаемое значение: 47 | // ВнешняяКомпонентаОбъект - Объект внешней компоненты работы с буфером обмена 48 | // Неопределено - если не удалось подключить компоненту 49 | Функция КомпонентаРаботыСБуферомОбмена() Экспорт 50 | Попытка 51 | Компонента= ПроинициализироватьКомпоненту(Истина); 52 | 53 | Возврат Компонента; 54 | Исключение 55 | ТекстОшибки = НСтр( 56 | "ru = 'Не удалось подключить внешнюю компоненту для работы с буфером обмена. Подробности в журнале регистрации.'"); 57 | Сообщить(ТекстОшибки + ОписаниеОшибки()); 58 | Возврат Неопределено; 59 | КонецПопытки; 60 | КонецФункции 61 | 62 | // Возвращает версию компоненты работы с буфером обмена 63 | // 64 | // Параметры: 65 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект внешней компоненты работы с буфером обмена (Необязательный) 66 | // Возвращаемое значение: 67 | // Строка - Версия используемой компоненты 68 | Функция ВерсияКомпоненты(ОбъектКомпоненты = Неопределено) Экспорт 69 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 70 | 71 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 72 | 73 | Версия=ОбъектКомпоненты.Версия; 74 | 75 | Если ОчищатьКомпоненту Тогда 76 | ОбъектКомпоненты=Неопределено; 77 | КонецЕсли; 78 | 79 | Возврат Версия; 80 | КонецФункции 81 | 82 | // Очищает содержимое буфера обмена 83 | // 84 | // Параметры: 85 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект внешней компоненты работы с буфером обмена (Необязательный) 86 | Процедура ОчиститьБуферОбмена(ОбъектКомпоненты = Неопределено) Экспорт 87 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 88 | 89 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 90 | ОбъектКомпоненты.Очистить(); 91 | 92 | Если ОчищатьКомпоненту Тогда 93 | ОбъектКомпоненты=Неопределено; 94 | КонецЕсли; 95 | 96 | КонецПроцедуры 97 | 98 | // Помещает переданную картинку в буфер обмена 99 | // 100 | // Параметры: 101 | // Картинка- Картинка, ДвоичныеДанные , АдресВоВременномХранилище 102 | // Если передается как адресВоВременномХранилище тип во временном хоранилище должен быть или картинка или двоичные данные 103 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 104 | Процедура КопироватьКартинкуВБуфер(Картинка, ОбъектКомпоненты = Неопределено) Экспорт 105 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 106 | 107 | ТекКартинка=КартинкаДляКопированияВБуфер(Картинка); 108 | Если ТекКартинка = Неопределено Тогда 109 | Возврат; 110 | КонецЕсли; 111 | 112 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 113 | ОбъектКомпоненты.ЗаписатьКартинку(ТекКартинка); 114 | 115 | Если ОчищатьКомпоненту Тогда 116 | ОбъектКомпоненты=Неопределено; 117 | КонецЕсли; 118 | 119 | КонецПроцедуры 120 | 121 | // получает картинку из буфера обмена в формате PNG 122 | // 123 | // Параметры: 124 | // ВариантПолучения - Строка 125 | // Один из варинатов: 126 | // ДвоичныеДанные- получение двоичных данных картинки 127 | // Картинка- Преобразованное к типу "Картинка" содержание буфера 128 | // Адрес- Адрес двоичных данных картинки во временном хранилище 129 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 130 | // Возвращаемое значение: 131 | // ДвоичныеДанные,Картинка,Строка - картинка в запрощенном формате 132 | // Неопределено- если в буфере нет картинки 133 | Функция КартинкаИзБуфера(ВариантПолучения = "Картинка", ОбъектКомпоненты = Неопределено) Экспорт 134 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 135 | 136 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 137 | ДанныеКартинкиВБуфере=ОбъектКомпоненты.Картинка; 138 | 139 | Если ОчищатьКомпоненту Тогда 140 | ОбъектКомпоненты=Неопределено; 141 | КонецЕсли; 142 | 143 | Возврат КартинкаВНужномФорматеИзБуфера(ДанныеКартинкиВБуфере, ВариантПолучения); 144 | КонецФункции 145 | 146 | // Помещает переданную строку в буфер обмена 147 | // 148 | // Параметры: 149 | // СтрокаКопирования- Строка- Строка, которую необходимо поместить в буфер обмена 150 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 151 | Процедура КопироватьСтрокуВБуфер(СтрокаКопирования, ОбъектКомпоненты = Неопределено) Экспорт 152 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 153 | 154 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 155 | ОбъектКомпоненты.ЗаписатьТекст(СтрокаКопирования); 156 | 157 | Если ОчищатьКомпоненту Тогда 158 | ОбъектКомпоненты=Неопределено; 159 | КонецЕсли; 160 | 161 | КонецПроцедуры 162 | 163 | // получает текущую строку из буфера обмена 164 | // 165 | // Параметры: 166 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 167 | // Возвращаемое значение: 168 | // Строка - Текст, содержащийся в буфере обмена 169 | Функция ТекстИзБуфера(ОбъектКомпоненты = Неопределено) Экспорт 170 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 171 | 172 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 173 | 174 | ТекстБуфера=ОбъектКомпоненты.Текст; 175 | 176 | Если ОчищатьКомпоненту Тогда 177 | ОбъектКомпоненты=Неопределено; 178 | КонецЕсли; 179 | 180 | Возврат ТекстБуфера; 181 | 182 | КонецФункции 183 | 184 | // получает формат текущего значения из буфера обмена 185 | // 186 | // Параметры: 187 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 188 | // Возвращаемое значение: 189 | // Строка - Строка в формате JSON, содержащая описание формата содержимого буфера обмена 190 | Функция ФорматБуфераОбмена(ОбъектКомпоненты = Неопределено) Экспорт 191 | ОчищатьКомпоненту=ОбъектКомпоненты = Неопределено; 192 | 193 | ОбъектКомпоненты=ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты); 194 | 195 | ФорматБуфера=ОбъектКомпоненты.Формат; 196 | 197 | Если ОчищатьКомпоненту Тогда 198 | ОбъектКомпоненты=Неопределено; 199 | КонецЕсли; 200 | 201 | Возврат ФорматБуфера; 202 | КонецФункции 203 | 204 | #КонецОбласти 205 | 206 | #Область АсинхронныеМетоды 207 | 208 | // Начинает получение объекта внешней компоненты работы с буфером обмена. При необходимости будет произведено подключение и установка компоненты 209 | // 210 | // Параметры: 211 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 212 | //<ОбъектКомпоненты> – Объект компоненты работы с буфером обмена, Тип: ВнешняяКомпонентаОбъект. Неопределено- если не удалось подключить компоненту 213 | //<ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 214 | Процедура НачатьПолучениеКомпоненты(ОписаниеОповещения) Экспорт 215 | НачатьИнициализациюКомпоненты(ОписаниеОповещения, Истина); 216 | КонецПроцедуры 217 | 218 | // Начинает получение версии используемой компоненты работы с буфером обмена 219 | // 220 | // Параметры: 221 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 222 | // <ВерсияКомпоненты> – Версия используемой компоненты, Тип: Строка. Неопределено- если не удалось подключить компоненту 223 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 224 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 225 | Процедура НачатьПолучениеВерсииКомпоненты(ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 226 | Если ОбъектКомпоненты = Неопределено Тогда 227 | ДопПараметры=Новый Структура; 228 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 229 | 230 | НачатьПолучениеКомпоненты( 231 | Новый ОписаниеОповещения("НачатьПолучениеВерсииКомпонентыЗавершениеПолученияКомпоненты", ЭтотОбъект, 232 | ДопПараметры)); 233 | Иначе 234 | ОбъектКомпоненты.НачатьПолучениеВерсия(ОписаниеОповещения); 235 | КонецЕсли; 236 | КонецПроцедуры 237 | 238 | // Начинает очистку содержимого буфера обмена 239 | // 240 | // Параметры: 241 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 242 | // <РезультатОчистки> – Результат очистки, Тип: Булево. Неопределено- если не удалось подключить компоненту 243 | // <ПараметрыВызова> - Пустой массив 244 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 245 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 246 | Процедура НачатьОчисткуБуфераОбмена(ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 247 | ДопПараметры=Новый Структура; 248 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 249 | Если ОбъектКомпоненты = Неопределено Тогда 250 | НачатьПолучениеКомпоненты(Новый ОписаниеОповещения("НачатьОчисткуБуфераОбменаЗавершениеПолученияКомпоненты", 251 | ЭтотОбъект, ДопПараметры)); 252 | Иначе 253 | ОбъектКомпоненты.НачатьВызовОчистить( 254 | Новый ОписаниеОповещения("НачатьОчисткуБуфераОбменаЗавершениеВызоваМетодаКомпонента", ЭтотОбъект, 255 | ДопПараметры)); 256 | КонецЕсли; 257 | КонецПроцедуры 258 | 259 | // Начинает помещение картинку в буфер обмена 260 | // 261 | // Параметры: 262 | // Картинка 263 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 264 | // <Результат> – Результат установки картинки в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 265 | // <ПараметрыВызова> - Массив параметров вызова метода компоненты 266 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 267 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 268 | Процедура НачатьКопированиеКартинкиВБуфер(Картинка, ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 269 | Если ОбъектКомпоненты = Неопределено Тогда 270 | ДопПараметры=Новый Структура; 271 | ДопПараметры.Вставить("Картинка", Картинка); 272 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 273 | 274 | НачатьПолучениеКомпоненты( 275 | Новый ОписаниеОповещения("НачатьКопированиеКартинкиВБуферЗавершениеПолученияКомпоненты", ЭтотОбъект, 276 | ДопПараметры)); 277 | Иначе 278 | ТекКартинка=КартинкаДляКопированияВБуфер(Картинка); 279 | Если ТекКартинка = Неопределено Тогда 280 | Возврат; 281 | КонецЕсли; 282 | 283 | ОписаниеОповещенияВызоваМетодаКомпоненты = Новый ОписаниеОповещения("НачатьКопированиеКартинкиВБуферЗавершениеВыполненияМетодаКомпоненты", 284 | ЭтотОбъект, Новый Структура("ОписаниеОповещения", ОписаниеОповещения)); 285 | 286 | ОбъектКомпоненты.НачатьВызовЗаписатьКартинку(ОписаниеОповещенияВызоваМетодаКомпоненты, ТекКартинка); 287 | КонецЕсли; 288 | КонецПроцедуры 289 | 290 | // Начинает получение картинки из буфера обмена 291 | // 292 | // Параметры: 293 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 294 | // <ДанныеКартинки> – Данные картинки в запрошенном формате, Тип: Строка, ДвоичныеДанные, Картинка. Неопределено- если не удалось подключить компоненту или в буфере нет картинки 295 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 296 | // ВариантПолучения - Строка 297 | // Один из варинатов: 298 | // ДвоичныеДанные- получение двоичных данных картинки 299 | // Картинка- Преобразованное к типу "Картинка" содержание буфера 300 | // Адрес- Адрес двоичных данных картинки во временном хранилище 301 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 302 | Процедура НачатьПолучениеКартинкиИзБуфера(ОписаниеОповещения, ВариантПолучения = "Картинка", 303 | ОбъектКомпоненты = Неопределено) Экспорт 304 | ДопПараметры=Новый Структура; 305 | ДопПараметры.Вставить("ВариантПолучения", ВариантПолучения); 306 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 307 | 308 | Если ОбъектКомпоненты = Неопределено Тогда 309 | 310 | НачатьПолучениеКомпоненты( 311 | Новый ОписаниеОповещения("НачатьПолучениеКартинкиИзБуфераЗавершениеПолученияКомпоненты", ЭтотОбъект, 312 | ДопПараметры)); 313 | Иначе 314 | ОбъектКомпоненты.НачатьПолучениеКартинка(Новый ОписаниеОповещения("НачатьПолучениеКартинкиИзБуфераЗавершение", 315 | ЭтотОбъект, ДопПараметры)); 316 | КонецЕсли; 317 | КонецПроцедуры 318 | 319 | // Начинает помещение текста в буфер обмена 320 | // 321 | // Параметры: 322 | // СтрокаКопирования- Строка- Строка, которую необходимо поместить в буфер обмена 323 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 324 | // <Результат> – Результат установки текста в буфере обмена, Тип: Булево. Неопределено- если не удалось подключить компоненту 325 | // <ПараметрыВызова> - Массив параметров вызова метода компоненты 326 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 327 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 328 | Процедура НачатьКопированиеСтрокиВБуфер(СтрокаКопирования, ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 329 | Если ОбъектКомпоненты = Неопределено Тогда 330 | ДопПараметры=Новый Структура; 331 | ДопПараметры.Вставить("СтрокаКопирования", СтрокаКопирования); 332 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 333 | 334 | НачатьПолучениеКомпоненты( 335 | Новый ОписаниеОповещения("НачатьКопированиеСтрокиВБуферЗавершениеПолученияКомпоненты", ЭтотОбъект, 336 | ДопПараметры)); 337 | Иначе 338 | ДопПараметры=Новый Структура; 339 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 340 | 341 | ОбъектКомпоненты.НачатьВызовЗаписатьТекст( 342 | Новый ОписаниеОповещения("НачатьКопированиеСтрокиВБуферЗавершениеВызоваМетодаКомпоненты", ЭтотОбъект, 343 | ДопПараметры), СтрокаКопирования); 344 | КонецЕсли; 345 | КонецПроцедуры 346 | 347 | 348 | // Начинает получение текста из буфера обмена 349 | // 350 | // Параметры: 351 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 352 | // <Результат> – Текст из буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 353 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 354 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 355 | Процедура НачатьПолучениеСтрокиИзБуфера(ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 356 | ДопПараметры=Новый Структура; 357 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 358 | Если ОбъектКомпоненты = Неопределено Тогда 359 | 360 | НачатьПолучениеКомпоненты( 361 | Новый ОписаниеОповещения("НачатьПолучениеСтрокиИзБуфераЗавершениеПолученияКомпоненты", ЭтотОбъект, 362 | ДопПараметры)); 363 | Иначе 364 | ОбъектКомпоненты.НачатьПолучениеТекст( 365 | Новый ОписаниеОповещения("НачатьПолучениеСтрокиИзБуфераЗавершениеВызоваМетодаКомпоненты", ЭтотОбъект, 366 | ДопПараметры)); 367 | КонецЕсли; 368 | КонецПроцедуры 369 | 370 | 371 | // Начинает получение формата текущего значения в буфере обмена 372 | // 373 | // Параметры: 374 | // ОписаниеОповещения - ОписаниеОповещения - Содержит описание процедуры, которая будет вызвана после завершения со следующими параметрами: 375 | // <Результат> – Строка в формате JSON, содержащая описание формата содержимого буфера обмена, Тип: Строка. Неопределено- если не удалось подключить компоненту 376 | // <ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения. 377 | // ОбъектКомпоненты - ВнешняяКомпонентаОбъект - Объект компоненты работы с буфером обмена (Необязательный) 378 | Процедура НачатьПолучениеФорматаБуфераОбмена(ОписаниеОповещения, ОбъектКомпоненты = Неопределено) Экспорт 379 | ДопПараметры=Новый Структура; 380 | ДопПараметры.Вставить("ОписаниеОповещенияОЗавершении", ОписаниеОповещения); 381 | Если ОбъектКомпоненты = Неопределено Тогда 382 | НачатьПолучениеКомпоненты( 383 | Новый ОписаниеОповещения("НачатьПолучениеФорматаБуфераОбменаЗавершениеПолученияКомпоненты", ЭтотОбъект, 384 | ДопПараметры)); 385 | Иначе 386 | ОбъектКомпоненты.НачатьПолучениеФормат( 387 | Новый ОписаниеОповещения("НачатьПолучениеФорматаБуфераОбменаЗавершениеВызоваМетодаКомпоненты", ЭтотОбъект, 388 | ДопПараметры)); 389 | КонецЕсли; 390 | КонецПроцедуры 391 | 392 | #КонецОбласти 393 | 394 | #КонецОбласти 395 | 396 | #Область СлужебныйПрограммныйИнтерфейс 397 | 398 | Процедура НачатьИнициализациюКомпоненты(ОписаниеОповещения, ПопытатьсяУстановитьКомпоненту = Истина) Экспорт 399 | 400 | ДополнительныеПараметрыОповещения=Новый Структура; 401 | ДополнительныеПараметрыОповещения.Вставить("ОповещениеОЗавершении", ОписаниеОповещения); 402 | ДополнительныеПараметрыОповещения.Вставить("ПопытатьсяУстановитьКомпоненту", ПопытатьсяУстановитьКомпоненту); 403 | 404 | НачатьПодключениеВнешнейКомпоненты( 405 | Новый ОписаниеОповещения("НачатьПолучениеКомпонентыЗавершениеПодключенияКомпоненты", ЭтотОбъект, 406 | ДополнительныеПараметрыОповещения), ИмяМакетаКомпоненты(), ИдентификаторКомпоненты(), 407 | ТипВнешнейКомпоненты.Native); 408 | 409 | КонецПроцедуры 410 | 411 | Процедура НачатьПолучениеКомпонентыЗавершениеПодключенияКомпоненты(Подключено, ДополнительныеПараметры) Экспорт 412 | Если Подключено Тогда 413 | ОповещениеОЗавершении=ДополнительныеПараметры.ОповещениеОЗавершении; 414 | ВыполнитьОбработкуОповещения(ОповещениеОЗавершении, ОбъектКомпоненты()); 415 | ИначеЕсли ДополнительныеПараметры.ПопытатьсяУстановитьКомпоненту Тогда 416 | НачатьУстановкуВнешнейКомпоненты( 417 | Новый ОписаниеОповещения("НачатьПолучениеКомпонентыЗавершениеУстановкиКомпоненты", ЭтотОбъект, 418 | ДополнительныеПараметры), ИмяМакетаКомпоненты()); 419 | Иначе 420 | ОповещениеОЗавершении=ДополнительныеПараметры.ОповещениеОЗавершении; 421 | ВыполнитьОбработкуОповещения(ОповещениеОЗавершении, Неопределено); 422 | КонецЕсли; 423 | КонецПроцедуры 424 | 425 | Процедура НачатьПолучениеКомпонентыЗавершениеУстановкиКомпоненты(ДополнительныеПараметры) Экспорт 426 | НачатьИнициализациюКомпоненты(ДополнительныеПараметры.ОповещениеОЗавершении, Ложь); 427 | КонецПроцедуры 428 | 429 | Процедура НачатьПолучениеВерсииКомпонентыЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 430 | Если Результат = Неопределено Тогда 431 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 432 | Иначе 433 | НачатьПолучениеВерсииКомпоненты(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 434 | КонецЕсли; 435 | КонецПроцедуры 436 | 437 | Процедура НачатьОчисткуБуфераОбменаЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 438 | Если Результат = Неопределено Тогда 439 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 440 | Иначе 441 | НачатьОчисткуБуфераОбмена(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 442 | КонецЕсли; 443 | КонецПроцедуры 444 | 445 | Процедура НачатьОчисткуБуфераОбменаЗавершениеВызоваМетодаКомпонента(Результат, ПараметрыВызова, ДополнительныеПараметры) Экспорт 446 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 447 | КонецПроцедуры 448 | 449 | 450 | Процедура НачатьКопированиеКартинкиВБуферЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 451 | Если Результат = Неопределено Тогда 452 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 453 | Иначе 454 | НачатьКопированиеКартинкиВБуфер(ДополнительныеПараметры.Картинка, 455 | ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 456 | КонецЕсли; 457 | КонецПроцедуры 458 | 459 | Процедура НачатьКопированиеКартинкиВБуферЗавершениеВыполненияМетодаКомпоненты(Результат, ПараметрыВызова, 460 | ДополнительныеПараметры) Экспорт 461 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещения, Результат); 462 | КонецПроцедуры 463 | 464 | Процедура НачатьПолучениеКартинкиИзБуфераЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 465 | Если Результат = Неопределено Тогда 466 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 467 | Иначе 468 | НачатьПолучениеКартинкиИзБуфера(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, 469 | ДополнительныеПараметры.ВариантПолучения, Результат); 470 | КонецЕсли; 471 | КонецПроцедуры 472 | 473 | Процедура НачатьПолучениеКартинкиИзБуфераЗавершение(Результат, ДополнительныеПараметры) Экспорт 474 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, КартинкаВНужномФорматеИзБуфера( 475 | Результат, ДополнительныеПараметры.ВариантПолучения)); 476 | КонецПроцедуры 477 | 478 | Процедура НачатьКопированиеСтрокиВБуферЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 479 | Если Результат = Неопределено Тогда 480 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 481 | Иначе 482 | НачатьКопированиеСтрокиВБуфер(ДополнительныеПараметры.СтрокаКопирования, 483 | ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 484 | КонецЕсли; 485 | КонецПроцедуры 486 | 487 | 488 | Процедура НачатьКопированиеСтрокиВБуферЗавершениеВызоваМетодаКомпоненты(Результат,ПараметрыВызова, ДополнительныеПараметры) Экспорт 489 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 490 | КонецПроцедуры 491 | 492 | Процедура НачатьПолучениеСтрокиИзБуфераЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 493 | Если Результат = Неопределено Тогда 494 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 495 | Иначе 496 | НачатьПолучениеСтрокиИзБуфера(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 497 | КонецЕсли; 498 | КонецПроцедуры 499 | 500 | Процедура НачатьПолучениеСтрокиИзБуфераЗавершениеВызоваМетодаКомпоненты(Результат, ДополнительныеПараметры) Экспорт 501 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 502 | КонецПроцедуры 503 | 504 | Процедура НачатьПолучениеФорматаБуфераОбменаЗавершениеПолученияКомпоненты(Результат, ДополнительныеПараметры) Экспорт 505 | Если Результат = Неопределено Тогда 506 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Неопределено); 507 | Иначе 508 | НачатьПолучениеФорматаБуфераОбмена(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 509 | КонецЕсли; 510 | КонецПроцедуры 511 | 512 | Процедура НачатьПолучениеФорматаБуфераОбменаЗавершениеВызоваМетодаКомпоненты(Результат, ДополнительныеПараметры) Экспорт 513 | ВыполнитьОбработкуОповещения(ДополнительныеПараметры.ОписаниеОповещенияОЗавершении, Результат); 514 | КонецПроцедуры 515 | 516 | #КонецОбласти 517 | 518 | #Область СлужебныеПроцедурыИФункции 519 | 520 | // Текущая версия платформы1 с предприятие. 521 | // 522 | // Возвращаемое значение: 523 | // Строка - Текущая версия платформы 1С предприятие 524 | Функция ТекущаяВерсияПлатформы1СПредприятие() 525 | 526 | СистИнфо = Новый СистемнаяИнформация; 527 | Возврат СистИнфо.ВерсияПриложения; 528 | 529 | КонецФункции 530 | 531 | // Версия платформы не младше. 532 | // 533 | // Параметры: 534 | // ВерсияДляСравнения - Строка - Версия для сравнения 535 | // 536 | // Возвращаемое значение: 537 | // Булево - Версия платформы не младше 538 | Функция ВерсияПлатформыНеМладше(ВерсияДляСравнения) 539 | ВерсияБезСборки=ВерсияКонфигурацииБезНомераСборки(ТекущаяВерсияПлатформы1СПредприятие()); 540 | 541 | Возврат СравнитьВерсииБезНомераСборки(ВерсияБезСборки, ВерсияДляСравнения)>=0; 542 | КонецФункции 543 | 544 | // Получает номер версии конфигурации без номера сборки. 545 | // 546 | // Параметры: 547 | // Версия - Строка - версия конфигурации в формате РР.ПП.ЗЗ.СС, 548 | // где СС - номер сборки, который будет удален. 549 | // 550 | // Возвращаемое значение: 551 | // Строка - номер версии конфигурации без номера сборки в формате РР.ПП.ЗЗ. 552 | // 553 | Функция ВерсияКонфигурацииБезНомераСборки(Знач Версия) 554 | 555 | Массив = СтрРазделить(Версия, "."); 556 | 557 | Если Массив.Количество() < 3 Тогда 558 | Возврат Версия; 559 | КонецЕсли; 560 | 561 | Результат = "[Редакция].[Подредакция].[Релиз]"; 562 | Результат = СтрЗаменить(Результат, "[Редакция]", Массив[0]); 563 | Результат = СтрЗаменить(Результат, "[Подредакция]", Массив[1]); 564 | Результат = СтрЗаменить(Результат, "[Релиз]", Массив[2]); 565 | 566 | Возврат Результат; 567 | КонецФункции 568 | 569 | // Сравнить две строки версий. 570 | // 571 | // Параметры: 572 | // СтрокаВерсии1 - Строка - номер версии в формате РР.{П|ПП}.ЗЗ. 573 | // СтрокаВерсии2 - Строка - второй сравниваемый номер версии. 574 | // 575 | // Возвращаемое значение: 576 | // Число - больше 0, если СтрокаВерсии1 > СтрокаВерсии2; 0, если версии равны. 577 | // 578 | Функция СравнитьВерсииБезНомераСборки(Знач СтрокаВерсии1, Знач СтрокаВерсии2) 579 | 580 | Строка1 = ?(ПустаяСтрока(СтрокаВерсии1), "0.0.0", СтрокаВерсии1); 581 | Строка2 = ?(ПустаяСтрока(СтрокаВерсии2), "0.0.0", СтрокаВерсии2); 582 | Версия1 = СтрРазделить(Строка1, "."); 583 | Если Версия1.Количество() <> 3 Тогда 584 | ВызватьИсключение СтрШаблон(НСтр("ru = 'Неправильный формат параметра СтрокаВерсии1: %1'"), СтрокаВерсии1); 585 | КонецЕсли; 586 | Версия2 = СтрРазделить(Строка2, "."); 587 | Если Версия2.Количество() <> 3 Тогда 588 | ВызватьИсключение СтрШаблон(НСтр("ru = 'Неправильный формат параметра СтрокаВерсии2: %1'"), СтрокаВерсии2); 589 | КонецЕсли; 590 | 591 | Результат = 0; 592 | Для Разряд = 0 По 2 Цикл 593 | Результат = Число(Версия1[Разряд]) - Число(Версия2[Разряд]); 594 | Если Результат <> 0 Тогда 595 | Возврат Результат; 596 | КонецЕсли; 597 | КонецЦикла; 598 | Возврат Результат; 599 | 600 | КонецФункции 601 | 602 | Функция ИмяМакетаКомпоненты() 603 | Возврат "ОбщийМакет.БуферО_КомпонентаДляРаботыСБуферомОбмена"; 604 | КонецФункции 605 | 606 | Функция КартинкаДляКопированияВБуфер(Картинка) 607 | Если ТипЗнч(Картинка) = Тип("Строка") И ЭтоАдресВременногоХранилища(Картинка) Тогда 608 | 609 | ТекКартинка=ПолучитьИзВременногоХранилища(Картинка); 610 | Иначе 611 | ТекКартинка=Картинка; 612 | КонецЕсли; 613 | 614 | Если ТипЗнч(ТекКартинка) = Тип("Картинка") Тогда 615 | ДвоичныеДанные = ТекКартинка.ПолучитьДвоичныеДанные(); 616 | ИначеЕсли ТипЗнч(ТекКартинка) = Тип("ДвоичныеДанные") Тогда 617 | ДвоичныеДанные=ТекКартинка; 618 | Иначе 619 | Сообщить("Неверный тип картинки"); 620 | ДвоичныеДанные=Неопределено; 621 | КонецЕсли; 622 | 623 | Возврат ДвоичныеДанные; 624 | КонецФункции 625 | 626 | Функция КартинкаВНужномФорматеИзБуфера(ДанныеБуфера, ВариантПолучения) 627 | Если ТипЗнч(ДанныеБуфера) <> Тип("ДвоичныеДанные") Тогда 628 | Возврат Неопределено; 629 | КонецЕсли; 630 | 631 | Если НРег(ВариантПолучения) = "двоичныеданные" Тогда 632 | Возврат ДанныеБуфера; 633 | ИначеЕсли НРег(ВариантПолучения) = "адрес" Тогда 634 | Возврат ПоместитьВоВременноеХранилище(ДанныеБуфера); 635 | Иначе 636 | Возврат Новый Картинка(ДанныеБуфера); 637 | КонецЕсли; 638 | КонецФункции 639 | 640 | Функция ИдентификаторКомпоненты() 641 | Возврат "clipboard1c"; 642 | КонецФункции 643 | 644 | Функция ОбъектКомпонентыРаботыСБуферомОбмена(ОбъектКомпоненты = Неопределено) 645 | Если ОбъектКомпоненты = Неопределено Тогда 646 | Возврат КомпонентаРаботыСБуферомОбмена(); 647 | Иначе 648 | Возврат ОбъектКомпоненты; 649 | КонецЕсли; 650 | КонецФункции 651 | 652 | Функция ПроинициализироватьКомпоненту(ПопытатьсяУстановитьКомпоненту = Истина) 653 | 654 | ИмяМакетаКомпоненты=ИмяМакетаКомпоненты(); 655 | КодВозврата = ПодключитьВнешнююКомпоненту(ИмяМакетаКомпоненты, ИдентификаторКомпоненты(), 656 | ТипВнешнейКомпоненты.Native); 657 | 658 | Если Не КодВозврата Тогда 659 | 660 | Если Не ПопытатьсяУстановитьКомпоненту Тогда 661 | Возврат Ложь; 662 | КонецЕсли; 663 | 664 | УстановитьВнешнююКомпоненту(ИмяМакетаКомпоненты); 665 | 666 | Возврат ПроинициализироватьКомпоненту(Ложь); // Рекурсивно. 667 | 668 | КонецЕсли; 669 | 670 | Возврат ОбъектКомпоненты(); 671 | КонецФункции 672 | #КонецОбласти -------------------------------------------------------------------------------- /БуферОбмена1С/src/DataProcessors/БуферО_ТестоваяОбработка/Forms/Форма/Form.form: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | Формат 5 | 34 6 | true 7 | true 8 | 9 | true 10 | 11 | 12 | Формат 13 | 14 | 15 | ФорматРасширеннаяПодсказка 16 | 36 17 | true 18 | true 19 | 20 | true 21 | 22 | Label 23 | true 24 | true 25 | 26 | Left 27 | 28 | 29 | 30 | ФорматКонтекстноеМеню 31 | 35 32 | true 33 | true 34 | 35 | true 36 | 37 | true 38 | 39 | InputField 40 | Enter 41 | true 42 | Left 43 | true 44 | 45 | true 46 | true 47 | true 48 | true 49 | true 50 | true 51 | 52 | 53 | 54 | ГруппаСтраницыФормы 55 | 6 56 | 57 | ГруппаСтраницыТекст 58 | 8 59 | 60 | ГруппаКомандыТекстаБуфера 61 | 13 62 | 63 | ПолучитьТекстИзБуфера 64 | 17 65 | true 66 | true 67 | 68 | true 69 | 70 | 71 | ПолучитьТекстИзБуфераРасширеннаяПодсказка 72 | 18 73 | true 74 | true 75 | 76 | true 77 | 78 | Label 79 | true 80 | true 81 | 82 | Left 83 | 84 | 85 | Form.Command.ПолучитьТекстИзБуфера 86 | Auto 87 | true 88 | true 89 | UserCmds 90 | Auto 91 | 92 | 93 | УстановитьТекстВБуфере 94 | 19 95 | true 96 | true 97 | 98 | true 99 | 100 | 101 | УстановитьТекстВБуфереРасширеннаяПодсказка 102 | 20 103 | true 104 | true 105 | 106 | true 107 | 108 | Label 109 | true 110 | true 111 | 112 | Left 113 | 114 | 115 | Form.Command.УстановитьТекстВБуфере 116 | Auto 117 | true 118 | true 119 | UserCmds 120 | Auto 121 | 122 | true 123 | true 124 | 125 | true 126 | 127 | 128 | Группа1РасширеннаяПодсказка2 129 | 14 130 | true 131 | true 132 | 133 | true 134 | 135 | Label 136 | true 137 | true 138 | 139 | Left 140 | 141 | 142 | CommandBar 143 | 144 | Left 145 | 146 | 147 | 148 | ТекстБуфера 149 | 10 150 | true 151 | true 152 | 153 | true 154 | 155 | 156 | ТекстБуфера 157 | 158 | 159 | РасширеннаяПодсказка 160 | 12 161 | true 162 | true 163 | 164 | true 165 | 166 | Label 167 | true 168 | true 169 | 170 | Left 171 | 172 | 173 | 174 | КонтекстноеМеню 175 | 11 176 | true 177 | true 178 | 179 | true 180 | 181 | true 182 | 183 | InputField 184 | Enter 185 | true 186 | Left 187 | true 188 | 189 | true 190 | true 191 | true 192 | true 193 | true 194 | true 195 | true 196 | 197 | 198 | true 199 | true 200 | 201 | true 202 | 203 | 204 | <key>ru</key> 205 | <value>Текст</value> 206 | 207 | 208 | Группа1РасширеннаяПодсказка1 209 | 9 210 | true 211 | true 212 | 213 | true 214 | 215 | Label 216 | true 217 | true 218 | 219 | Left 220 | 221 | 222 | Page 223 | 224 | Vertical 225 | true 226 | 227 | 228 | 229 | ГруппаСтраницаКартинка 230 | 21 231 | 232 | ГруппаКомандыКартинкаБуфера 233 | 26 234 | 235 | КартинкаИзБуфераВВидеКартинки 236 | 45 237 | true 238 | true 239 | 240 | true 241 | 242 | 243 | КартинкаИзБуфераВВидеКартинкиРасширеннаяПодсказка 244 | 46 245 | true 246 | true 247 | 248 | true 249 | 250 | Label 251 | true 252 | true 253 | 254 | Left 255 | 256 | 257 | Form.Command.КартинкаИзБуфераВВидеКартинки 258 | Auto 259 | true 260 | true 261 | UserCmds 262 | Auto 263 | 264 | 265 | КартинкаИзБуфера 266 | 28 267 | true 268 | true 269 | 270 | true 271 | 272 | 273 | КартинкаИзБуфераРасширеннаяПодсказка 274 | 29 275 | true 276 | true 277 | 278 | true 279 | 280 | Label 281 | true 282 | true 283 | 284 | Left 285 | 286 | 287 | Form.Command.КартинкаИзБуфера 288 | Auto 289 | true 290 | true 291 | UserCmds 292 | Auto 293 | 294 | 295 | СкопироватьКартинкуВБуфер 296 | 30 297 | true 298 | true 299 | 300 | true 301 | 302 | 303 | СкопироватьКартинкуВБуферРасширеннаяПодсказка 304 | 31 305 | true 306 | true 307 | 308 | true 309 | 310 | Label 311 | true 312 | true 313 | 314 | Left 315 | 316 | 317 | Form.Command.СкопироватьКартинкуВБуфер 318 | Auto 319 | true 320 | true 321 | UserCmds 322 | Auto 323 | 324 | 325 | УстановитьКартнкуИзФайла 326 | 32 327 | true 328 | true 329 | 330 | true 331 | 332 | 333 | УстановитьКартнкуИзФайлаРасширеннаяПодсказка 334 | 33 335 | true 336 | true 337 | 338 | true 339 | 340 | Label 341 | true 342 | true 343 | 344 | Left 345 | 346 | 347 | Form.Command.УстановитьКартнкуИзФайла 348 | Auto 349 | true 350 | true 351 | UserCmds 352 | Auto 353 | 354 | true 355 | true 356 | 357 | true 358 | 359 | 360 | Группа1РасширеннаяПодсказка4 361 | 27 362 | true 363 | true 364 | 365 | true 366 | 367 | Label 368 | true 369 | true 370 | 371 | Left 372 | 373 | 374 | CommandBar 375 | 376 | Left 377 | 378 | 379 | 380 | АдресКартинки 381 | 23 382 | true 383 | true 384 | 385 | true 386 | 387 | 388 | АдресКартинки 389 | 390 | 391 | ПолеРасширеннаяПодсказка 392 | 25 393 | true 394 | true 395 | 396 | true 397 | 398 | Label 399 | true 400 | true 401 | 402 | Left 403 | 404 | 405 | 406 | ПолеКонтекстноеМеню 407 | 24 408 | true 409 | true 410 | 411 | true 412 | 413 | true 414 | 415 | PictureField 416 | Enter 417 | true 418 | Left 419 | true 420 | 421 | true 422 | true 423 | true 424 | true 425 | 426 | 427 | 428 | КартинкаТест 429 | 42 430 | true 431 | true 432 | 433 | true 434 | 435 | 436 | КартинкаТест 437 | 438 | 439 | КартинкаТестРасширеннаяПодсказка 440 | 44 441 | true 442 | true 443 | 444 | true 445 | 446 | Label 447 | true 448 | true 449 | 450 | Left 451 | 452 | 453 | 454 | КартинкаТестКонтекстноеМеню 455 | 43 456 | true 457 | true 458 | 459 | true 460 | 461 | true 462 | 463 | PictureField 464 | Enter 465 | true 466 | Left 467 | true 468 | 469 | true 470 | true 471 | true 472 | true 473 | 474 | 475 | true 476 | true 477 | 478 | true 479 | 480 | 481 | <key>ru</key> 482 | <value>Картинка</value> 483 | 484 | 485 | Группа1РасширеннаяПодсказка3 486 | 22 487 | true 488 | true 489 | 490 | true 491 | 492 | Label 493 | true 494 | true 495 | 496 | Left 497 | 498 | 499 | Page 500 | 501 | Vertical 502 | true 503 | 504 | 505 | true 506 | true 507 | 508 | true 509 | 510 | 511 | Группа1РасширеннаяПодсказка 512 | 7 513 | true 514 | true 515 | 516 | true 517 | 518 | Label 519 | true 520 | true 521 | 522 | Left 523 | 524 | 525 | Pages 526 | 527 | TabsOnTop 528 | DontUse 529 | 530 | 531 | 532 | ВерсияКомпоненты 533 | 39 534 | true 535 | true 536 | 537 | true 538 | 539 | 540 | ВерсияКомпоненты 541 | 542 | 543 | ВерсияКомпонентыРасширеннаяПодсказка 544 | 41 545 | true 546 | true 547 | 548 | true 549 | 550 | Label 551 | true 552 | true 553 | 554 | Left 555 | 556 | 557 | 558 | ВерсияКомпонентыКонтекстноеМеню 559 | 40 560 | true 561 | true 562 | 563 | true 564 | 565 | true 566 | 567 | LabelField 568 | Enter 569 | true 570 | Left 571 | true 572 | 573 | true 574 | true 575 | 576 | 577 | 578 | ФормаКоманднаяПанель 579 | -1 580 | 581 | ФормаОчиститьБуфер 582 | 15 583 | true 584 | true 585 | 586 | true 587 | 588 | 589 | ФормаОчиститьБуферРасширеннаяПодсказка 590 | 16 591 | true 592 | true 593 | 594 | true 595 | 596 | Label 597 | true 598 | true 599 | 600 | Left 601 | 602 | 603 | Form.Command.ОчиститьБуфер 604 | Auto 605 | true 606 | true 607 | UserCmds 608 | Auto 609 | 610 | 611 | ФормаФорматБуфераОбмена 612 | 37 613 | true 614 | true 615 | 616 | true 617 | 618 | 619 | ФормаФорматБуфераОбменаРасширеннаяПодсказка 620 | 38 621 | true 622 | true 623 | 624 | true 625 | 626 | Label 627 | true 628 | true 629 | 630 | Left 631 | 632 | 633 | Form.Command.ФорматБуфераОбмена 634 | Auto 635 | true 636 | true 637 | UserCmds 638 | Auto 639 | 640 | true 641 | true 642 | 643 | true 644 | 645 | Left 646 | true 647 | 648 | 649 | OnOpen 650 | ПриОткрытии 651 | 652 | 653 | OnCreateAtServer 654 | ПриСозданииНаСервере 655 | 656 | true 657 | true 658 | Vertical 659 | true 660 | true 661 | true 662 | true 663 | true 664 | 665 | Объект 666 | 1 667 | 668 | DataProcessorObject.БуферО_ТестоваяОбработка 669 | 670 | 671 | true 672 | 673 | 674 | true 675 | 676 |
true
677 | 678 | 679 | ТекстБуфера 680 | 2 681 | 682 | String 683 | 684 | 685 | 686 | true 687 | 688 | 689 | true 690 | 691 | 692 | 693 | АдресКартинки 694 | 3 695 | 696 | String 697 | 698 | 699 | 700 | true 701 | 702 | 703 | true 704 | 705 | 706 | 707 | Формат 708 | 709 | <key>ru</key> 710 | <value>Формат</value> 711 | 712 | 4 713 | 714 | String 715 | 716 | 717 | 718 | true 719 | 720 | 721 | true 722 | 723 | 724 | 725 | ВерсияКомпоненты 726 | 727 | <key>ru</key> 728 | <value>Версия компоненты</value> 729 | 730 | 5 731 | 732 | String 733 | 734 | 735 | 736 | true 737 | 738 | 739 | true 740 | 741 | 742 | 743 | КартинкаТест 744 | 745 | <key>ru</key> 746 | <value>Картинка тест</value> 747 | 748 | 6 749 | 750 | Picture 751 | 752 | 753 | true 754 | 755 | 756 | true 757 | 758 | 759 | 760 | КартинкаИзБуфера 761 | 762 | <key>ru</key> 763 | <value>Картинка из буфера</value> 764 | 765 | 1 766 | 767 | true 768 | 769 | 770 | 771 | КартинкаИзБуфера 772 | 773 | 774 | Auto 775 | 776 | 777 | ПолучитьТекстИзБуфера 778 | 779 | <key>ru</key> 780 | <value>Получить текст из буфера</value> 781 | 782 | 2 783 | 784 | true 785 | 786 | 787 | 788 | ПолучитьТекстИзБуфера 789 | 790 | 791 | Auto 792 | 793 | 794 | ОчиститьБуфер 795 | 796 | <key>ru</key> 797 | <value>Очистить буфер</value> 798 | 799 | 3 800 | 801 | true 802 | 803 | 804 | 805 | ОчиститьБуфер 806 | 807 | 808 | Auto 809 | 810 | 811 | УстановитьТекстВБуфере 812 | 813 | <key>ru</key> 814 | <value>Установить текст в буфере</value> 815 | 816 | 4 817 | 818 | true 819 | 820 | 821 | 822 | УстановитьТекстВБуфере 823 | 824 | 825 | Auto 826 | 827 | 828 | СкопироватьКартинкуВБуфер 829 | 830 | <key>ru</key> 831 | <value>Скопировать картинку в буфер</value> 832 | 833 | 5 834 | 835 | true 836 | 837 | 838 | 839 | СкопироватьКартинкуВБуфер 840 | 841 | 842 | Auto 843 | 844 | 845 | УстановитьКартнкуИзФайла 846 | 847 | <key>ru</key> 848 | <value>Установить картинку из файла</value> 849 | 850 | 6 851 | 852 | true 853 | 854 | 855 | 856 | УстановитьКартнкуИзФайла 857 | 858 | 859 | Auto 860 | 861 | 862 | ФорматБуфераОбмена 863 | 864 | <key>ru</key> 865 | <value>Формат буфера обмена</value> 866 | 867 | 7 868 | 869 | true 870 | 871 | 872 | 873 | ФорматБуфераОбмена 874 | 875 | 876 | Auto 877 | 878 | 879 | КартинкаИзБуфераВВидеКартинки 880 | 881 | <key>ru</key> 882 | <value>Картинка из буфера в виде картинки</value> 883 | 884 | 8 885 | 886 | true 887 | 888 | 889 | 890 | КартинкаИзБуфераВВидеКартинки 891 | 892 | 893 | Auto 894 | 895 | 896 | 897 | 898 | 899 | 900 | 901 | --------------------------------------------------------------------------------