1;(function() 2{ 3 // CommonJS 4 SyntaxHighlighter = SyntaxHighlighter || (typeof require !== 'undefined'? require('shCore').SyntaxHighlighter : null); 5 6 function Brush() 7 { 8 var keywords = 'abs addr and ansichar ansistring array as asm begin boolean byte cardinal ' + 9 'case char class comp const constructor currency destructor div do double ' + 10 'downto else end except exports extended false file finalization finally ' + 11 'for function goto if implementation in inherited int64 initialization ' + 12 'integer interface is label library longint longword mod nil not object ' + 13 'of on or packed pansichar pansistring pchar pcurrency pdatetime pextended ' + 14 'pint64 pointer private procedure program property pshortstring pstring ' + 15 'pvariant pwidechar pwidestring protected public published raise real real48 ' + 16 'record repeat set shl shortint shortstring shr single smallint string then ' + 17 'threadvar to true try type unit until uses val var varirnt while widechar ' + 18 'widestring with word write writeln xor'; 19 20 this.regexList = [ 21 { regex: /\(\*[\s\S]*?\*\)/gm, css: 'comments' }, // multiline comments (* *) 22 { regex: /{(?!\$)[\s\S]*?}/gm, css: 'comments' }, // multiline comments { } 23 { regex: SyntaxHighlighter.regexLib.singleLineCComments, css: 'comments' }, // one line 24 { regex: SyntaxHighlighter.regexLib.singleQuotedString, css: 'string' }, // strings 25 { regex: /\{\$[a-zA-Z]+ .+\}/g, css: 'color1' }, // compiler Directives and Region tags 26 { regex: /\b[\d\.]+\b/g, css: 'value' }, // numbers 12345 27 { regex: /\$[a-zA-Z0-9]+\b/g, css: 'value' }, // numbers $F5D3 28 { regex: new RegExp(this.getKeywords(keywords), 'gmi'), css: 'keyword' } // keyword 29 ]; 30 }; 31 32 Brush.prototype = new SyntaxHighlighter.Highlighter(); 33 Brush.aliases = ['delphi', 'pascal', 'pas']; 34 35 SyntaxHighlighter.brushes.Delphi = Brush; 36 37 // CommonJS 38 typeof(exports) != 'undefined' ? exports.Brush = Brush : null; 39})(); 40