Код

Процедура ScintillaControlOnCharAdded(control,ch)
	Перем curPos,НомПредСтр,ПредСтр,ПервСимволПред,ПозПервСимвола,ПредОтступ,ПервоеСлово;
	Если ch=10 Тогда //делаем Авто-Отступ (Auto-Indent)
		curPos = control.GetCurrentPos();
		НомПредСтр=control.LineFromPosition(curPos-1);
		ПредСтр=СтрПолучитьСтроку(control.GetLine(НомПредСтр),1);
		Если СокрЛП(ПредСтр)="" Тогда
			ПредОтступ  = ПредСтр;
		Иначе
			//Вычленяем отступ предыдущей строки
			ПервСимволПред = Лев(СокрЛП(ПредСтр),1);
			ПозПервСимвола = Найти(ПредСтр,ПервСимволПред);
			ПредОтступ  = Лев(ПредСтр,ПозПервСимвола-1);
			ПервоеСлово = СловоПоНомеру(СокрЛП(ПредСтр),1); //Здесь используется наша функция по вырезанию нужного слова. Можно убрать это и проверку ниже.
			Если найти("для|если|процедура|функция||",Нрег(ПервоеСлово))<>0 Тогда
				ПредОтступ=ПредОтступ+СимволТабуляции;
			КонецЕсли;
		КонецЕсли;
		control.ADDTEXT(стрДлина(ПредОтступ),ПредОтступ); //Вставим в начало отступ
	КонецЕсли;
	Если ch = 46 Тогда // Попытка разобратся, как делать подсказки после точки
		//control.CALLTIPSHOW(1,"Привет"); //Показывается всплывающая подсказка
		//sci.SetKeyWords(0, "select as from on where group having order by asc desc insert values into update set delete limit union"); //ключевые слова
		//control.AUTOCSHOW(0,"AS ASC BY DELETE DESC FROM GROUP HAVING INSERT INTO LIMIT ORDER SELECT UNION UPDATE VALUES WHERE"); // это автозавершение
		//Сообщить("Можем показать подсказку");
		//здесь делаем подсказку
	КонецЕсли;
КонецПроцедуры