paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-01 18:19:31 +01:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Made Highlighter-Attribute names resource-strings

Browse Source 
git-svn-id: trunk@21053 -
This commit is contained in:
martin 2009-08-01 10:48:48 +00:00
parent 32034af863
commit cde1f77fe0
19 changed files with 282 additions and 189 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
components/synedit/synedithighlighter.pp
View File

@ -109,7 +109,7 @@ type
{$ENDIF} {$ENDIF}
public public
procedure Assign(Source: TPersistent); override; procedure Assign(Source: TPersistent); override;
constructor Create(attribName: string); constructor Create(attribName: string; aStoredName: String = '');
procedure InternalSaveDefaultValues; //mh 2000-10-08 procedure InternalSaveDefaultValues; //mh 2000-10-08
function LoadFromBorlandRegistry(rootKey: HKEY; attrKey, attrName: string; function LoadFromBorlandRegistry(rootKey: HKEY; attrKey, attrName: string;
oldStyle: boolean): boolean; virtual; oldStyle: boolean): boolean; virtual;
@ -489,14 +489,17 @@ begin
fOnChange(Self); fOnChange(Self);
end; end;
constructor TSynHighlighterAttributes.Create(attribName: string); constructor TSynHighlighterAttributes.Create(attribName: string; aStoredName: String = '');
begin begin
inherited Create; inherited Create;
Background := clNone; Background := clNone;
Foreground := clNone; Foreground := clNone;
FFrameColor := clNone; FFrameColor := clNone;
fName := attribName; fName := attribName;
FStoredName := attribName; if aStoredName = '' then
FStoredName := attribName
else
FStoredName := aStoredName;;
end; end;
function TSynHighlighterAttributes.GetBackgroundColorStored: boolean; function TSynHighlighterAttributes.GetBackgroundColorStored: boolean;
@ -751,7 +754,7 @@ begin
{$IFNDEF SYN_LAZARUS} {$IFNDEF SYN_LAZARUS}
// ToDo Registry // ToDo Registry
key := Reg.CurrentPath; key := Reg.CurrentPath;
if Reg.OpenKeyReadOnly(Name) then begin if Reg.OpenKeyReadOnly(StoredName) then begin
if Reg.ValueExists('Background') then if Reg.ValueExists('Background') then
Background := Reg.ReadInteger('Background'); Background := Reg.ReadInteger('Background');
if Reg.ValueExists('Foreground') then if Reg.ValueExists('Foreground') then
@ -772,7 +775,7 @@ var
key: string; key: string;
begin begin
key := Reg.CurrentPath; key := Reg.CurrentPath;
if Reg.OpenKey(Name,true) then begin if Reg.OpenKey(StoredName,true) then begin
Reg.WriteInteger('Background', Background); Reg.WriteInteger('Background', Background);
Reg.WriteInteger('Foreground', Foreground); Reg.WriteInteger('Foreground', Foreground);
Reg.WriteInteger('Style', IntegerStyle); Reg.WriteInteger('Style', IntegerStyle);
@ -791,18 +794,18 @@ var
begin begin
S := TStringList.Create; S := TStringList.Create;
try try
Ini.ReadSection(Name, S); Ini.ReadSection(StoredName, S);
if S.Count > 0 then if S.Count > 0 then
begin begin
if S.IndexOf('Background') <> -1 then if S.IndexOf('Background') <> -1 then
Background := Ini.ReadInteger(Name, 'Background', clWindow); Background := Ini.ReadInteger(StoredName, 'Background', clWindow);
if S.IndexOf('Foreground') <> -1 then if S.IndexOf('Foreground') <> -1 then
Foreground := Ini.ReadInteger(Name, 'Foreground', clWindowText); Foreground := Ini.ReadInteger(StoredName, 'Foreground', clWindowText);
if S.IndexOf('Style') <> -1 then if S.IndexOf('Style') <> -1 then
IntegerStyle := Ini.ReadInteger(Name, 'Style', 0); IntegerStyle := Ini.ReadInteger(StoredName, 'Style', 0);
{$IFDEF SYN_LAZARUS} {$IFDEF SYN_LAZARUS}
if S.IndexOf('StyleMask') <> -1 then if S.IndexOf('StyleMask') <> -1 then
IntegerStyleMask := Ini.ReadInteger(Name, 'StyleMask', 0); IntegerStyleMask := Ini.ReadInteger(StoredName, 'StyleMask', 0);
{$ENDIF} {$ENDIF}
Result := true; Result := true;
end else Result := false; end else Result := false;
@ -813,11 +816,11 @@ end;
function TSynHighlighterAttributes.SaveToFile(Ini : TIniFile): boolean; //DDH 10/16/01 function TSynHighlighterAttributes.SaveToFile(Ini : TIniFile): boolean; //DDH 10/16/01
begin begin
Ini.WriteInteger(Name, 'Background', Background); Ini.WriteInteger(StoredName, 'Background', Background);
Ini.WriteInteger(Name, 'Foreground', Foreground); Ini.WriteInteger(StoredName, 'Foreground', Foreground);
Ini.WriteInteger(Name, 'Style', IntegerStyle); Ini.WriteInteger(StoredName, 'Style', IntegerStyle);
{$IFDEF SYN_LAZARUS} {$IFDEF SYN_LAZARUS}
Ini.WriteInteger(Name, 'StyleMask', IntegerStyleMask); Ini.WriteInteger(StoredName, 'StyleMask', IntegerStyleMask);
{$ENDIF} {$ENDIF}
Result := true; Result := true;
end; end;
@ -1035,7 +1038,7 @@ end;
procedure TSynCustomHighlighter.AddAttribute(AAttrib: TSynHighlighterAttributes); procedure TSynCustomHighlighter.AddAttribute(AAttrib: TSynHighlighterAttributes);
begin begin
fAttributes.AddObject(AAttrib.Name, AAttrib); fAttributes.AddObject(AAttrib.StoredName, AAttrib);
end; end;
{$IFDEF SYN_LAZARUS} {$IFDEF SYN_LAZARUS}

