OberonCore https://forum.oberoncore.ru/ |
|
#038 Мелкая поправка в редактор https://forum.oberoncore.ru/viewtopic.php?f=134&t=6657 |
Страница 1 из 1 |
Автор: | adimetrius [ Воскресенье, 27 Сентябрь, 2020 14:29 ] |
Заголовок сообщения: | #038 Мелкая поправка в редактор |
Коллеги, есть удобная команда Text->Shift right, она добавляет по табулятору в начало каждой выделенной строки. Но есть у нее одно раздражающее свойство: табулятор добавляется не с теми атрибутами, которые в тексте, а с дефолтными, из системных настроек. И вот были у меня строчки помельче, нажимаю Text->Shift right, - и строчки подрастают, и ширина, кстати, табуляторов тоже не совпадает с остальным текстом, и потому левая граница буков съезжает. Прям ад. Предлагаю подлечить вот так, чтобы брала атрибуты из того места, в которое вставляет табулятор: PROCEDURE TextCmds.DoShift писал(а): wr.SetPos(pos); IF rd.attr # NIL THEN wr.SetAttr(rd.attr) END; (это единственная в модуле строка с wr.SetPos). Чтец rd уже есть в процедуре, и он как раз на нужном месте позиционирован. |
Автор: | Иван Денисов [ Воскресенье, 27 Сентябрь, 2020 19:05 ] |
Заголовок сообщения: | Re: #038 Мелкая поправка в редактор |
Идея правильная. Давайте сделаем. Нет возражений? |
Автор: | Info21 [ Воскресенье, 27 Сентябрь, 2020 20:34 ] |
Заголовок сообщения: | Re: #038 Мелкая поправка в редактор |
Идея правильная, щитаю. |
Автор: | Alexander Shiryaev [ Среда, 30 Сентябрь, 2020 16:48 ] |
Заголовок сообщения: | Re: #038 Мелкая поправка в редактор |
✓ |
Автор: | Иван Денисов [ Вторник, 06 Октябрь, 2020 04:32 ] |
Заголовок сообщения: | Re: #038 Мелкая поправка в редактор |
Антон добавил изменения в версию 1.8 альфа. https://blackbox.oberon.org/unstable/de ... a1.039.zip |
Автор: | Info21 [ Вторник, 06 Октябрь, 2020 17:45 ] |
Заголовок сообщения: | Re: #038 Мелкая поправка в редактор |
Три танкиста )) |
Страница 1 из 1 | Часовой пояс: UTC + 3 часа |
Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |