Заметки программиста 1С: Работа с буфером обмена Windows из 1С
В этой заметке приведен программный код для работы с буфером обмена Windows.
Всем разработчикам 1С известно, что напрямую 1С с буером обмена Windows не работает, поэтому приходится использовать обходные пути. Одним из таких путей является создание на клиентской стороне COM-объекта «HTMLFile», и работа с буфером обмена идет через него. Код такого варианта работы здесь и приведен.
Для Обычного приложения:
Процедура ЗаписатьТекстВБуферОбмена (пСтрока)
#Если Клиент Тогда
хОбъект = Новый COMОбъект(«htmlfile»);
хОбъект.ParentWindow.ClipboardData.Setdata(«Text», пСтрока);
Возврат;
#КонецЕсли
КонецПроцедуры
Функция ПолучитьТекстИзБуфераОбмена ()
Результат = Неопределено;
#Если Клиент Тогда
хОбъект = Новый COMОбъект(«htmlfile»);
Результат = хОбъект.ParentWindow.ClipboardData.Getdata(«Text»);
#КонецЕсли
Возврат Результат;
КонецФункции
Для Управляемого приложения:
&НаКлиенте
Процедура ЗаписатьТекстВБуферОбмена (пСтрока)
хОбъект = Новый COMОбъект(«htmlfile»);
хОбъект.ParentWindow.ClipboardData.Setdata(«Text», пСтрока);
Возврат;
КонецПроцедуры
&НаКлиенте
Функция ПолучитьТекстИзБуфераОбмена ()
Результат = Неопределено;
хОбъект = Новый COMОбъект(«htmlfile»);
Результат = хОбъект.ParentWindow.ClipboardData.Getdata(«Text»);
Возврат Результат;
КонецФункции