136
components/synedit/syneditstrconst.pp
View File

@ -45,24 +45,25 @@ const
SYNS_ComponentsPage = 'SynEdit'; SYNS_ComponentsPage = 'SynEdit';
SYNS_HighlightersPage = 'SynEdit Highlighters'; SYNS_HighlightersPage = 'SynEdit Highlighters';
{$IFDEF SYN_LAZARUS} (* IMPORTANT
// The highlight attribute names are the only independent identification. The highlight attribute "StoredName" are the only independent
// So, they can't be translated. identification of Attributes.
// ToDo: add translated versions. They must be UNIQUE and UNCHANGED.
const
{$ELSE}
{$IFDEF SYN_COMPILER_3_UP}
resourcestring
{$ELSE}
const
{$ENDIF}
{$ENDIF}
SYNS_Untitled = 'Untitled';
The resoure-strings below are followed by a const section, containing
a constant for each of the strings. This is assigned in initialization
*before* translation.
It relies on the english names below not to be changed.
If you change them you must set the constant to a copy of the original value.
Also if you change a Name in the resourcestring section below, keep it unique
So, they can't be translated.
*)
resourcestring
(* Attribute Names *)
SYNS_Untitled = 'Untitled';
// names for highlighter attributes // names for highlighter attributes
SYNS_AttrAsm = 'Asm';
SYNS_AttrAsmComment = 'Asm comment';
SYNS_AttrAsmKey = 'Asm key';
SYNS_AttrASP = 'Asp'; SYNS_AttrASP = 'Asp';
SYNS_AttrAssembler = 'Assembler'; SYNS_AttrAssembler = 'Assembler';
SYNS_AttrAttributeName = 'Attribute Name'; SYNS_AttrAttributeName = 'Attribute Name';
@ -149,11 +150,106 @@ const
SYNS_AttrSquareBracket = 'Square Bracket'; SYNS_AttrSquareBracket = 'Square Bracket';
SYNS_AttrRoundBracket = 'Round Bracket'; SYNS_AttrRoundBracket = 'Round Bracket';
SYNS_AttrTeXCommand = 'TeX Command'; SYNS_AttrTeXCommand = 'TeX Command';
(* End of Attribute Names *)
const
(* IMPORTANT
The highlight attribute "StoredName" are the only independent
identification of Attributes.
They must be UNIQUE and UNCHANGED. Read section above.
*)
(* Stored Attribute Names *)
SYNS_XML_Untitled :String = SYNS_Untitled; // 'Untitled';
SYNS_XML_AttrASP :String = SYNS_AttrASP; // 'Asp';
SYNS_XML_AttrAssembler :String = SYNS_AttrAssembler; // 'Assembler';
SYNS_XML_AttrAttributeName :String = SYNS_AttrAttributeName; // 'Attribute Name';
SYNS_XML_AttrAttributeValue :String = SYNS_AttrAttributeValue; // 'Attribute Value';
SYNS_XML_AttrBlock :String = SYNS_AttrBlock; // 'Block';
SYNS_XML_AttrBrackets :String = SYNS_AttrBrackets; // 'Brackets';
SYNS_XML_AttrCDATASection :String = SYNS_AttrCDATASection; // 'CDATA Section';
SYNS_XML_AttrCharacter :String = SYNS_AttrCharacter; // 'Character';
SYNS_XML_AttrClass :String = SYNS_AttrClass; // 'Class';
SYNS_XML_AttrComment :String = SYNS_AttrComment; // 'Comment';
SYNS_XML_AttrCondition :String = SYNS_AttrCondition; // 'Condition';
SYNS_XML_AttrDataType :String = SYNS_AttrDataType; // 'Data type';
SYNS_XML_AttrDefaultPackage :String = SYNS_AttrDefaultPackage; // 'Default packages';
SYNS_XML_AttrDir :String = SYNS_AttrDir; // 'Direction';
SYNS_XML_AttrDirective :String = SYNS_AttrDirective; // 'Directive';
SYNS_XML_AttrDOCTYPESection :String = SYNS_AttrDOCTYPESection; // 'DOCTYPE Section';
SYNS_XML_AttrDocumentation :String = SYNS_AttrDocumentation; // 'Documentation';
SYNS_XML_AttrElementName :String = SYNS_AttrElementName; // 'Element Name';
SYNS_XML_AttrEmbedSQL :String = SYNS_AttrEmbedSQL; // 'Embedded SQL';
SYNS_XML_AttrEmbedText :String = SYNS_AttrEmbedText; // 'Embedded text';
SYNS_XML_AttrEntityReference :String = SYNS_AttrEntityReference; // 'Entity Reference';
SYNS_XML_AttrEscapeAmpersand :String = SYNS_AttrEscapeAmpersand; // 'Escape ampersand';
SYNS_XML_AttrEvent :String = SYNS_AttrEvent; // 'Event';
SYNS_XML_AttrException :String = SYNS_AttrException; // 'Exception';
SYNS_XML_AttrFloat :String = SYNS_AttrFloat; // 'Float';
SYNS_XML_AttrForm :String = SYNS_AttrForm; // 'Form';
SYNS_XML_AttrFunction :String = SYNS_AttrFunction; // 'Function';
SYNS_XML_AttrHexadecimal :String = SYNS_AttrHexadecimal; // 'Hexadecimal';
SYNS_XML_AttrIcon :String = SYNS_AttrIcon; // 'Icon reference';
SYNS_XML_AttrIdentifier :String = SYNS_AttrIdentifier; // 'Identifier';
SYNS_XML_AttrIllegalChar :String = SYNS_AttrIllegalChar; // 'Illegal char';
SYNS_XML_AttrInclude :String = SYNS_AttrInclude; // 'Include';
SYNS_XML_AttrIndirect :String = SYNS_AttrIndirect; // 'Indirect';
SYNS_XML_AttrInvalidSymbol :String = SYNS_AttrInvalidSymbol; // 'Invalid symbol';
SYNS_XML_AttrInternalFunction :String = SYNS_AttrInternalFunction; // 'Internal function';
SYNS_XML_AttrKey :String = SYNS_AttrKey; // 'Key';
SYNS_XML_AttrLabel :String = SYNS_AttrLabel; // 'Label';
SYNS_XML_AttrMacro :String = SYNS_AttrMacro; // 'Macro';
SYNS_XML_AttrMarker :String = SYNS_AttrMarker; // 'Marker';
SYNS_XML_AttrMessage :String = SYNS_AttrMessage; // 'Message';
SYNS_XML_AttrMiscellaneous :String = SYNS_AttrMiscellaneous; // 'Miscellaneous';
SYNS_XML_AttrNamespaceAttrName :String = SYNS_AttrNamespaceAttrName; // 'Namespace Attribute Name';
SYNS_XML_AttrNamespaceAttrValue :String = SYNS_AttrNamespaceAttrValue; // 'Namespace Attribute Value';
SYNS_XML_AttrNonReservedKeyword :String = SYNS_AttrNonReservedKeyword; // 'Non-reserved keyword';
SYNS_XML_AttrNull :String = SYNS_AttrNull; // 'Null';
SYNS_XML_AttrNumber :String = SYNS_AttrNumber; // 'Number';
SYNS_XML_AttrOctal :String = SYNS_AttrOctal; // 'Octal';
SYNS_XML_AttrOperator :String = SYNS_AttrOperator; // 'Operator';
SYNS_XML_AttrPLSQL :String = SYNS_AttrPLSQL; // 'Reserved word (PL/SQL)';
SYNS_XML_AttrPragma :String = SYNS_AttrPragma; // 'Pragma';
SYNS_XML_AttrPreprocessor :String = SYNS_AttrPreprocessor; // 'Preprocessor';
SYNS_XML_AttrProcessingInstr :String = SYNS_AttrProcessingInstr; // 'Processing Instruction';
SYNS_XML_AttrQualifier :String = SYNS_AttrQualifier; // 'Qualifier';
SYNS_XML_AttrRegister :String = SYNS_AttrRegister; // 'Register';
SYNS_XML_AttrReservedWord :String = SYNS_AttrReservedWord; // 'Reserved word';
SYNS_XML_AttrRpl :String = SYNS_AttrRpl; // 'Rpl';
SYNS_XML_AttrRplKey :String = SYNS_AttrRplKey; // 'Rpl key';
SYNS_XML_AttrRplComment :String = SYNS_AttrRplComment; // 'Rpl comment';
SYNS_XML_AttrSASM :String = SYNS_AttrSASM; // 'SASM';
SYNS_XML_AttrSASMComment :String = SYNS_AttrSASMComment; // 'SASM Comment';
SYNS_XML_AttrSASMKey :String = SYNS_AttrSASMKey; // 'SASM Key';
SYNS_XML_AttrSecondReservedWord :String = SYNS_AttrSecondReservedWord; // 'Second reserved word';
SYNS_XML_AttrSection :String = SYNS_AttrSection; // 'Section';
SYNS_XML_AttrSpace :String = SYNS_AttrSpace; // 'Space';
SYNS_XML_AttrSpecialVariable :String = SYNS_AttrSpecialVariable; // 'Special variable';
SYNS_XML_AttrSQLKey :String = SYNS_AttrSQLKey; // 'SQL keyword';
SYNS_XML_AttrSQLPlus :String = SYNS_AttrSQLPlus; // 'SQL*Plus command';
SYNS_XML_AttrString :String = SYNS_AttrString; // 'String';
SYNS_XML_AttrSymbol :String = SYNS_AttrSymbol; // 'Symbol';
SYNS_XML_AttrSyntaxError :String = SYNS_AttrSyntaxError; // 'SyntaxError';
SYNS_XML_AttrSystem :String = SYNS_AttrSystem; // 'System functions and variables';
SYNS_XML_AttrSystemValue :String = SYNS_AttrSystemValue; // 'System value';
SYNS_XML_AttrTerminator :String = SYNS_AttrTerminator; // 'Terminator';
SYNS_XML_AttrText :String = SYNS_AttrText; // 'Text';
SYNS_XML_AttrUnknownWord :String = SYNS_AttrUnknownWord; // 'Unknown word';
SYNS_XML_AttrUser :String = SYNS_AttrUser; // 'User functions and variables';
SYNS_XML_AttrUserFunction :String = SYNS_AttrUserFunction; // 'User functions';
SYNS_XML_AttrValue :String = SYNS_AttrValue; // 'Value';
SYNS_XML_AttrVariable :String = SYNS_AttrVariable; // 'Variable';
SYNS_XML_AttrWhitespace :String = SYNS_AttrWhitespace; // 'Whitespace';
SYNS_XML_AttrTableName :String = SYNS_AttrTableName; // 'Table Name';
SYNS_XML_AttrMathMode :String = SYNS_AttrMathMode; // 'Math Mode';
SYNS_XML_AttrTextMathMode :String = SYNS_AttrTextMathMode; // 'Text in Math Mode';
SYNS_XML_AttrSquareBracket :String = SYNS_AttrSquareBracket; // 'Square Bracket';
SYNS_XML_AttrRoundBracket :String = SYNS_AttrRoundBracket; // 'Round Bracket';
SYNS_XML_AttrTeXCommand :String = SYNS_AttrTeXCommand; // 'TeX Command';
(* End of Stored Attribute Names *)
{$IFDEF SYN_LAZARUS}
resourcestring resourcestring
{$ENDIF}
// names of exporter output formats // names of exporter output formats
SYNS_ExporterFormatHTML = 'HTML'; SYNS_ExporterFormatHTML = 'HTML';
SYNS_ExporterFormatRTF = 'RTF'; SYNS_ExporterFormatRTF = 'RTF';
@ -273,9 +369,7 @@ const
SYNS_LangUnreal = 'Unreal'; SYNS_LangUnreal = 'Unreal';
SYNS_LangTeX = 'TeX'; SYNS_LangTeX = 'TeX';
{$IFDEF SYN_LAZARUS}
resourcestring resourcestring
{$ENDIF}
SYNS_emcNone = 'No Action'; SYNS_emcNone = 'No Action';
SYNS_emcStartSelection = 'Selection'; SYNS_emcStartSelection = 'Selection';

