1с и буфер обмена

  • Автор темы Автор темы Alexis
  • Дата начала Дата начала
A

Alexis

Доброго времени суток!
Есть одна интересная задача - в обработке для 1С 8.1 надо написать процедуру, которая бы при двойном щелчке по надписи в окне копировало бы текст надписи в буфер обмена. Эта процедура должна работать с минимальными правами. Я попробовал вот это:

Процедура ВставитьТекстВБуферОбмена(СодержимоеВБуферОбмена) Экспорт
#Если Клиент Тогда
Если (ТипЗнч(СодержимоеВБуферОбмена) = Тип("Строка")) И (СокрЛП(СодержимоеВБуферОбмена) <> "") Тогда
Объект = Новый COMОбъект("htmlfile");
Объект.ParentWindow.ClipboardData.Setdata("Text", СодержимоеВБуферОбмена);
КонецЕсли;
#КонецЕсли
КонецПроцедуры

Почему-то эта процедура срабатывает два-три раза, а потом начинает выдавать ошибку. после выхода и повторного входа в обработку проблема исчезает, и снова появляется через несколько срабатываний. Как это исправить?
 
Для начала расскажите, что интересного в этой задачке? После - потрудитесь сообщить, какая именно ошибка у вас возникает.
 
Ошибка такая:

{Форма.Форма(4)}: Метод объекта не обнаружен (Setdata)
Объект.ParentWindow.ClipboardData.Setdata("Text", Текст);
 
А интересного в этой задачке то что можно создать "супер загрузку из ексель". Копируем в буфер обмена таблицу из екселя в 1с получаем ее и делаем разбор полей. На все про все одна кнопка :) Мечта любого пользователя.
 
* А не может спустя время буфер закакаться чем-то нетекстовым?
* А что если его очищать после использования?
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!