Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.05.11;
Скачать: CL | DM;

Вниз

DMClient - посветка.   Найти похожие ветки 

 
guav ©   (2008-03-29 18:08) [0]

Удалось прикрутить ко-какую подсетку к DMCilent 3.0 beta 1.21

Идея навеяна easy © http://delphimaster.net/view/15-1206729020/

В клиенте есть фалй hint.js, загружаемый для каждой страницы, в него вписан код, выделяющий все keywords в тэге code тэгом . Не блеск - комментарии игнорируются, и кейворды подсвечиваются и в комментариях - но уже что-то.

document.body.onload = function()
{
 var codePieces = document.getElementsByTagName("CODE");
 var keywords = new Array("and", "array", "as", "asm", "begin", "case",
   "class", "const", "constructor", "destructor", "dispinterface", "div",
   "do", "downto", "else", "end", "except", "exports", "file",
   "finalization", "finally", "for", "function", "goto", "if",
   "implementation", "in", "inherited", "initialization", "inline",
   "interface", "is", "label", "library", "mod", "nil", "not", "object",
   "of", "or", "out", "packed", "procedure", "program", "property" ,"raise",
   "record", "repeat", "resourcestring", "set", "shl", "shr", "string",
   "then", "threadvar", "to", "try", "type", "unit", "until", "uses",
   "var", "while", "with", "xor");
 re = new RegExp("(^|[^a-z0-9_])(" + keywords.join("|") + ")([^a-z0-9_]|$)", "gim");
 for (var i = 0; i != codePieces.length; ++i)
 {
   codePieces[i].innerHTML =
     codePieces[i].innerHTML.replace(re, "$1$2$3");
 }  
}


 
guav ©   (2008-03-29 18:09) [1]

На ветке http://delphimaster.net/view/15-1206729020/ например хорошо работает.


 
guav ©   (2008-03-29 18:13) [2]

Ну да, забыл, что тэг и тут есть

> "$1$2$3");

читать как "$1$2$3);



Страницы: 1 вся ветка

Текущий архив: 2008.05.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
2-1207975087
NewSer
2008-04-12 08:38
2008.05.11
Как отменить Close?


2-1207991462
Alex8
2008-04-12 13:11
2008.05.11
Table


6-1186302079
=Guest=
2007-08-05 12:21
2008.05.11
закладки firefox


3-1196934351
MZ
2007-12-06 12:45
2008.05.11
Узнать права роли на объект


2-1207979954
German
2008-04-12 09:59
2008.05.11
На что рассчитывать от ADO + Access ?