16
components/synedit/synhighlighterany.pas
View File

@ -411,12 +411,12 @@ begin
fObjects := TStringList.Create; fObjects := TStringList.Create;
TStringList(fObjects).Sorted := True; TStringList(fObjects).Sorted := True;
TStringList(fObjects).Duplicates := dupIgnore; TStringList(fObjects).Duplicates := dupIgnore;
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fConstantAttri := TSynHighlighterAttributes.Create('jan_constant'); fConstantAttri := TSynHighlighterAttributes.Create('jan_constant');
@ -435,19 +435,19 @@ begin
fDotAttri.Style := [fsBold]; fDotAttri.Style := [fsBold];
fDotAttri.Foreground:=clgreen; fDotAttri.Foreground:=clgreen;
AddAttribute(fDotAttri); AddAttribute(fDotAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fVariableAttri := TSynHighlighterAttributes.Create('jan_Variable'); fVariableAttri := TSynHighlighterAttributes.Create('jan_Variable');
fVariableAttri.Style := [fsBold]; fVariableAttri.Style := [fsBold];
fVariableAttri.Foreground:=clpurple; fVariableAttri.Foreground:=clpurple;
AddAttribute(fVariableAttri); AddAttribute(fVariableAttri);
fPreprocessorAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor); fPreprocessorAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
AddAttribute(fPreprocessorAttri); AddAttribute(fPreprocessorAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);

