Перезапустил Турбоконф после первого зависания. Вызвал команду и опять заблокировался ввод навсегда. Убийство COM процесса не помогает. Только перезапуск Турбокнофа устраяет проблему. На другом компьютере тот же скрипт работает без проблем.
Процедура ОтладитьОбъект()
ТребоватьОтложеннуюОтладку = "Ложь";
ПодключениеИР = ПодключениеИР();
Если ПодключениеИР = Неопределено Тогда
Возврат;
КонецЕсли;
ЦелевойЗаголовок = "Выражение";
ТекстПоля = "";
Если ТурбоКонф.ПолучитьЗаголовокТекущегоОкна() <> ЦелевойЗаголовок Тогда
Если ОткрытьОкноВыражения(, ТекстПоля) = Неопределено Тогда
ТурбоКонф.ПоказатьВсплывающееУведомление(НазваниеСкрипта(), СтрШаблон("Команда применима только в редакторе модуля во время остановки отладки и в окне ""%1""", ЦелевойЗаголовок));
Возврат;
КонецЕсли;
КонецЕсли;
СтароеЗначениеБуфераОбмена = ТурбоКонф.ПолучитьБуферОбмена();
МодулиИР = МодулиИР(ПодключениеИР);
БазоваяФормаИР = МодулиИР.ирКлиент.ПолучитьФормуЛкс("Обработка.ирПортативный.Форма.Форма");
ШаблонВызова = БазоваяФормаИР.ПолучитьВычисляемыйКонтекстОтладчика();
ТекстВызова = СтрЗаменить(ШаблонВызова, "*()", "От");
// ТекстыЯчеек = ТурбоКонф.ПолучитьЭлементыСписка(); // Нельзя тут вызывать, т.к. оно снимает выделение в поле ввода
Если ПустаяСтрока(ТекстПоля) Тогда
ТекстПоля = ТурбоКонф.ПолучитьЗначение();
КонецЕсли;
Если Не СтрНачинаетсяС(ТекстПоля, ТекстВызова) Тогда
Выражение = ТекстВызова + "(" + ТекстПоля + ",,, " + ТребоватьОтложеннуюОтладку + ")";
ТурбоКонф.ВставитьТекст(Выражение);
#1, 16 октября 2023 22:03
Проблема актуальна?
#2, 16 октября 2023 22:04
нет
#3, 16 октября 2023 22:04
bolsun изменил статус на Закрыто