Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » SciTE - Open Source Text Editor for Windows & Linux

Модерирует : gyra, Maz

Widok (23-11-2010 11:23): Лимит страниц. Продолжаем здесь  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

mozers



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Код:
----------------------------------------------------------
-- Show Current Colour
----------------------------------------------------------
local function SetColour(color)
   
if color:match('%x%x%x%x%x%x') then
       
memo_path:set_memo_colour("", "#"..color)
   
else
        local
def_bg = editor.StyleBack[32]
       
local b = math.floor(def_bg / 65536)
       
local g = math.floor((def_bg - b*65536) / 256)
       
local r = def_bg - b*65536 - g*256
       
local rgb_hex = string.format('#%2X%2X%2X', r, g, b)
       
memo_path:set_memo_colour("", rgb_hex)
   
end
end
 
AddEventHandler("OnDwellStart", function(pos, cur_word)
   
if pos ~= 0 then
       
SetColour(cur_word)
   
end
end
)
props["dwell.period"] = 50
 
local cur_word_old = ""
AddEventHandler("OnKey", function(key, shift, ctrl, alt, char)
   
if editor.Focus then
        local
cur_word = GetCurrentWord() -- слово, на котором стояла каретка ДО ТОГО КАК ЕЁ ПЕРЕМЕСТИЛИ
       
if cur_word ~= cur_word_old then
           
SetColour(cur_word)
           
cur_word_old = cur_word
        end
    end
end
)
 ?  Код создан и опубликован с помощью SciTE-Ru

Всего записей: 2187 | Зарегистр. 03-01-2002 | Отправлено: 14:26 14-11-2010
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » SciTE - Open Source Text Editor for Windows & Linux
Widok (23-11-2010 11:23): Лимит страниц. Продолжаем здесь


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru