mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-01 07:29:30 +01:00
synedit: highlighters: using non fixed resourcestrings
git-svn-id: trunk@41721 -
This commit is contained in:
parent
8014b98269
commit
08201e2904
@ -783,7 +783,7 @@ constructor TLazSynDisplayFold.Create(AFoldView: TSynEditFoldedView);
|
||||
begin
|
||||
inherited Create;
|
||||
FFoldView := AFoldView;
|
||||
FTokenAttr := TSynHighlighterAttributesModifier.Create('');
|
||||
FTokenAttr := TSynHighlighterAttributesModifier.Create(nil);
|
||||
end;
|
||||
|
||||
destructor TLazSynDisplayFold.Destroy;
|
||||
|
||||
@ -140,8 +140,8 @@ type
|
||||
procedure DoChange; override;
|
||||
public
|
||||
constructor Create;
|
||||
constructor Create(attribName: string; aStoredName: String = '');
|
||||
constructor Create(attribName: PString; aStoredName: String);
|
||||
constructor Create(aCaption: string; aStoredName: String = '');
|
||||
constructor Create(aCaption: PString; aStoredName: String = '');
|
||||
procedure InternalSaveDefaultValues; virtual;
|
||||
function LoadFromBorlandRegistry(rootKey: HKEY; attrKey, attrName: string;
|
||||
oldStyle: boolean): boolean; virtual;
|
||||
@ -358,7 +358,9 @@ type
|
||||
public
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
function AddSpecialAttribute(const AttribName: string;
|
||||
function AddSpecialAttribute(const aCaption: string;
|
||||
const aStoredName: String = ''): TSynHighlighterAttributes;
|
||||
function AddSpecialAttribute(const aCaption: PString;
|
||||
const aStoredName: String = ''): TSynHighlighterAttributes;
|
||||
procedure Assign(Source: TPersistent); override;
|
||||
procedure BeginUpdate;
|
||||
@ -853,24 +855,24 @@ end;
|
||||
|
||||
{ TSynHighlighterAttributes }
|
||||
|
||||
constructor TSynHighlighterAttributes.Create(attribName: string;
|
||||
constructor TSynHighlighterAttributes.Create(aCaption: string;
|
||||
aStoredName: String = '');
|
||||
begin
|
||||
Create;
|
||||
FConstName := attribName;
|
||||
FConstName := aCaption;
|
||||
FCaption := @FConstName;
|
||||
if aStoredName = '' then
|
||||
aStoredName := FConstName;
|
||||
FStoredName := aStoredName;;
|
||||
end;
|
||||
|
||||
constructor TSynHighlighterAttributes.Create(attribName: PString;
|
||||
constructor TSynHighlighterAttributes.Create(aCaption: PString;
|
||||
aStoredName: String);
|
||||
begin
|
||||
Create;
|
||||
if attribName<>nil then begin
|
||||
FConstName := attribName^;
|
||||
FCaption := attribName;
|
||||
if aCaption<>nil then begin
|
||||
FConstName := aCaption^;
|
||||
FCaption := aCaption;
|
||||
end
|
||||
else begin
|
||||
FConstName := '';
|
||||
@ -1417,10 +1419,17 @@ begin
|
||||
fAttributes.AddObject(AAttrib.StoredName, AAttrib);
|
||||
end;
|
||||
|
||||
function TSynCustomHighlighter.AddSpecialAttribute(const AttribName: string;
|
||||
function TSynCustomHighlighter.AddSpecialAttribute(const aCaption: string;
|
||||
const aStoredName: String): TSynHighlighterAttributes;
|
||||
begin
|
||||
result := TSynHighlighterAttributes.Create(AttribName,aStoredName);
|
||||
result := TSynHighlighterAttributes.Create(aCaption,aStoredName);
|
||||
AddAttribute(result);
|
||||
end;
|
||||
|
||||
function TSynCustomHighlighter.AddSpecialAttribute(const aCaption: PString;
|
||||
const aStoredName: String): TSynHighlighterAttributes;
|
||||
begin
|
||||
Result := TSynHighlighterAttributes.Create(aCaption,aStoredName);
|
||||
AddAttribute(result);
|
||||
end;
|
||||
|
||||
|
||||
@ -388,12 +388,12 @@ begin
|
||||
fObjects := TStringList.Create;
|
||||
TStringList(fObjects).Sorted := True;
|
||||
TStringList(fObjects).Duplicates := dupIgnore;
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fConstantAttri := TSynHighlighterAttributes.Create('jan_constant');
|
||||
@ -412,19 +412,19 @@ begin
|
||||
fDotAttri.Style := [fsBold];
|
||||
fDotAttri.Foreground:=clgreen;
|
||||
AddAttribute(fDotAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create('jan_Variable');
|
||||
fVariableAttri.Style := [fsBold];
|
||||
fVariableAttri.Foreground:=clpurple;
|
||||
AddAttribute(fVariableAttri);
|
||||
fPreprocessorAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
|
||||
fPreprocessorAttri := TSynHighlighterAttributes.Create(@SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
|
||||
AddAttribute(fPreprocessorAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
|
||||
@ -387,21 +387,21 @@ end;
|
||||
constructor TSynBatSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
fCommentAttri.Foreground := clNavy;
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrKey);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber);
|
||||
fNumberAttri.Foreground := clBlue;
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(@SYNS_AttrVariable);
|
||||
fVariableAttri.Foreground := clGreen;
|
||||
AddAttribute(fVariableAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -771,28 +771,28 @@ end;
|
||||
constructor TSynCppSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
|
||||
fAsmAttri := TSynHighlighterAttributes.Create(@SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
|
||||
AddAttribute(fAsmAttri);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style:= [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
|
||||
AddAttribute(fInvalidAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style:= [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri.Foreground := clWindow;
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fDirecAttri := TSynHighlighterAttributes.Create(SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
|
||||
fDirecAttri := TSynHighlighterAttributes.Create(@SYNS_AttrPreprocessor, SYNS_XML_AttrPreprocessor);
|
||||
AddAttribute(fDirecAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
InitIdent;
|
||||
@ -1604,16 +1604,16 @@ function TSynCppSyn.UseUserSettings(settingIndex: integer): boolean;
|
||||
EnumUserSettings(s);
|
||||
if settingIndex >= s.Count then Result := false
|
||||
else begin
|
||||
tmpStringAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpNumberAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpKeyAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpSymbolAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpAsmAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpCommentAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpIdentifierAttri:= TSynHighlighterAttributes.Create('');
|
||||
tmpInvalidAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpSpaceAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpDirecAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpStringAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpNumberAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpKeyAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpSymbolAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpAsmAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpCommentAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpIdentifierAttri:= TSynHighlighterAttributes.Create(nil);
|
||||
tmpInvalidAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpSpaceAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpDirecAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpStringAttri .Assign(fStringAttri);
|
||||
tmpNumberAttri .Assign(fNumberAttri);
|
||||
tmpKeyAttri .Assign(fKeyAttri);
|
||||
|
||||
@ -1691,21 +1691,21 @@ end;
|
||||
constructor TSynCssSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey, SYNS_XML_AttrKey);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrKey, SYNS_XML_AttrKey);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
InitIdent;
|
||||
|
||||
@ -482,55 +482,55 @@ constructor TSynDiffSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
|
||||
FUnknownAttri := TSynHighlighterAttributes.Create(SYNS_AttrUnknownWord, SYNS_XML_AttrUnknownWord);
|
||||
FUnknownAttri := TSynHighlighterAttributes.Create(@SYNS_AttrUnknownWord, SYNS_XML_AttrUnknownWord);
|
||||
FUnknownAttri.Style := [fsItalic];
|
||||
AddAttribute(FUnknownAttri);
|
||||
|
||||
FSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
FSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(FSpaceAttri);
|
||||
|
||||
FOrigFileAttri := TSynHighlighterAttributes.Create(SYNS_AttrOrigFile, SYNS_XML_AttrOrigFile);
|
||||
FOrigFileAttri := TSynHighlighterAttributes.Create(@SYNS_AttrOrigFile, SYNS_XML_AttrOrigFile);
|
||||
FOrigFileAttri.Style := [fsBold];
|
||||
FOrigFileAttri.Background := clRed;
|
||||
AddAttribute(FOrigFileAttri);
|
||||
|
||||
FNewFileAttri := TSynHighlighterAttributes.Create(SYNS_AttrNewFile, SYNS_XML_AttrNewFile);
|
||||
FNewFileAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNewFile, SYNS_XML_AttrNewFile);
|
||||
FNewFileAttri.Style := [fsBold];
|
||||
FNewFileAttri.Background := clGreen;
|
||||
AddAttribute(FNewFileAttri);
|
||||
|
||||
FChunkMarkerAttri := TSynHighlighterAttributes.Create(SYNS_AttrChunkMarker, SYNS_XML_AttrChunkMarker);
|
||||
FChunkMarkerAttri := TSynHighlighterAttributes.Create(@SYNS_AttrChunkMarker, SYNS_XML_AttrChunkMarker);
|
||||
FChunkMarkerAttri.Style := [fsBold];
|
||||
AddAttribute(FChunkMarkerAttri);
|
||||
|
||||
FChunkNewAttri := TSynHighlighterAttributes.Create(SYNS_AttrChunkNew, SYNS_XML_AttrChunkNew);
|
||||
FChunkNewAttri := TSynHighlighterAttributes.Create(@SYNS_AttrChunkNew, SYNS_XML_AttrChunkNew);
|
||||
FChunkNewAttri.Style := [fsBold];
|
||||
FChunkNewAttri.Foreground := clGreen;
|
||||
AddAttribute(FChunkNewAttri);
|
||||
|
||||
FChunkOldAttri := TSynHighlighterAttributes.Create(SYNS_AttrChunkOrig, SYNS_XML_AttrChunkOrig);
|
||||
FChunkOldAttri := TSynHighlighterAttributes.Create(@SYNS_AttrChunkOrig, SYNS_XML_AttrChunkOrig);
|
||||
FChunkOldAttri.Style := [fsBold];
|
||||
FChunkOldAttri.Foreground := clRed;
|
||||
AddAttribute(FChunkOldAttri);
|
||||
|
||||
FChunkMixedAttri := TSynHighlighterAttributes.Create(SYNS_AttrChunkMixed, SYNS_XML_AttrChunkMixed);
|
||||
FChunkMixedAttri := TSynHighlighterAttributes.Create(@SYNS_AttrChunkMixed, SYNS_XML_AttrChunkMixed);
|
||||
FChunkMixedAttri.Style := [fsBold];
|
||||
FChunkMixedAttri.Foreground := clPurple;
|
||||
AddAttribute(FChunkMixedAttri);
|
||||
|
||||
FLineAddedAttri := TSynHighlighterAttributes.Create(SYNS_AttrLineAdded, SYNS_XML_AttrLineAdded);
|
||||
FLineAddedAttri := TSynHighlighterAttributes.Create(@SYNS_AttrLineAdded, SYNS_XML_AttrLineAdded);
|
||||
FLineAddedAttri.Foreground := clGreen;
|
||||
AddAttribute(FLineAddedAttri);
|
||||
|
||||
FLineRemovedAttri := TSynHighlighterAttributes.Create(SYNS_AttrLineRemoved, SYNS_XML_AttrLineRemoved);
|
||||
FLineRemovedAttri := TSynHighlighterAttributes.Create(@SYNS_AttrLineRemoved, SYNS_XML_AttrLineRemoved);
|
||||
FLineRemovedAttri.Foreground := clRed;
|
||||
AddAttribute(FLineRemovedAttri);
|
||||
|
||||
FLineChangedAttri := TSynHighlighterAttributes.Create(SYNS_AttrLineChanged, SYNS_XML_AttrLineChanged);
|
||||
FLineChangedAttri := TSynHighlighterAttributes.Create(@SYNS_AttrLineChanged, SYNS_XML_AttrLineChanged);
|
||||
FLineChangedAttri.Foreground := clPurple;
|
||||
AddAttribute(FLineChangedAttri);
|
||||
|
||||
FLineContextAttri := TSynHighlighterAttributes.Create(SYNS_AttrLineContext, SYNS_XML_AttrLineContext);
|
||||
FLineContextAttri := TSynHighlighterAttributes.Create(@SYNS_AttrLineContext, SYNS_XML_AttrLineContext);
|
||||
AddAttribute(FLineContextAttri);
|
||||
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -2284,53 +2284,53 @@ begin
|
||||
inherited Create(AOwner);
|
||||
FMode := shmHtml;
|
||||
|
||||
fASPAttri := TSynHighlighterAttributes.Create(SYNS_AttrASP, SYNS_XML_AttrASP);
|
||||
fASPAttri := TSynHighlighterAttributes.Create(@SYNS_AttrASP, SYNS_XML_AttrASP);
|
||||
fASPAttri.Foreground := clBlack;
|
||||
fASPAttri.Background := clYellow;
|
||||
AddAttribute(fASPAttri);
|
||||
|
||||
fCDATAAttri := TSynHighlighterAttributes.Create(SYNS_AttrCDATA, SYNS_XML_AttrCDATA);
|
||||
fCDATAAttri := TSynHighlighterAttributes.Create(@SYNS_AttrCDATA, SYNS_XML_AttrCDATA);
|
||||
fCDATAAttri.Foreground := clGreen;
|
||||
AddAttribute(fCDATAAttri);
|
||||
|
||||
fDOCTYPEAttri := TSynHighlighterAttributes.Create(SYNS_AttrDOCTYPE, SYNS_XML_AttrDOCTYPE);
|
||||
fDOCTYPEAttri := TSynHighlighterAttributes.Create(@SYNS_AttrDOCTYPE, SYNS_XML_AttrDOCTYPE);
|
||||
fDOCTYPEAttri.Foreground := clBlack;
|
||||
fDOCTYPEAttri.Background := clYellow;
|
||||
fDOCTYPEAttri.Style := [fsBold];
|
||||
AddAttribute(fDOCTYPEAttri);
|
||||
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
AddAttribute(fCommentAttri);
|
||||
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri.Style := [fsBold];
|
||||
AddAttribute(fIdentifierAttri);
|
||||
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
fKeyAttri.Foreground := $00ff0080;
|
||||
AddAttribute(fKeyAttri);
|
||||
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri.Style := [fsBold];
|
||||
AddAttribute(fSymbolAttri);
|
||||
|
||||
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
|
||||
fTextAttri := TSynHighlighterAttributes.Create(@SYNS_AttrText, SYNS_XML_AttrText);
|
||||
AddAttribute(fTextAttri);
|
||||
|
||||
fUndefKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrUnknownWord, SYNS_XML_AttrUnknownWord);
|
||||
fUndefKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrUnknownWord, SYNS_XML_AttrUnknownWord);
|
||||
fUndefKeyAttri.Style := [fsBold];
|
||||
fUndefKeyAttri.Foreground := clRed;
|
||||
AddAttribute(fUndefKeyAttri);
|
||||
|
||||
fValueAttri := TSynHighlighterAttributes.Create(SYNS_AttrValue, SYNS_XML_AttrValue);
|
||||
fValueAttri := TSynHighlighterAttributes.Create(@SYNS_AttrValue, SYNS_XML_AttrValue);
|
||||
fValueAttri.Foreground := $00ff8000;
|
||||
AddAttribute(fValueAttri);
|
||||
|
||||
fAndAttri := TSynHighlighterAttributes.Create(SYNS_AttrEscapeAmpersand, SYNS_XML_AttrEscapeAmpersand);
|
||||
fAndAttri := TSynHighlighterAttributes.Create(@SYNS_AttrEscapeAmpersand, SYNS_XML_AttrEscapeAmpersand);
|
||||
fAndAttri.Style := [fsBold];
|
||||
fAndAttri.Foreground := $0000ff00;
|
||||
AddAttribute(fAndAttri);
|
||||
|
||||
@ -159,25 +159,25 @@ end;
|
||||
constructor TSynIniSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
fCommentAttri.Foreground := clGreen;
|
||||
AddAttribute(fCommentAttri);
|
||||
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText);
|
||||
fTextAttri := TSynHighlighterAttributes.Create(@SYNS_AttrText);
|
||||
AddAttribute(fTextAttri);
|
||||
fSectionAttri := TSynHighlighterAttributes.Create(SYNS_AttrSection);
|
||||
fSectionAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSection);
|
||||
fSectionAttri.Style := [fsBold];
|
||||
AddAttribute(fSectionAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrKey);
|
||||
fKeyAttri.Foreground := clBlue;
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol);
|
||||
fSymbolAttri.Foreground := clRed;
|
||||
AddAttribute(fSymbolAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -649,27 +649,27 @@ end;
|
||||
constructor TSynJavaSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fDocumentAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
|
||||
fDocumentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
|
||||
fDocumentAttri.Style := [fsItalic];
|
||||
AddAttribute(fDocumentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(@SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
|
||||
AddAttribute(fInvalidAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri.Foreground := clWindow;
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fRange := rsUnknown;
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -1494,25 +1494,25 @@ end;
|
||||
constructor TSynJScriptSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNonReservedKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
|
||||
fNonReservedKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
|
||||
AddAttribute(fNonReservedKeyAttri);
|
||||
fEventAttri := TSynHighlighterAttributes.Create(SYNS_AttrEvent, SYNS_XML_AttrEvent);
|
||||
fEventAttri := TSynHighlighterAttributes.Create(@SYNS_AttrEvent, SYNS_XML_AttrEvent);
|
||||
AddAttribute(fEventAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
InitIdent;
|
||||
|
||||
@ -276,21 +276,21 @@ end;
|
||||
constructor TSynLFMSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey, SYNS_XML_AttrKey);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrKey, SYNS_XML_AttrKey);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
MakeMethodTables;
|
||||
|
||||
@ -1817,7 +1817,7 @@ begin
|
||||
FStartExprScanner := TRegExpr.Create;
|
||||
FEndExprScanner := TRegExpr.Create;
|
||||
fCaseSensitive := True;
|
||||
fMarkerAttri := TSynHighlighterAttributes.Create(SYNS_AttrMarker, SYNS_XML_AttrMarker);
|
||||
fMarkerAttri := TSynHighlighterAttributes.Create(@SYNS_AttrMarker, SYNS_XML_AttrMarker);
|
||||
fMarkerAttri.OnChange := @MarkerAttriChanged;
|
||||
MarkerAttri.Background := clYellow;
|
||||
MarkerAttri.Style := [fsBold];
|
||||
|
||||
@ -2258,34 +2258,34 @@ begin
|
||||
FExtendedKeywordsMode := False;
|
||||
CreateDividerDrawConfig;
|
||||
fD4syntax := true;
|
||||
fAsmAttri := TSynHighlighterAttributes.Create(SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
|
||||
fAsmAttri := TSynHighlighterAttributes.Create(@SYNS_AttrAssembler, SYNS_XML_AttrAssembler);
|
||||
AddAttribute(fAsmAttri);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style:= [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
FIDEDirectiveAttri := TSynHighlighterAttributesModifier.Create(SYNS_AttrIDEDirective, SYNS_XML_AttrIDEDirective);
|
||||
FIDEDirectiveAttri := TSynHighlighterAttributesModifier.Create(@SYNS_AttrIDEDirective, SYNS_XML_AttrIDEDirective);
|
||||
AddAttribute(FIDEDirectiveAttri);
|
||||
// FCurIDEDirectiveAttri, FCurCaseLabelAttri
|
||||
// They are not available through the "Attribute" property (not added via AddAttribute
|
||||
// But they are returned via GetTokenAttribute, so they should have a name.
|
||||
FCurIDEDirectiveAttri := TSynSelectedColorMergeResult.Create(SYNS_AttrIDEDirective, SYNS_XML_AttrIDEDirective);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
FCurIDEDirectiveAttri := TSynSelectedColorMergeResult.Create(@SYNS_AttrIDEDirective, SYNS_XML_AttrIDEDirective);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style:= [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
FCaseLabelAttri := TSynHighlighterAttributesModifier.Create(SYNS_AttrCaseLabel, SYNS_XML_AttrCaseLabel);
|
||||
FCaseLabelAttri := TSynHighlighterAttributesModifier.Create(@SYNS_AttrCaseLabel, SYNS_XML_AttrCaseLabel);
|
||||
AddAttribute(FCaseLabelAttri);
|
||||
FCurCaseLabelAttri := TSynSelectedColorMergeResult.Create(SYNS_AttrCaseLabel, SYNS_XML_AttrCaseLabel);
|
||||
fDirectiveAttri := TSynHighlighterAttributes.Create(SYNS_AttrDirective, SYNS_XML_AttrDirective);
|
||||
FCurCaseLabelAttri := TSynSelectedColorMergeResult.Create(@SYNS_AttrCaseLabel, SYNS_XML_AttrCaseLabel);
|
||||
fDirectiveAttri := TSynHighlighterAttributes.Create(@SYNS_AttrDirective, SYNS_XML_AttrDirective);
|
||||
fDirectiveAttri.Style:= [fsItalic];
|
||||
AddAttribute(fDirectiveAttri);
|
||||
CompilerMode:=pcmDelphi;
|
||||
@ -4021,15 +4021,15 @@ function TSynPasSyn.UseUserSettings(settingIndex: integer): boolean;
|
||||
EnumUserSettings(s);
|
||||
if (settingIndex < 0) or (settingIndex >= s.Count) then Result := false
|
||||
else begin
|
||||
tmpStringAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpNumberAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpKeyAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpSymbolAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpAsmAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpCommentAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpDirectiveAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpIdentifierAttri:= TSynHighlighterAttributes.Create('');
|
||||
tmpSpaceAttri := TSynHighlighterAttributes.Create('');
|
||||
tmpStringAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpNumberAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpKeyAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpSymbolAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpAsmAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpCommentAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpDirectiveAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpIdentifierAttri:= TSynHighlighterAttributes.Create(nil);
|
||||
tmpSpaceAttri := TSynHighlighterAttributes.Create(nil);
|
||||
tmpStringAttri .Assign(fStringAttri);
|
||||
tmpNumberAttri .Assign(fNumberAttri);
|
||||
tmpKeyAttri .Assign(fKeyAttri);
|
||||
|
||||
@ -1992,31 +1992,31 @@ end;
|
||||
constructor TSynPerlSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style:= [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
|
||||
fInvalidAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIllegalChar, SYNS_XML_AttrIllegalChar);
|
||||
AddAttribute(fInvalidAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style:= [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fOperatorAttri := TSynHighlighterAttributes.Create(SYNS_AttrOperator, SYNS_XML_AttrOperator);
|
||||
fOperatorAttri := TSynHighlighterAttributes.Create(@SYNS_AttrOperator, SYNS_XML_AttrOperator);
|
||||
AddAttribute(fOperatorAttri);
|
||||
fPragmaAttri := TSynHighlighterAttributes.Create(SYNS_AttrPragma, SYNS_XML_AttrPragma);
|
||||
fPragmaAttri := TSynHighlighterAttributes.Create(@SYNS_AttrPragma, SYNS_XML_AttrPragma);
|
||||
fPragmaAttri.Style := [fsBold];
|
||||
AddAttribute(fPragmaAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri.Foreground := clWindow;
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(@SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVariableAttri.Style := [fsBold];
|
||||
AddAttribute(fVariableAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -644,25 +644,25 @@ constructor TSynPHPSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
{begin} //mh 2000-01-14
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fInvalidSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
|
||||
fInvalidSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrInvalidSymbol, SYNS_XML_AttrInvalidSymbol);
|
||||
AddAttribute(fInvalidSymbolAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(@SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
AddAttribute(fVariableAttri);
|
||||
{end} //mh 2000-01-14
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -135,37 +135,37 @@ end;
|
||||
constructor TSynPoSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
fCommentAttri.Foreground := clGreen;
|
||||
AddAttribute(fCommentAttri);
|
||||
|
||||
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText);
|
||||
fTextAttri := TSynHighlighterAttributes.Create(@SYNS_AttrText);
|
||||
AddAttribute(fTextAttri);
|
||||
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrKey);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrKey);
|
||||
fKeyAttri.Foreground := clBlue;
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
|
||||
fIdentAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentAttri.Foreground := clGreen;
|
||||
fIdentAttri.Style := [fsBold];
|
||||
AddAttribute(fIdentAttri);
|
||||
|
||||
fPrevAttri := TSynHighlighterAttributes.Create(SYNS_AttrPrevValue, SYNS_XML_AttrPrevValue);
|
||||
fPrevAttri := TSynHighlighterAttributes.Create(@SYNS_AttrPrevValue, SYNS_XML_AttrPrevValue);
|
||||
fPrevAttri.Foreground := clOlive;
|
||||
fPrevAttri.Style := [fsItalic];
|
||||
AddAttribute(fPrevAttri);
|
||||
|
||||
fFlagAttri := TSynHighlighterAttributes.Create(SYNS_AttrFlags, SYNS_XML_AttrFlags);
|
||||
fFlagAttri := TSynHighlighterAttributes.Create(@SYNS_AttrFlags, SYNS_XML_AttrFlags);
|
||||
fFlagAttri.Foreground := clTeal;
|
||||
AddAttribute(fFlagAttri);
|
||||
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri.Foreground := clFuchsia;
|
||||
AddAttribute(fStringAttri);
|
||||
|
||||
|
||||
@ -153,7 +153,7 @@ begin
|
||||
inherited Create(TheOwner);
|
||||
fTokens:=TList.Create;
|
||||
fCopiedAttributes:=TList.Create;
|
||||
fTextAttri := TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
|
||||
fTextAttri := TSynHighlighterAttributes.Create(@SYNS_AttrText, SYNS_XML_AttrText);
|
||||
AddAttribute(fTextAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -420,7 +420,7 @@ begin
|
||||
dec(i);
|
||||
end;
|
||||
// create new attribute
|
||||
CurAttr:=TSynHighlighterAttributes.Create('');
|
||||
CurAttr:=TSynHighlighterAttributes.Create(nil);
|
||||
CurAttr.Assign(Attr);
|
||||
fCopiedAttributes.Add(CurAttr);
|
||||
Result:= -fCopiedAttributes.Count;
|
||||
|
||||
@ -385,45 +385,45 @@ begin
|
||||
FKeywords.Assign (GetKeywordIdentifiers);
|
||||
|
||||
fRange := rsUnknown;
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Foreground := clGray;
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNonKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
|
||||
fNonKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNonReservedKeyword, SYNS_XML_AttrNonReservedKeyword);
|
||||
fNonKeyAttri.Foreground := clNavy;
|
||||
fNonKeyAttri.Style := [fsBold];
|
||||
AddAttribute (fNonKeyAttri);
|
||||
fSystemAttri := TSynHighlighterAttributes.Create(SYNS_AttrSystem, SYNS_XML_AttrSystem);
|
||||
fSystemAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSystem, SYNS_XML_AttrSystem);
|
||||
fSystemAttri.Style := [fsBold];
|
||||
AddAttribute (fSystemAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri.Foreground := clBlue;
|
||||
AddAttribute(fNumberAttri);
|
||||
fHexAttri := TSynHighlighterAttributes.Create(SYNS_AttrHexadecimal, SYNS_XML_AttrHexadecimal);
|
||||
fHexAttri := TSynHighlighterAttributes.Create(@SYNS_AttrHexadecimal, SYNS_XML_AttrHexadecimal);
|
||||
fHexAttri.Foreground := clBlue;
|
||||
AddAttribute(fHexAttri);
|
||||
fOctalAttri := TSynHighlighterAttributes.Create(SYNS_AttrOctal, SYNS_XML_AttrOctal);
|
||||
fOctalAttri := TSynHighlighterAttributes.Create(@SYNS_AttrOctal, SYNS_XML_AttrOctal);
|
||||
fOctalAttri.Foreground := clBlue;
|
||||
AddAttribute(fOctalAttri);
|
||||
fFloatAttri := TSynHighlighterAttributes.Create(SYNS_AttrFloat, SYNS_XML_AttrFloat);
|
||||
fFloatAttri := TSynHighlighterAttributes.Create(@SYNS_AttrFloat, SYNS_XML_AttrFloat);
|
||||
fFloatAttri.Foreground := clBlue;
|
||||
AddAttribute(fFloatAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri.Foreground := clBlue;
|
||||
AddAttribute(fStringAttri);
|
||||
fDocStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
|
||||
fDocStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrDocumentation, SYNS_XML_AttrDocumentation);
|
||||
fDocStringAttri.Foreground := clTeal;
|
||||
AddAttribute(fDocStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fErrorAttri := TSynHighlighterAttributes.Create(SYNS_AttrSyntaxError, SYNS_XML_AttrSyntaxError);
|
||||
fErrorAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSyntaxError, SYNS_XML_AttrSyntaxError);
|
||||
fErrorAttri.Foreground := clRed;
|
||||
AddAttribute(fErrorAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
|
||||
@ -1166,50 +1166,50 @@ begin
|
||||
fKeywords := TSynHashEntryList.Create;
|
||||
fTableNames := TStringList.Create;
|
||||
TStringList(fTableNames).OnChange := @TableNamesChanged;
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style := [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fDataTypeAttri := TSynHighlighterAttributes.Create(SYNS_AttrDataType, SYNS_XML_AttrDataType);
|
||||
fDataTypeAttri := TSynHighlighterAttributes.Create(@SYNS_AttrDataType, SYNS_XML_AttrDataType);
|
||||
fDataTypeAttri.Style := [fsBold];
|
||||
AddAttribute(fDataTypeAttri);
|
||||
{begin} // DJLP 2000-08-11
|
||||
fDefaultPackageAttri :=
|
||||
TSynHighlighterAttributes.Create(SYNS_AttrDefaultPackage, SYNS_XML_AttrDefaultPackage);
|
||||
TSynHighlighterAttributes.Create(@SYNS_AttrDefaultPackage, SYNS_XML_AttrDefaultPackage);
|
||||
fDefaultPackageAttri.Style := [fsBold];
|
||||
AddAttribute(fDefaultPackageAttri);
|
||||
{end} // DJLP 2000-08-11
|
||||
fExceptionAttri := TSynHighlighterAttributes.Create(SYNS_AttrException, SYNS_XML_AttrException);
|
||||
fExceptionAttri := TSynHighlighterAttributes.Create(@SYNS_AttrException, SYNS_XML_AttrException);
|
||||
fExceptionAttri.Style := [fsItalic];
|
||||
AddAttribute(fExceptionAttri);
|
||||
fFunctionAttri := TSynHighlighterAttributes.Create(SYNS_AttrFunction, SYNS_XML_AttrFunction);
|
||||
fFunctionAttri := TSynHighlighterAttributes.Create(@SYNS_AttrFunction, SYNS_XML_AttrFunction);
|
||||
fFunctionAttri.Style := [fsBold];
|
||||
AddAttribute(fFunctionAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
{begin} // DJLP 2000-08-11
|
||||
fPLSQLAttri := TSynHighlighterAttributes.Create(SYNS_AttrPLSQL, SYNS_XML_AttrPLSQL);
|
||||
fPLSQLAttri := TSynHighlighterAttributes.Create(@SYNS_AttrPLSQL, SYNS_XML_AttrPLSQL);
|
||||
fPLSQLAttri.Style := [fsBold];
|
||||
AddAttribute(fPLSQLAttri);
|
||||
{end} // DJLP 2000-08-11
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
{begin} // DJLP 2000-09-05
|
||||
fSQLPlusAttri:=TSynHighlighterAttributes.Create(SYNS_AttrSQLPlus, SYNS_XML_AttrSQLPlus);
|
||||
fSQLPlusAttri:=TSynHighlighterAttributes.Create(@SYNS_AttrSQLPlus, SYNS_XML_AttrSQLPlus);
|
||||
fSQLPlusAttri.Style := [fsBold];
|
||||
AddAttribute(fSQLPlusAttri);
|
||||
{end} // DJLP 2000-09-05
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_Attrstring, SYNS_XML_Attrstring);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_Attrstring, SYNS_XML_Attrstring);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
fTableNameAttri := TSynHighlighterAttributes.Create(SYNS_AttrTableName, SYNS_XML_AttrTableName);
|
||||
fTableNameAttri := TSynHighlighterAttributes.Create(@SYNS_AttrTableName, SYNS_XML_AttrTableName);
|
||||
AddAttribute(fTableNameAttri);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVariableAttri := TSynHighlighterAttributes.Create(@SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
AddAttribute(fVariableAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
MakeMethodTables;
|
||||
|
||||
@ -69,7 +69,7 @@ type
|
||||
fBracketAttri: TSynHighlighterAttributes;
|
||||
fBraceAttri: TSynHighlighterAttributes;
|
||||
|
||||
function CreateHighlighterAttributes(AName:String; Foreground,
|
||||
function CreateHighlighterAttributes(AName:PString; Foreground,
|
||||
Background: TColor;
|
||||
FontStyles: TFontStyles) :
|
||||
TSynHighlighterAttributes;
|
||||
@ -155,26 +155,26 @@ constructor TSynTeXSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
|
||||
fCommentAttri:=CreateHighlighterAttributes(SYNS_AttrComment,clTeal,clNone,[]);
|
||||
fCommentAttri:=CreateHighlighterAttributes(@SYNS_AttrComment,clTeal,clNone,[]);
|
||||
AddAttribute(fCommentAttri);
|
||||
|
||||
fTextAttri:= CreateHighlighterAttributes(SYNS_AttrText,clBlack,clNone,[]);
|
||||
fTextAttri:= CreateHighlighterAttributes(@SYNS_AttrText,clBlack,clNone,[]);
|
||||
AddAttribute(fTextAttri);
|
||||
|
||||
fMathmodeAttri:=CreateHighlighterAttributes(SYNS_AttrMathmode,clOlive,clNone,[fsbold]);
|
||||
fMathmodeAttri:=CreateHighlighterAttributes(@SYNS_AttrMathmode,clOlive,clNone,[fsbold]);
|
||||
AddAttribute(fMathmodeAttri);
|
||||
|
||||
fSpaceAttri:=CreateHighlighterAttributes(SYNS_AttrSpace,clNone,clWhite,[]);
|
||||
fSpaceAttri:=CreateHighlighterAttributes(@SYNS_AttrSpace,clNone,clWhite,[]);
|
||||
AddAttribute(fSpaceAttri);
|
||||
|
||||
fControlSequenceAttri:=CreateHighlighterAttributes(SYNS_AttrTexCommand,clBlue,clWhite,[fsBold]);
|
||||
fControlSequenceAttri:=CreateHighlighterAttributes(@SYNS_AttrTexCommand,clBlue,clWhite,[fsBold]);
|
||||
AddAttribute(fControlSequenceAttri);
|
||||
|
||||
fBracketAttri:=CreateHighlighterAttributes(SYNS_AttrSquareBracket,clPurple,clNone,[]);
|
||||
fBracketAttri:=CreateHighlighterAttributes(@SYNS_AttrSquareBracket,clPurple,clNone,[]);
|
||||
AddAttribute(fBracketAttri);
|
||||
|
||||
fBraceAttri:=
|
||||
CreateHighlighterAttributes(SYNS_AttrRoundBracket,clRed,clNone,[fsBold]);
|
||||
CreateHighlighterAttributes(@SYNS_AttrRoundBracket,clRed,clNone,[fsBold]);
|
||||
AddAttribute(fBraceAttri);
|
||||
|
||||
//*************************
|
||||
@ -366,7 +366,7 @@ end; { GetLanguageName }
|
||||
|
||||
|
||||
|
||||
function TSynTeXSyn.CreateHighlighterAttributes(AName:String; Foreground,
|
||||
function TSynTeXSyn.CreateHighlighterAttributes(AName:PString; Foreground,
|
||||
Background: TColor;
|
||||
FontStyles: TFontStyles) :
|
||||
TSynHighlighterAttributes;
|
||||
|
||||
@ -287,29 +287,29 @@ begin
|
||||
fSecondKeys.Add(ShellScriptSecondKeys[i]);
|
||||
end;
|
||||
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Foreground := clGreen;
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Foreground := clNavy;
|
||||
fKeyAttri.Style := [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fSecondKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrSecondReservedWord, SYNS_XML_AttrSecondReservedWord);
|
||||
fSecondKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSecondReservedWord, SYNS_XML_AttrSecondReservedWord);
|
||||
AddAttribute(fSecondKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri.Foreground := clBlue;
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri.Foreground := clMaroon;
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri.Foreground := clRed;
|
||||
AddAttribute(fSymbolAttri);
|
||||
fVarAttri := TSynHighlighterAttributes.Create(SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVarAttri := TSynHighlighterAttributes.Create(@SYNS_AttrVariable, SYNS_XML_AttrVariable);
|
||||
fVarAttri.Foreground := clPurple;
|
||||
AddAttribute(fVarAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange); ////TL 2003-06-11: added the @prefix to DefHighlightChange
|
||||
|
||||
@ -1019,21 +1019,21 @@ end;
|
||||
constructor TSynVBSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri := TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fCommentAttri.Style:= [fsItalic];
|
||||
AddAttribute(fCommentAttri);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
fIdentifierAttri := TSynHighlighterAttributes.Create(@SYNS_AttrIdentifier, SYNS_XML_AttrIdentifier);
|
||||
AddAttribute(fIdentifierAttri);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri := TSynHighlighterAttributes.Create(@SYNS_AttrReservedWord, SYNS_XML_AttrReservedWord);
|
||||
fKeyAttri.Style:= [fsBold];
|
||||
AddAttribute(fKeyAttri);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
fNumberAttri := TSynHighlighterAttributes.Create(@SYNS_AttrNumber, SYNS_XML_AttrNumber);
|
||||
AddAttribute(fNumberAttri);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
fSpaceAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSpace, SYNS_XML_AttrSpace);
|
||||
AddAttribute(fSpaceAttri);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(SYNS_AttrString, SYNS_XML_AttrString);
|
||||
fStringAttri := TSynHighlighterAttributes.Create(@SYNS_AttrString, SYNS_XML_AttrString);
|
||||
AddAttribute(fStringAttri);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fSymbolAttri := TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
AddAttribute(fSymbolAttri);
|
||||
SetAttributesOnChange(@DefHighlightChange);
|
||||
InitIdent;
|
||||
|
||||
@ -225,19 +225,19 @@ constructor TSynXMLSyn.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
|
||||
fElementAttri:= TSynHighlighterAttributes.Create(SYNS_AttrElementName, SYNS_XML_AttrElementName);
|
||||
fTextAttri:= TSynHighlighterAttributes.Create(SYNS_AttrText, SYNS_XML_AttrText);
|
||||
fSpaceAttri:= TSynHighlighterAttributes.Create(SYNS_AttrWhitespace, SYNS_XML_AttrWhitespace);
|
||||
fEntityRefAttri:= TSynHighlighterAttributes.Create(SYNS_AttrEntityReference, SYNS_XML_AttrEntityReference);
|
||||
fProcessingInstructionAttri:= TSynHighlighterAttributes.Create(SYNS_AttrProcessingInstr, SYNS_XML_AttrProcessingInstr);
|
||||
fCDATAAttri:= TSynHighlighterAttributes.Create(SYNS_AttrCDATASection, SYNS_XML_AttrCDATASection);
|
||||
fCommentAttri:= TSynHighlighterAttributes.Create(SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fDocTypeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrDOCTYPESection, SYNS_XML_AttrDOCTYPESection);
|
||||
fAttributeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrAttributeName, SYNS_XML_AttrAttributeName);
|
||||
fnsAttributeAttri:= TSynHighlighterAttributes.Create(SYNS_AttrNamespaceAttrName, SYNS_XML_AttrNamespaceAttrName);
|
||||
fAttributeValueAttri:= TSynHighlighterAttributes.Create(SYNS_AttrAttributeValue, SYNS_XML_AttrAttributeValue);
|
||||
fnsAttributeValueAttri:= TSynHighlighterAttributes.Create(SYNS_AttrNamespaceAttrValue, SYNS_XML_AttrNamespaceAttrValue);
|
||||
fSymbolAttri:= TSynHighlighterAttributes.Create(SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
fElementAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrElementName, SYNS_XML_AttrElementName);
|
||||
fTextAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrText, SYNS_XML_AttrText);
|
||||
fSpaceAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrWhitespace, SYNS_XML_AttrWhitespace);
|
||||
fEntityRefAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrEntityReference, SYNS_XML_AttrEntityReference);
|
||||
fProcessingInstructionAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrProcessingInstr, SYNS_XML_AttrProcessingInstr);
|
||||
fCDATAAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrCDATASection, SYNS_XML_AttrCDATASection);
|
||||
fCommentAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrComment, SYNS_XML_AttrComment);
|
||||
fDocTypeAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrDOCTYPESection, SYNS_XML_AttrDOCTYPESection);
|
||||
fAttributeAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrAttributeName, SYNS_XML_AttrAttributeName);
|
||||
fnsAttributeAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrNamespaceAttrName, SYNS_XML_AttrNamespaceAttrName);
|
||||
fAttributeValueAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrAttributeValue, SYNS_XML_AttrAttributeValue);
|
||||
fnsAttributeValueAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrNamespaceAttrValue, SYNS_XML_AttrNamespaceAttrValue);
|
||||
fSymbolAttri:= TSynHighlighterAttributes.Create(@SYNS_AttrSymbol, SYNS_XML_AttrSymbol);
|
||||
|
||||
fElementAttri.Foreground:= clMaroon;
|
||||
fElementAttri.Style:= [fsBold];
|
||||
|
||||
Loading…
Reference in New Issue
Block a user