anchor.diff:    FPGM_POPUPCLOSE  = 17;
     FPGM_HINTTIMER   = 18;
     FPGM_FREEME      = 19;
  +  FPGM_DROPACTIVE  = 20;
  +  FPGM_DROPINACTIVE = 21;
     FPGM_USER        = 50000;
     FPGM_KILLME      = MaxInt;
   
  
positive.code:   // If you have to convert this to an Integer, mrNone = 0 etc.
    TfpgModalResult = (mrNone, mrOK, mrCancel, mrYes, mrNo, mrAbort, mrRetry,
        mrIgnore, mrAll, mrNoToAll, mrYesToAll);
  
  const
    MOUSE_LEFT       = 1;
  
negative.code:   inherited Create(AOwner);
    FHelpType     := htKeyword;
    FHelpContext  := 0;
    FHelpKeyword  := '';
    FTagPointer   := nil;
  end;
  
  