anchor.diff:    WindowTitle := 'Notes';
     Hint := '';
     OnShow := @FormShow;
  +  HelpType := htContext;
  +  HelpContext := 7;
   
     Memo1 := TfpgMemo.Create(self);
     with Memo1 do
  
positive.code:     Hint := '';
      ImageName := '';
      TabOrder := 3;
    end;
  
    btnCancel := TfpgButton.Create(self);
  
negative.code:   btnDelete.Enabled := FCanDelete;
  end;
  
  procedure TNoteForm.btnHelpClicked(Sender: TObject);
  begin
    InvokeHelp;
  end;
  
  procedure TNoteForm.AfterCreate;
  begin
    {%region 'Auto-generated GUI code' -fold}
  