anchor.diff:      FOnHandleMessage: TDuiMessageEvent;
       FOnClick: TDuiNotifyEvent;
       procedure NewWndProc(var Msg: TMessage);
  +    procedure DuiNotifyEvent(Sender: TObject; var Msg: TNotifyUI);
     protected
       procedure Loaded; override;
     public
       constructor Create(AOwner: TComponent); override;
       destructor Destroy; override;
  -    procedure InitDuiComponent;  
  +    procedure InitDuiComponent;
       property DUI: TDuiComponent read FDuiComponent;
  +    procedure AddObjectEvent(AType, AObjName: string; AEvent: TDuiObjectEvent);
  +    procedure ClearEvents;
  +  {$IFNDEF SupportGeneric}
  +    function IndexOfObjEvent(AObjName: string): Integer;
  +  {$ENDIF}
     published
       property SkinFolder: string read FSkinFolder write FSkinFolder;
       property SkinXml: string read FSkinXml write FSkinXml;
  
positive.code:     FOnResponseDefaultKey(Self, wParam, AResult);
  end;
  
  end.
  
negative.code: 
  constructor TDDuiApp.Create(AOwner: TComponent);
  begin
    //if AppObjectExists then
    //  raise Exception.Create('DDuilib App ObjectѾڣ');
    inherited Create(AOwner);
    if not (csDesigning in ComponentState) and not AppObjectExists then
    begin
      if Assigned(Application) then
      begin
  