• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

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

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

Alexis

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

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

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

vitfil

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

Alexis

Ошибка такая:

{Форма.Форма(4)}: Метод объекта не обнаружен (Setdata)
Объект.ParentWindow.ClipboardData.Setdata("Text", Текст);
 
A

Allexei

А интересного в этой задачке то что можно создать "супер загрузку из ексель". Копируем в буфер обмена таблицу из екселя в 1с получаем ее и делаем разбор полей. На все про все одна кнопка :) Мечта любого пользователя.
 
Д

Дайнеко

* А не может спустя время буфер закакаться чем-то нетекстовым?
* А что если его очищать после использования?
 
Мы в соцсетях:

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