anchor.diff:    if FIsUIInitd then Exit;
     FCanProcessDuiMsg := True;
     FPaintMgr.Init(Handle);
  -  FPaintMgr.AddMessageFilter({$IFDEF FPC}IMessageFilterUI(FMessageFilterUIVMT){$ELSE}FMessageFilterUI{$ENDIF});
  +  FPaintMgr.AddMessageFilter(FMessageFilterUI);
   
     LResourcePath := FPaintMgr.GetResourcePath;
     if LResourcePath = '' then
  
positive.code: unit DuiVCLComponent;
  
  {$I DDuilib.inc}
  
  interface
  
  
negative.code:       FForm.WindowProc := FOldWndProc;
      FNotifyPump.CppDestroy;
      FPaintMgr.CppDestroy;
    end;
    FSkinXml.Free;
    ClearEvents;
  