anchor.diff:  begin
     if not TfpgX11Window(ASource).HandleIsValid then
       Exit; //==>
  -    
  +
     XTranslateCoordinates(xapplication.display, TfpgX11Window(ASource).WinHandle,
         XDefaultRootWindow(xapplication.display), AScreenPos.X, AScreenPos.Y, @dx, @dy, @cw);
   
  
positive.code:           w := FindWindowByBackupHandle(ev.xconfigure.window);
            if not Assigned(w) then
              ReportLostWindow(ev);
              
            if w <> nil then
            begin
              if w.FWindowType <> wtChild then
  
negative.code: 
    FWinHandle := wh;
    FBackupWinHandle := wh;
  
    // so newish window manager can close unresponsive programs
    if AParent = nil then // is a toplevel window
    begin
  