code_highlighter(edit component) 업데이트

- dp.SyntaxHighlighter 1.4에서 1.5.1로 업데이트 (통째로 덮어 씌움..)
- Abap 언어 추가.
- 접기/줄 번호 감추기/도구바 감추기 설정 추가.

git-svn-id: http://xe-core.googlecode.com/svn/sandbox@3104 201d5d3c-b55e-5fd7-737f-ddc643e51545
This commit is contained in:
bnu 2007-11-28 16:55:38 +00:00
parent 12f685e116
commit f490cad881
21 changed files with 1090 additions and 578 deletions

View file

@ -1,31 +1,10 @@
/* Delphi brush is contributed by Eddie Shipman */
dp.sh.Brushes.Delphi = function()
{
var keywords = 'abs addr and ansichar ansistring array as asm begin boolean byte cardinal ' +
'case char class comp const constructor currency destructor div do double ' +
'downto else end except exports extended false file finalization finally ' +
'for function goto if implementation in inherited int64 initialization ' +
'integer interface is label library longint longword mod nil not object ' +
'of on or packed pansichar pansistring pchar pcurrency pdatetime pextended ' +
'pint64 pointer private procedure program property pshortstring pstring ' +
'pvariant pwidechar pwidestring protected public published raise real real48 ' +
'record repeat set shl shortint shortstring shr single smallint string then ' +
'threadvar to true try type unit until uses val var varirnt while widechar ' +
'widestring with word write writeln xor';
/*
* JsMin
* Javascript Compressor
* http://www.crockford.com/
* http://www.smallsharptools.com/
*/
this.regexList = [
{ regex: new RegExp('\\(\\*[\\s\\S]*?\\*\\)', 'gm'), css: 'dp-comment' }, // multiline comments (* *)
{ regex: new RegExp('{(?!\\$)[\\s\\S]*?}', 'gm'), css: 'dp-comment' }, // multiline comments { }
{ regex: dp.sh.RegexLib.SingleLineCComments, css: 'dp-comment' }, // one line
{ regex: dp.sh.RegexLib.SingleQuotedString, css: 'dp-string' }, // strings
{ regex: new RegExp('\\{\\$[a-zA-Z]+ .+\\}', 'g'), css: 'dp-directive' }, // Compiler Directives and Region tags
{ regex: new RegExp('\\b[\\d\\.]+\\b', 'g'), css: 'dp-number' }, // numbers 12345
{ regex: new RegExp('\\$[a-zA-Z0-9]+\\b', 'g'), css: 'dp-number' }, // numbers $F5D3
{ regex: new RegExp(this.GetKeywords(keywords), 'gm'), css: 'dp-keyword' } // keyword
];
this.CssClass = 'dp-delphi';
}
dp.sh.Brushes.Delphi.prototype = new dp.sh.Highlighter();
dp.sh.Brushes.Delphi.Aliases = ['delphi', 'pascal'];
dp.sh.Brushes.Delphi=function()
{var keywords='abs addr and ansichar ansistring array as asm begin boolean byte cardinal '+'case char class comp const constructor currency destructor div do double '+'downto else end except exports extended false file finalization finally '+'for function goto if implementation in inherited int64 initialization '+'integer interface is label library longint longword mod nil not object '+'of on or packed pansichar pansistring pchar pcurrency pdatetime pextended '+'pint64 pointer private procedure program property pshortstring pstring '+'pvariant pwidechar pwidestring protected public published raise real real48 '+'record repeat set shl shortint shortstring shr single smallint string then '+'threadvar to true try type unit until uses val var varirnt while widechar '+'widestring with word write writeln xor';this.regexList=[{regex:new RegExp('\\(\\*[\\s\\S]*?\\*\\)','gm'),css:'comment'},{regex:new RegExp('{(?!\\$)[\\s\\S]*?}','gm'),css:'comment'},{regex:dp.sh.RegexLib.SingleLineCComments,css:'comment'},{regex:dp.sh.RegexLib.SingleQuotedString,css:'string'},{regex:new RegExp('\\{\\$[a-zA-Z]+ .+\\}','g'),css:'directive'},{regex:new RegExp('\\b[\\d\\.]+\\b','g'),css:'number'},{regex:new RegExp('\\$[a-zA-Z0-9]+\\b','g'),css:'number'},{regex:new RegExp(this.GetKeywords(keywords),'gm'),css:'keyword'}];this.CssClass='dp-delphi';this.Style='.dp-delphi .number { color: blue; }'+'.dp-delphi .directive { color: #008284; }'+'.dp-delphi .vars { color: #000; }';}
dp.sh.Brushes.Delphi.prototype=new dp.sh.Highlighter();dp.sh.Brushes.Delphi.Aliases=['delphi','pascal'];