|
|
УФ. скопировать в буфер обмена
|
|
0
Wobland
15.04.13
✎
14:15
|
нагуглилось два варианта:
ВариантРаз:
Элементы.ПолеHTMLДокумента.Документ.parentWindow.ClipboardData.SetData("Text", "Йо!");
ВариантДва:
WScript=Новый COMОбъект("WScript.Shell");
clipboardHelper=WScript.CreateObject("ClipboardHelper.Clipboard");
clipboardHelper.SetClipboardText("Йо!");
первый вариант работает только при видимости ПоляХТМЛ, второй ругается, что не знает CreateObject. вопрос: как скопировать произвольный текст в буфер обмена?
|
|
|
1
Wobland
15.04.13
✎
14:26
|
и третий работающий, но работающий "через назад" вариант:
ie=Новый COMОбъект("internetexplorer.application");
ie.navigate("about:blank");
Док=ie.document;
Док.ParentWindow.ClipboardData.clearData();
стр="Готово";
Док.ParentWindow.ClipboardData.SetData("Text",стр);
что делать?
|
|
|
2
Dethmont
15.04.13
✎
15:02
|
Функция ПолучитьТекстБуфераОбмена() Экспорт
#Если Клиент Тогда
Объект = Новый COMОбъект("htmlfile");
Возврат Объект.ParentWindow.ClipboardData.Getdata("Text");
#КонецЕсли
КонецФункции
Функция УстановитьТекстВБуферОбмена(Текст) Экспорт
#Если Клиент Тогда
Объект = Новый COMОбъект("htmlfile");
Объект.ParentWindow.ClipboardData.Setdata("Text", Текст);
Возврат Текст;
#КонецЕсли
КонецФункции
Отсюда
|
|
|
3
Wobland
15.04.13
✎
17:33
|
(2) спасибо, опробую, но уже завтра
|
|
|
4
Wobland
16.04.13
✎
06:21
|
да, с htmlfile взлетело, спасибо
|
|
|
5
Dethmont
16.04.13
✎
15:46
|
Спасибо слишком много!
Сто рублей - достаточно!
|
|
|
6
Wobland
16.04.13
✎
17:44
|
(5)
|
|