anchor.diff:    public
       constructor Create; override;
       function    EncodeModeString(FileMode: longword): TFileModeString;
  +  end;
  +
  +
  +  TfpgX11Drag = class(TfpgDragBase)
  +  private
  +    FLastTarget: TfpgWinHandle;
  +    FUseVersion: integer;
  +    FTargetIsDNDAware: Boolean;
  +    FStatusPending: Boolean;
  +    FDropAccepted: Boolean;
  +    FProposedAction: TAtom;
  +    FAcceptedAction: TAtom;
  +    FMimeTypesArray: TAtomArray;
  +    xia_plain_text: TAtom;
  +    procedure Dragging(ev: TXEvent);
  +    function  IsDNDAware(win: TWindow): boolean;
  +    procedure SendDNDLeave(ATarget: TWindow);
  +    procedure SendDNDEnter(ATarget: TWindow);
  +    procedure SendDNDPosition(ATarget: TWindow; x_root: cint; y_root: cint; AAction: TAtom; ATime: X.TTime);
  +    procedure SendDNDDrop;
  +    procedure HandleDNDStatus(ATarget: TWindow; AAccept: integer; ARect: TfpgRect; AAction: TAtom);
  +    procedure HandleSelectionRequest(ev: TXEvent);
  +  protected
  +    FSource: TfpgX11Window;
  +    function GetSource: TfpgX11Window; virtual;
  +  public
  +    function Execute(const ADropActions: TfpgDropActions; const ADefaultAction: TfpgDropAction = daCopy): TfpgDropAction; override;
     end;
   
   
  
positive.code:     FSrcTimeStamp: clong;
      FLastDropTarget: TfpgWinHandle;
      FDropPos: TPoint;
      function    ConvertShiftState(AState: Cardinal): TShiftState;
      function    KeySymToKeycode(KeySym: TKeySym): Word;
      function    StartComposing(const Event: TXEvent): TKeySym;
  
negative.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);
      property    Drag: TfpgX11Drag read FDrag write SetDrag;
    protected
      FDisplay: PXDisplay;
      DisplayDepth: integer;
  