20
components/synedit/synhighlightercpp.pp
View File

@ -779,28 +779,28 @@ end;
constructor TSynCppSyn.Create(AOwner: TComponent); constructor TSynCppSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler); fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
AddAttribute(fAsmAttri); AddAttribute(fAsmAttri);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style:= [fsItalic]; fCommentAttri.Style:= [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar); fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
AddAttribute(fInvalidAttri); AddAttribute(fInvalidAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style:= [fsBold]; fKeyAttri.Style:= [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
fSpaceAttri.Foreground := clWindow; fSpaceAttri.Foreground := clWindow;
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fDirecAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor); fDirecAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
AddAttribute(fDirecAttri); AddAttribute(fDirecAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
InitIdent; InitIdent;

14
components/synedit/synhighlightercss.pas
View File

@ -1448,21 +1448,21 @@ end;
constructor TSynCssSyn.Create(AOwner: TComponent); constructor TSynCssSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey, SYNS_XML_AttrKey);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
InitIdent; InitIdent;

20
components/synedit/synhighlighterhtml.pp
View File

@ -1924,43 +1924,43 @@ constructor TSynHTMLSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fASPAttri := TSynHighlighterAttributes.Create(SYNS_AttrASP); fASPAttri := TSynHighlighterAttributes.Create(SYNS_AttrASP, SYNS_XML_AttrASP);
fASPAttri.Foreground := clBlack; fASPAttri.Foreground := clBlack;
fASPAttri.Background := clYellow; fASPAttri.Background := clYellow;
AddAttribute(fASPAttri); AddAttribute(fASPAttri);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
fIdentifierAttri.Style := [fsBold]; fIdentifierAttri.Style := [fsBold];
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
fKeyAttri.Foreground := $00ff0080; fKeyAttri.Foreground := $00ff0080;
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
fSymbolAttri.Style := [fsBold]; fSymbolAttri.Style := [fsBold];
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText); fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
AddAttribute(fTextAttri); AddAttribute(fTextAttri);
fUndefKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrUnknownWord); fUndefKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrUnknownWord, SYNS_XML_AttrUnknownWord);
fUndefKeyAttri.Style := [fsBold]; fUndefKeyAttri.Style := [fsBold];
fUndefKeyAttri.Foreground := clRed; fUndefKeyAttri.Foreground := clRed;
AddAttribute(fUndefKeyAttri); AddAttribute(fUndefKeyAttri);
fValueAttri := TSynHighlighterAttributes.Create(SYNS_AttrValue); fValueAttri := TSynHighlighterAttributes.Create(SYNS_AttrValue, SYNS_XML_AttrValue);
fValueAttri.Foreground := $00ff8000; fValueAttri.Foreground := $00ff8000;
AddAttribute(fValueAttri); AddAttribute(fValueAttri);
fAndAttri := TSynHighlighterAttributes.Create(SYNS_AttrEscapeAmpersand); fAndAttri := TSynHighlighterAttributes.Create(SYNS_AttrEscapeAmpersand, SYNS_XML_AttrEscapeAmpersand);
fAndAttri.Style := [fsBold]; fAndAttri.Style := [fsBold];
fAndAttri.Foreground := $0000ff00; fAndAttri.Foreground := $0000ff00;
AddAttribute(fAndAttri); AddAttribute(fAndAttri);

