mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-30 23:03:40 +02:00
SynEdit: Fixed the stored property for TSynHighlighterAttributes.<....>Priority
git-svn-id: trunk@64245 -
This commit is contained in:
parent
48dfae77e3
commit
06ee066470
@ -1254,23 +1254,23 @@ end;
|
||||
|
||||
function TSynHighlighterAttributes.GetBackPriorityStored: Boolean;
|
||||
begin
|
||||
Result := FBackPriority = 0;
|
||||
Result := FBackPriority <> 0;
|
||||
end;
|
||||
|
||||
function TSynHighlighterAttributes.GetForePriorityStored: Boolean;
|
||||
begin
|
||||
Result := FForePriority = 0;
|
||||
Result := FForePriority <> 0;
|
||||
end;
|
||||
|
||||
function TSynHighlighterAttributes.GetFramePriorityStored: Boolean;
|
||||
begin
|
||||
Result := FFramePriority = 0;
|
||||
Result := FFramePriority <> 0;
|
||||
end;
|
||||
|
||||
function TSynHighlighterAttributes.GetStylePriorityStored(AIndex: TFontStyle
|
||||
): Boolean;
|
||||
begin
|
||||
Result := FStylePriority[AIndex] = 0;
|
||||
Result := FStylePriority[AIndex] <> 0;
|
||||
end;
|
||||
|
||||
procedure TSynHighlighterAttributes.AssignFrom(Src: TLazSynCustomTextAttributes);
|
||||
|
Loading…
Reference in New Issue
Block a user