anchor.diff:    if OpenDialog.Execute then
     begin
       SynEdit1.Lines.LoadFromFile(OpenDialog.FileName);
  +    FNodeFileName := OpenDialog.FileName;
       UpdateNode;
       UpdateRanges;
  +    UpdateCaption;
     end;
   end;
   
  
positive.code:   begin
      UpdateNode;
      UpdateRanges;
    end;
  end;
  
  
negative.code:     procedure HandleSyntaxTreeGetColor(Sender: TObject; ANode: TSyntaxNode; ALevel: Integer; var AColor: TColor);
      procedure HandleSyntaxTreeFocused(Sender: TObject; ANode: TSyntaxNode);
      {$ENDIF}
      procedure UpdateCaption;
      procedure UpdateNode;
      procedure UpdateRanges;
    public
  