18
components/synedit/synhighlighterjava.pas
View File

@ -660,27 +660,27 @@ end;
constructor TSynJavaSyn.Create(AOwner: TComponent); constructor TSynJavaSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fDocumentAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation); fDocumentAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
fDocumentAttri.Style := [fsItalic]; fDocumentAttri.Style := [fsItalic];
AddAttribute(fDocumentAttri); AddAttribute(fDocumentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol); fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
AddAttribute(fInvalidAttri); AddAttribute(fInvalidAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
fSpaceAttri.Foreground := clWindow; fSpaceAttri.Foreground := clWindow;
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fRange := rsUnknown; fRange := rsUnknown;
SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange);

18
components/synedit/synhighlighterjscript.pas
View File

@ -1508,25 +1508,25 @@ end;
constructor TSynJScriptSyn.Create(AOwner: TComponent); constructor TSynJScriptSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNonReservedKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrNonReservedKeyword); fNonReservedKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
AddAttribute(fNonReservedKeyAttri); AddAttribute(fNonReservedKeyAttri);
fEventAttri := TSynHighlighterAttributes.Create(SYNS_AttrEvent); fEventAttri := TSynHighlighterAttributes.Create(SYNS_AttrEvent, SYNS_XML_AttrEvent);
AddAttribute(fEventAttri); AddAttribute(fEventAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
InitIdent; InitIdent;

14
components/synedit/synhighlighterlfm.pas
View File

@ -254,21 +254,21 @@ end;
constructor TSynLFMSyn.Create(AOwner: TComponent); constructor TSynLFMSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey, SYNS_XML_AttrKey);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
MakeMethodTables; MakeMethodTables;

2
components/synedit/synhighlightermulti.pas
View File

@ -743,7 +743,7 @@ constructor TgmScheme.Create(TheCollection: TCollection);
begin begin
inherited Create(TheCollection); inherited Create(TheCollection);
fCaseSensitive := True; fCaseSensitive := True;
fMarkerAttri := TSynHighlighterAttributes.Create(SYNS_AttrMarker); fMarkerAttri := TSynHighlighterAttributes.Create(SYNS_AttrMarker, SYNS_XML_AttrMarker);
fMarkerAttri.OnChange := {$IFDEF FPC}@{$ENDIF}MarkerAttriChanged; fMarkerAttri.OnChange := {$IFDEF FPC}@{$ENDIF}MarkerAttriChanged;
MarkerAttri.Background := clYellow; MarkerAttri.Background := clYellow;
MarkerAttri.Style := [fsBold]; MarkerAttri.Style := [fsBold];

18
components/synedit/synhighlighterpas.pp
View File

