anchor.diff:    if not Assigned(FKeywordFont) then
       FKeywordFont := fpgGetFont(edt.FontDesc + ':bold');
     ACanvas.Font := FKeywordFont;
  +  ACanvas.Color := clWhite;
     FRegex.Expression := cKeywords1;
     FRegex.ModifierI := True;
     if FRegex.Exec(ALineText) then
  
positive.code: 
    { syntax highlighting for: cDecimal }
    ACanvas.TextColor := clNavy;
    FRegex.Expression := cDecimal;
    if FRegex.Exec(ALineText) then
    begin
  
negative.code: 
    { syntax highlighting for: comments2 }
    ACanvas.TextColor := clDarkCyan;
    ACanvas.Color := clWhite;
    FRegex.Expression := cComments2;
    if FRegex.Exec(ALineText) then
    begin
  