anchor.diff:      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);
  +    property    Drag: TfpgX11Drag read FDrag write SetDrag;
     protected
       FDisplay: PXDisplay;
       DisplayDepth: integer;
  
positive.code:   public
      constructor Create; override;
      function    EncodeModeString(FileMode: longword): TFileModeString;
    end;
  
  
  
negative.code: 
    // forward declaration
    TfpgX11Window = class;
    TfpgX11Drag = class;
    
  
    TfpgX11FontResource = class(TfpgFontResourceBase)
  