@ -1892,26 +1892,26 @@ begin
CreateDividerDrawConfig; CreateDividerDrawConfig;
InitFoldConfig; InitFoldConfig;
fD4syntax := true; fD4syntax := true;
fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler); fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
AddAttribute(fAsmAttri); AddAttribute(fAsmAttri);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style:= [fsItalic]; fCommentAttri.Style:= [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style:= [fsBold]; fKeyAttri.Style:= [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
{$IFDEF SYN_LAZARUS} {$IFDEF SYN_LAZARUS}
fDirectiveAttri := TSynHighlighterAttributes.Create(SYNS_AttrDirective); fDirectiveAttri := TSynHighlighterAttributes.Create(SYNS_AttrDirective, SYNS_XML_AttrDirective);
fDirectiveAttri.Style:= [fsItalic]; fDirectiveAttri.Style:= [fsItalic];
AddAttribute(fDirectiveAttri); AddAttribute(fDirectiveAttri);
CompilerMode:=pcmDelphi; CompilerMode:=pcmDelphi;

22
components/synedit/synhighlighterperl.pas
View File

@ -2003,31 +2003,31 @@ end;
constructor TSynPerlSyn.Create(AOwner: TComponent); constructor TSynPerlSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style:= [fsItalic]; fCommentAttri.Style:= [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar); fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
AddAttribute(fInvalidAttri); AddAttribute(fInvalidAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style:= [fsBold]; fKeyAttri.Style:= [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fOperatorAttri := TSynHighlighterAttributes.Create(SYNS_AttrOperator); fOperatorAttri := TSynHighlighterAttributes.Create(SYNS_AttrOperator, SYNS_XML_AttrOperator);
AddAttribute(fOperatorAttri); AddAttribute(fOperatorAttri);
fPragmaAttri := TSynHighlighterAttributes.Create(SYNS_AttrPragma); fPragmaAttri := TSynHighlighterAttributes.Create(SYNS_AttrPragma, SYNS_XML_AttrPragma);
fPragmaAttri.Style := [fsBold]; fPragmaAttri.Style := [fsBold];
AddAttribute(fPragmaAttri); AddAttribute(fPragmaAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
fSpaceAttri.Foreground := clWindow; fSpaceAttri.Foreground := clWindow;
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable); fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
fVariableAttri.Style := [fsBold]; fVariableAttri.Style := [fsBold];
AddAttribute(fVariableAttri); AddAttribute(fVariableAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);

18
components/synedit/synhighlighterphp.pas
View File

@ -666,25 +666,25 @@ constructor TSynPHPSyn.Create(AOwner: TComponent);
begin begin
{begin} //mh 2000-01-14 {begin} //mh 2000-01-14
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fInvalidSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol); fInvalidSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
AddAttribute(fInvalidSymbolAttri); AddAttribute(fInvalidSymbolAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable); fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
AddAttribute(fVariableAttri); AddAttribute(fVariableAttri);
{end} //mh 2000-01-14 {end} //mh 2000-01-14
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);

2
components/synedit/synhighlighterposition.pas
View File

@ -158,7 +158,7 @@ begin
inherited Create(TheOwner); inherited Create(TheOwner);
fTokens:=TList.Create; fTokens:=TList.Create;
fCopiedAttributes:=TList.Create; fCopiedAttributes:=TList.Create;
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText); fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
AddAttribute(fTextAttri); AddAttribute(fTextAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);

28
components/synedit/synhighlighterpython.pas
View File

@ -423,45 +423,45 @@ begin
FKeywords.Assign (GetKeywordIdentifiers); FKeywords.Assign (GetKeywordIdentifiers);
fRange := rsUnknown; fRange := rsUnknown;
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Foreground := clGray; fCommentAttri.Foreground := clGray;
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNonKeyAttri := TSynHighlighterAttributes.Create (SYNS_AttrNonReservedKeyword); fNonKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
fNonKeyAttri.Foreground := clNavy; fNonKeyAttri.Foreground := clNavy;
fNonKeyAttri.Style := [fsBold]; fNonKeyAttri.Style := [fsBold];
AddAttribute (fNonKeyAttri); AddAttribute (fNonKeyAttri);
fSystemAttri := TSynHighlighterAttributes.Create (SYNS_AttrSystem); fSystemAttri := TSynHighlighterAttributes.Create(SYNS_AttrSystem, SYNS_XML_AttrSystem);
fSystemAttri.Style := [fsBold]; fSystemAttri.Style := [fsBold];
AddAttribute (fSystemAttri); AddAttribute (fSystemAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
fNumberAttri.Foreground := clBlue; fNumberAttri.Foreground := clBlue;
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fHexAttri := TSynHighlighterAttributes.Create(SYNS_AttrHexadecimal); fHexAttri := TSynHighlighterAttributes.Create(SYNS_AttrHexadecimal, SYNS_XML_AttrHexadecimal);
fHexAttri.Foreground := clBlue; fHexAttri.Foreground := clBlue;
AddAttribute(fHexAttri); AddAttribute(fHexAttri);
fOctalAttri := TSynHighlighterAttributes.Create(SYNS_AttrOctal); fOctalAttri := TSynHighlighterAttributes.Create(SYNS_AttrOctal, SYNS_XML_AttrOctal);
fOctalAttri.Foreground := clBlue; fOctalAttri.Foreground := clBlue;
AddAttribute(fOctalAttri); AddAttribute(fOctalAttri);
fFloatAttri := TSynHighlighterAttributes.Create(SYNS_AttrFloat); fFloatAttri := TSynHighlighterAttributes.Create(SYNS_AttrFloat, SYNS_XML_AttrFloat);
fFloatAttri.Foreground := clBlue; fFloatAttri.Foreground := clBlue;
AddAttribute(fFloatAttri); AddAttribute(fFloatAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
fStringAttri.Foreground := clBlue; fStringAttri.Foreground := clBlue;
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fDocStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation); fDocStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
fDocStringAttri.Foreground := clTeal; fDocStringAttri.Foreground := clTeal;
AddAttribute(fDocStringAttri); AddAttribute(fDocStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fErrorAttri := TSynHighlighterAttributes.Create(SYNS_AttrSyntaxError); fErrorAttri := TSynHighlighterAttributes.Create(SYNS_AttrSyntaxError, SYNS_XML_AttrSyntaxError);
fErrorAttri.Foreground := clRed; fErrorAttri.Foreground := clRed;
AddAttribute(fErrorAttri); AddAttribute(fErrorAttri);
SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange);

30
components/synedit/synhighlightersql.pas
View File

@ -1038,50 +1038,50 @@ begin
fKeywords := TSynHashEntryList.Create; fKeywords := TSynHashEntryList.Create;
fTableNames := TStringList.Create; fTableNames := TStringList.Create;
TStringList(fTableNames).OnChange := {$IFDEF FPC}@{$ENDIF}TableNamesChanged; TStringList(fTableNames).OnChange := {$IFDEF FPC}@{$ENDIF}TableNamesChanged;
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style := [fsItalic]; fCommentAttri.Style := [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fDataTypeAttri := TSynHighlighterAttributes.Create(SYNS_AttrDataType); fDataTypeAttri := TSynHighlighterAttributes.Create(SYNS_AttrDataType, SYNS_XML_AttrDataType);
fDataTypeAttri.Style := [fsBold]; fDataTypeAttri.Style := [fsBold];
AddAttribute(fDataTypeAttri); AddAttribute(fDataTypeAttri);
{begin} // DJLP 2000-08-11 {begin} // DJLP 2000-08-11
fDefaultPackageAttri := fDefaultPackageAttri :=
TSynHighlighterAttributes.Create(SYNS_AttrDefaultPackage); TSynHighlighterAttributes.Create(SYNS_AttrDefaultPackage, SYNS_XML_AttrDefaultPackage);
fDefaultPackageAttri.Style := [fsBold]; fDefaultPackageAttri.Style := [fsBold];
AddAttribute(fDefaultPackageAttri); AddAttribute(fDefaultPackageAttri);
{end} // DJLP 2000-08-11 {end} // DJLP 2000-08-11
fExceptionAttri := TSynHighlighterAttributes.Create(SYNS_AttrException); fExceptionAttri := TSynHighlighterAttributes.Create(SYNS_AttrException, SYNS_XML_AttrException);
fExceptionAttri.Style := [fsItalic]; fExceptionAttri.Style := [fsItalic];
AddAttribute(fExceptionAttri); AddAttribute(fExceptionAttri);
fFunctionAttri := TSynHighlighterAttributes.Create(SYNS_AttrFunction); fFunctionAttri := TSynHighlighterAttributes.Create(SYNS_AttrFunction, SYNS_XML_AttrFunction);
fFunctionAttri.Style := [fsBold]; fFunctionAttri.Style := [fsBold];
AddAttribute(fFunctionAttri); AddAttribute(fFunctionAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
{begin} // DJLP 2000-08-11 {begin} // DJLP 2000-08-11
fPLSQLAttri := TSynHighlighterAttributes.Create(SYNS_AttrPLSQL); fPLSQLAttri := TSynHighlighterAttributes.Create(SYNS_AttrPLSQL, SYNS_XML_AttrPLSQL);
fPLSQLAttri.Style := [fsBold]; fPLSQLAttri.Style := [fsBold];
AddAttribute(fPLSQLAttri); AddAttribute(fPLSQLAttri);
{end} // DJLP 2000-08-11 {end} // DJLP 2000-08-11
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
{begin} // DJLP 2000-09-05 {begin} // DJLP 2000-09-05
fSQLPlusAttri:=TSynHighlighterAttributes.Create(SYNS_AttrSQLPlus); fSQLPlusAttri:=TSynHighlighterAttributes.Create(SYNS_AttrSQLPlus, SYNS_XML_AttrSQLPlus);
fSQLPlusAttri.Style := [fsBold]; fSQLPlusAttri.Style := [fsBold];
AddAttribute(fSQLPlusAttri); AddAttribute(fSQLPlusAttri);
{end} // DJLP 2000-09-05 {end} // DJLP 2000-09-05
fStringAttri := TSynHighlighterAttributes.Create(SYNS_Attrstring); fStringAttri := TSynHighlighterAttributes.Create(SYNS_Attrstring, SYNS_XML_Attrstring);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fTableNameAttri := TSynHighlighterAttributes.Create(SYNS_AttrTableName); fTableNameAttri := TSynHighlighterAttributes.Create(SYNS_AttrTableName, SYNS_XML_AttrTableName);
AddAttribute(fTableNameAttri); AddAttribute(fTableNameAttri);
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable); fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
AddAttribute(fVariableAttri); AddAttribute(fVariableAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
MakeMethodTables; MakeMethodTables;

18
components/synedit/synhighlighterunixshellscript.pas
View File

@ -319,29 +319,29 @@ begin
fSecondKeys.Add(ShellScriptSecondKeys[i]); fSecondKeys.Add(ShellScriptSecondKeys[i]);
end; end;
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Foreground := clGreen; fCommentAttri.Foreground := clGreen;
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Foreground := clNavy; fKeyAttri.Foreground := clNavy;
fKeyAttri.Style := [fsBold]; fKeyAttri.Style := [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fSecondKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrSecondReservedWord); fSecondKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrSecondReservedWord, SYNS_XML_AttrSecondReservedWord);
AddAttribute(fSecondKeyAttri); AddAttribute(fSecondKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
fNumberAttri.Foreground := clBlue; fNumberAttri.Foreground := clBlue;
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
fStringAttri.Foreground := clMaroon; fStringAttri.Foreground := clMaroon;
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
fSymbolAttri.Foreground := clRed; fSymbolAttri.Foreground := clRed;
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
fVarAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable); fVarAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
fVarAttri.Foreground := clPurple; fVarAttri.Foreground := clPurple;
AddAttribute(fVarAttri); AddAttribute(fVarAttri);
SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange); ////TL 2003-06-11: added the @prefix to DefHighlightChange SetAttributesOnChange({$IFDEF SYN_LAZARUS}@{$ENDIF}DefHighlightChange); ////TL 2003-06-11: added the @prefix to DefHighlightChange

14
components/synedit/synhighlightervb.pas
View File

@ -1029,21 +1029,21 @@ end;
constructor TSynVBSyn.Create(AOwner: TComponent); constructor TSynVBSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment); fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri.Style:= [fsItalic]; fCommentAttri.Style:= [fsItalic];
AddAttribute(fCommentAttri); AddAttribute(fCommentAttri);
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier); fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
AddAttribute(fIdentifierAttri); AddAttribute(fIdentifierAttri);
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord); fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
fKeyAttri.Style:= [fsBold]; fKeyAttri.Style:= [fsBold];
AddAttribute(fKeyAttri); AddAttribute(fKeyAttri);
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber); fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
AddAttribute(fNumberAttri); AddAttribute(fNumberAttri);
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace); fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
AddAttribute(fSpaceAttri); AddAttribute(fSpaceAttri);
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString); fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
AddAttribute(fStringAttri); AddAttribute(fStringAttri);
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol); fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
AddAttribute(fSymbolAttri); AddAttribute(fSymbolAttri);
SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange); SetAttributesOnChange({$IFDEF FPC}@{$ENDIF}DefHighlightChange);
InitIdent; InitIdent;

