anchor.diff:  interface
   
   uses
  -  SysUtils, Classes, fpg_base, fpg_main, fpg_form, fpg_memo, fpg_button;
  +  SysUtils,
  +  Classes,
  +  fpg_base,
  +  fpg_main,
  +  fpg_form,
  +  fpg_memo,
  +  fpg_button;
   
   type
   
  
positive.code:     function    GetText: TfpgString;
      procedure   SetText(const AValue: TfpgString);
      procedure   SetCanDelete(const AValue: boolean);
    public
      procedure   AfterCreate; override;
      property    Text: TfpgString read GetText write SetText;
  
negative.code:     Hint := '';
      ImageName := '';
      TabOrder := 3;
      OnClick := @btnHelpClicked;
    end;
  
    btnCancel := TfpgButton.Create(self);
  