anchor.diff:      FSrcTimeStamp: clong;
       FLastDropTarget: TfpgWinHandle;
       FDropPos: TPoint;
  +    FDrag: TfpgX11Drag;
  +    procedure   SetDrag(const AValue: TfpgX11Drag);
       function    ConvertShiftState(AState: Cardinal): TShiftState;
       function    KeySymToKeycode(KeySym: TKeySym): Word;
       function    StartComposing(const Event: TXEvent): TKeySym;
  
positive.code:     procedure   HandleDNDposition(ATopLevelWindow: TfpgX11Window; const ASource: TWindow; const x_root: integer; const y_root: integer; const AAction: TAtom; const ATimestamp: x.TTime);
      procedure   HandleDNDdrop(ATopLevelWindow: TfpgX11Window; const ASource: TWindow; const ATimestamp: x.TTime);
      procedure   HandleDNDSelection(const ev: TXEvent);
    protected
      FDisplay: PXDisplay;
      DisplayDepth: integer;
  
negative.code: 
    // forward declaration
    TfpgX11Window = class;
    TfpgX11Drag = class;
    
  
    TfpgX11FontResource = class(TfpgFontResourceBase)
  