anchor.diff:    cursorfont,
     xatom;            // used for XA_WM_NAME
   
  +type
  +  TAtomArray = array [0..0] of TAtom;
  +  PAtomArray = ^TAtomArray;
  +
  +  TWindowArray = array [0..0] of TWindow;
  +  PWindowArray = ^TWindowArray;
  +
   var
     xapplication: TfpgApplication;
   
  +const
  +  FPG_XDND_VERSION: integer = 4; // our supported XDND version
   
    // some externals
   
  
positive.code:   DefaultColorMap := XDefaultColorMap(FDisplay, DefaultScreen);
  
    // Initialize atoms
    xia_clipboard         := XInternAtom(FDisplay, 'CLIPBOARD', longbool(0));
    xia_targets           := XInternAtom(FDisplay, 'TARGETS', longbool(0));
    xia_motif_wm_hints    := XInternAtom(FDisplay, '_MOTIF_WM_HINTS', longbool(0));
    xia_wm_protocols      := XInternAtom(FDisplay, 'WM_PROTOCOLS', longbool(0));
    xia_wm_delete_window  := XInternAtom(FDisplay, 'WM_DELETE_WINDOW', longbool(0));
  
    netlayer := TNETWindowLayer.Create(FDisplay);
  
  
negative.code: 
  
    TfpgX11Window = class(TfpgWindowBase)
    private
      QueueEnabledDrops: boolean;
    protected
      FWinFlags: TXWindowStateFlags;
      FWinHandle: TfpgWinHandle;
  