JohnyDeath писал(а) 27. Ноября 2008 :: 08:55:



Неееее... погоди так дело не пойдет. Во-первых я используюю dll и создаю через метод объекта Форма - СоздатьЭлементУправления. Во вторых у меня класс является наследником от объекта Scintilla и соответственно его инициализация выглядит так

ОбъектScintilla = ОбъектФорма.СоздатьЭлементУправления(я(),ИдентификаторКонтейнера); 

А вот теперь пожалуйста скажи у кого из представленных здесь объектов есть метод УстановитьФокус. У ОбъектScintilla - точно нет. У объекта "Форма" я тоже не знаю. Ну и я() тоже не знает что это такое.

И кстати если уж возвращать фокус то в какую позицию? Хотя ее в принципе можно рассчитать... о...мысль... пошел проверять. 

vandalsvq писал(а) 27. Ноября 2008 :: 12:14:

1. ИМХо не я(), а вирт() надежнее.
И вирт() должен знать об "УстановитьФокус".
2. "у меня класс является наследником от объекта Scintilla"
Это как?
Напиши полную строку определения класса - точнее, дай его ВСЕ базовые классы. Наверняка ведь там есть АктивИкс

Однако проблема не решена. Стоит только активизировать другой контрол (например на форме есть еще АктивИкс - дерево) и после выбора в Scintill-е фокусироваться будет уже на дереве...
в общем помогите плиз... как-то парит постоянно мышкой после подсказки тыкать.  

В общем прошу всех меня извинить за тутошние посты. Я немного затупил. Дело в том что активизация ТП - Активизировать(Идентификатор) - это мне давно известно... но чтобы активизировать объект Scintilla надо ставить флаг редактирования = 1. Т.е. активизировать(ИДКонтрола,1).... вот так вот...
Простите меня 

А Телепат к контролу никак не подключается?

Для подсветки выделенного текста сделал процедуру:

Процедура ВыделитьПоТексту()
	Перем ТекстВыделения,ТекПозиция,НачПоз,Рез,ДлТекстаВыделения,ДлВсегоТекста;
	ТекстВыделения=sci.GetSelText();
	Если ПустаяСтрока(ТекстВыделения)=1 Тогда Возврат; КонецЕсли;
	ДлВсегоТекста=СтрДлина(sci.Text);
	ДлТекстаВыделения=СтрДлина(ТекстВыделения);
	SCI.INDICSETSTYLE(0,7);
	SCI.INDICSETFORE(0, RGB(155,155,255));
	SCI.INDICSETUNDER(0,1);
	SCI.SETINDICATORCURRENT(0);

	ТекПозиция=SCI.GETCURRENTPOS();
	Рез=0;НачПоз=0;
	Пока Рез<>-1 Цикл
		SCI.SETTARGETSTART(НачПоз);
		SCI.SETTARGETEND(ДлВсегоТекста);
		Рез=sci.SEARCHINTARGET(ДлТекстаВыделения,ТекстВыделения);
 		Если Рез=-1 Тогда Возврат;КонецЕсли;
		НачПоз=Рез+ДлТекстаВыделения;
		Если ТекПозиция=НачПоз Тогда Продолжить;КонецЕсли;
		SCI.INDICATORFILLRANGE(Рез,ДлТекстаВыделения);
	КонецЦикла;
КонецПроцедуры
 

Эту процедуру я вызываю в событии OnUpdateUI контрола ScintillaControl:

Процедура ScintillaControlOnUpdateUI(control)
.....
	SCI.INDICATORCLEARRANGE(0,СтрДлина(sci.Text)); //Убираем подсветку всех выделений
	ВыделитьПоТексту();
......
 

Цвет выделения устанавливается в настройках SCI:

	SCI.SETSELBACK(1,0);
	SCI.SETSELFORE(1,65535); 

скрин