Каталог решений - Выделение строк мышкой (УФ)

У меня возникла необходимость выделять несколько строк без использования клавиш Shift или Ctrl, только при помощи мышки.

Я реализовал этот способ при помощи события перетаскивания. 

&НаКлиенте
Процедура НашаТаблицаПроверкаПеретаскивания(Элемент, ПараметрыПеретаскивания, СтандартнаяОбработка, Строка, Поле)
	СтандартнаяОбработка	=	Ложь;
	Элементы.ПлатежныеПоручения.ВыделенныеСтроки.Добавить(Строка);
	Элементы.ПлатежныеПоручения.Обновить();         
КонецПроцедуры

Следующий способ обрабатывается быстрей, но я не смог убрать окошко сообщений. Способ имитации Ctrl+Shift+Z не сработал.

&НаКлиенте
Процедура ПлатежныеПорученияПроверкаПеретаскивания(Элемент, ПараметрыПеретаскивания, СтандартнаяОбработка, Строка, Поле)
	СтандартнаяОбработка	=	Ложь;
	Сообщить("");
	Элементы.ПлатежныеПоручения.ВыделенныеСтроки.Добавить(Строка);         
КонецПроцедуры