mozers
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: -- Смена текущих установок шрифта -- C блеском заменяет Ctrl+F11. -- Действует одновременно на все отрытые буфера, циклически переключая заданные наборы шрифтов -- Можно задать любое количество комбинаций шрифтов -- mozers, codewarlock1101 -- Для подключения добавьте в свой файл .properties наборы необходимых шрифтов (font.0.*, font.1.*, font.2.*,...) ------------------------------------------------ local function FontChange() if props["font.set"]=="" then props["font.set"]="0" end local nxt_font=string.char(string.byte(props["font.set"])+1) if props["font."..nxt_font..".base"]=="" then nxt_font="0" end props["font.base"] = props["font."..nxt_font..".base"] props["font.small"] = props["font."..nxt_font..".small"] props["font.comment"] = props["font."..nxt_font..".comment"] props["font.set"]=nxt_font scite.MenuCommand("IDM_PREVFILE") scite.MenuCommand("IDM_NEXTFILE") -- used for updates current buffer return true end -- Добавляем свой обработчик события, возникающего при вызове пункта меню "Use Monospaced Font" local old_OnMenuCommand = OnMenuCommand function OnMenuCommand (msg, source) local result if old_OnMenuCommand then result = old_OnMenuCommand(msg, source) end if msg == 450 then --IDM_MONOFONT if FontChange() then return true end end return result end |
| Всего записей: 2187 | Зарегистр. 03-01-2002 | Отправлено: 21:22 08-11-2006 | Исправлено: mozers, 23:22 08-11-2006 |
|