
SyntaxHighlighter.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: /\(\*[\s\S]*?\*\)/gm, css: 'comments' }, 
{ regex: /{(?!\$)[\s\S]*?}/gm, css: 'comments' }, 
{ regex: SyntaxHighlighter.regexLib.singleLineCComments,	css: 'comments' }, 
{ regex: SyntaxHighlighter.regexLib.singleQuotedString, css: 'string' }, 
{ regex: /\{\$[a-zA-Z]+ .+\}/g, css: 'color1' }, 
{ regex: /\b[\d\.]+\b/g, css: 'value' }, 
{ regex: /\$[a-zA-Z0-9]+\b/g, css: 'value' }, 
{ regex: new RegExp(this.getKeywords(keywords), 'gmi'), css: 'keyword' } 
];
};
SyntaxHighlighter.brushes.Delphi.prototype	= new SyntaxHighlighter.Highlighter();
SyntaxHighlighter.brushes.Delphi.aliases	= ['delphi', 'pascal', 'pas'];