30
components/synedit/synhighlighterxml.pas
View File

@ -211,23 +211,19 @@ constructor TSynXMLSyn.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
fElementAttri:= TSynHighlighterAttributes.Create(SYNS_AttrElementName); fElementAttri:= TSynHighlighterAttributes.Create(SYNS_AttrElementName, SYNS_XML_AttrElementName);
fTextAttri:= TSynHighlighterAttributes.Create(SYNS_AttrText); fTextAttri:= TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
fSpaceAttri:= TSynHighlighterAttributes.Create(SYNS_AttrWhitespace); fSpaceAttri:= TSynHighlighterAttributes.Create(SYNS_AttrWhitespace, SYNS_XML_AttrWhitespace);
fEntityRefAttri:= TSynHighlighterAttributes.Create(SYNS_AttrEntityReference); fEntityRefAttri:= TSynHighlighterAttributes.Create(SYNS_AttrEntityReference, SYNS_XML_AttrEntityReference);
fProcessingInstructionAttri:= TSynHighlighterAttributes.Create( fProcessingInstructionAttri:= TSynHighlighterAttributes.Create(SYNS_AttrProcessingInstr, SYNS_XML_AttrProcessingInstr);
SYNS_AttrProcessingInstr); fCDATAAttri:= TSynHighlighterAttributes.Create(SYNS_AttrCDATASection, SYNS_XML_AttrCDATASection);
fCDATAAttri:= TSynHighlighterAttributes.Create(SYNS_AttrCDATASection); fCommentAttri:= TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
fCommentAttri:= TSynHighlighterAttributes.Create(SYNS_AttrComment); fDocTypeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrDOCTYPESection, SYNS_XML_AttrDOCTYPESection);
fDocTypeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrDOCTYPESection); fAttributeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrAttributeName, SYNS_XML_AttrAttributeName);
fAttributeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrAttributeName); fnsAttributeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrNamespaceAttrName, SYNS_XML_AttrNamespaceAttrName);
fnsAttributeAttri:= TSynHighlighterAttributes.Create( fAttributeValueAttri:= TSynHighlighterAttributes.Create(SYNS_AttrAttributeValue, SYNS_XML_AttrAttributeValue);
SYNS_AttrNamespaceAttrName); fnsAttributeValueAttri:= TSynHighlighterAttributes.Create(SYNS_AttrNamespaceAttrValue, SYNS_XML_AttrNamespaceAttrValue);
fAttributeValueAttri:= TSynHighlighterAttributes.Create( fSymbolAttri:= TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
SYNS_AttrAttributeValue);
fnsAttributeValueAttri:= TSynHighlighterAttributes.Create(
SYNS_AttrNamespaceAttrValue);
fSymbolAttri:= TSynHighlighterAttributes.Create(SYNS_AttrSymbol);
fElementAttri.Foreground:= clMaroon; fElementAttri.Foreground:= clMaroon;
fElementAttri.Style:= [fsBold]; fElementAttri.Style:= [fsBold];