5

我想IMessageFilter在必须写入 excel 的 Excel 插件上启用。我从这里举了一个例子，上面写着：

消息过滤器是每个线程的，因此我们将此线程注册为消息过滤器（不是创建加载项的主线程 - 因为那是 Excel 的主线程

我的问题是我的系统在计时器过去时写入 excel，这导致从 ThreadPool 线程调用写入方法，该线程IMessageFilter由于 excel 无法访问 的RetryRejectedCall部分而中断IMessageFilter，因为它位于调用者线程上，而不是由生成的执行线程计时器。

所以，我的问题是：有没有一种方法可以强制计时器的 Elapsed 事件在初始化计时器的同一线程上运行？

编辑：

IMessageFilter我的问题是，当它抛出拒绝/忙碌时，我如何捕捉 excel 错误？

谢谢

4

2 回答 2

8

您可以使用Timer.SynchronizingObject属性来编组在间隔已过时发出的事件处理程序调用。

这里来自MSDN：

当 Elapsed 事件由可视 Windows 窗体组件（例如按钮）处理时，通过系统线程池访问组件可能会导致异常或可能无法正常工作。通过将 SynchronizingObject 设置为 Windows 窗体组件来避免这种影响，这会导致在创建组件的同一线程上调用处理 Elapsed 事件的方法。

假设您使用的是 WinFrom 并且您正在从主窗体中创建计时器实例：

System.Timers.Timer t = new System.Timers.Timer();
t.SynchronizingObject = this;
t.Elapsed += t_Elapsed;
t.Start();
于 2012-12-06T07:48:48.920 回答
3

完整答案如下：

问题：将数据写入 excel 的类无法处理来自 excel 的“忙/拒绝”响应消息。

解决方案：按照此处所述实现IMessageFilter接口

IMessageFilter定义（来自链接）：

namespace ExcelAddinMessageFilter
{
        [StructLayout(LayoutKind.Sequential, Pack = 4)]
        public struct INTERFACEINFO
        {
            [MarshalAs(UnmanagedType.IUnknown)]
            public object punk;
            public Guid iid;
            public ushort wMethod;
        }

        [ComImport, ComConversionLoss, InterfaceType((short)1),
        Guid("00000016-0000-0000-C000-000000000046")]
        public interface IMessageFilter
        {
            [PreserveSig, MethodImpl(MethodImplOptions.InternalCall,
                MethodCodeType = MethodCodeType.Runtime)]
            int HandleInComingCall([In] uint dwCallType, [In] IntPtr htaskCaller,
                [In] uint dwTickCount,
                [In, MarshalAs(UnmanagedType.LPArray)] INTERFACEINFO[]
                lpInterfaceInfo);

            [PreserveSig, MethodImpl(MethodImplOptions.InternalCall,
                MethodCodeType = MethodCodeType.Runtime)]
            int RetryRejectedCall([In] IntPtr htaskCallee, [In] uint dwTickCount,
                [In] uint dwRejectType);

            [PreserveSig, MethodImpl(MethodImplOptions.InternalCall,
                MethodCodeType = MethodCodeType.Runtime)]
            int MessagePending([In] IntPtr htaskCallee, [In] uint dwTickCount,
                [In] uint dwPendingType);
        }
    }

IMessageFilter我的课程的实施部分（见链接）：

#region IMessageFilter Members

        int ExcelAddinMessageFilter.IMessageFilter.
            HandleInComingCall(uint dwCallType, IntPtr htaskCaller, uint dwTickCount, ExcelAddinMessageFilter.INTERFACEINFO[] lpInterfaceInfo)
        {
            // We're the client, so we won't get HandleInComingCall calls.
            return 1;
        }

        int ExcelAddinMessageFilter.IMessageFilter.
        RetryRejectedCall(IntPtr htaskCallee, uint dwTickCount, uint dwRejectType)
        {
            // The client will get RetryRejectedCall calls when the main Excel
            // thread is blocked. We can handle this by attempting to retry
            // the operation. This will continue to fail so long as Excel is 
            // blocked.
            // As an alternative to simply retrying, we could put up
            // a dialog telling the user to close the other dialog (and the
            // new one) in order to continue - or to tell us if they want to
            // abandon this call
            // Expected return values:
            // -1: The call should be canceled. COM then returns RPC_E_CALL_REJECTED from the original method call.
            // Value >= 0 and <100: The call is to be retried immediately.
            // Value >= 100: COM will wait for this many milliseconds and then retry the call.
            return 1;
        }

        int ExcelAddinMessageFilter.IMessageFilter.
            MessagePending(IntPtr htaskCallee, uint dwTickCount, uint dwPendingType)
        {
            return 1;
        }

        #endregion

定义和实现接口后，我设置了IMessageFilter一个 STAThread和一个Timers.Timer如下：

线：

thread = new Thread(WriteToExcel);
thread.SetApartmentState(ApartmentState.STA);

定时器：

timer = new System.Timers.Timer();
timer.Interval = 2000;
timer.Elapsed += new ElapsedEventHandler(StartSTAThread_Handler);

其中StartSTAThread_Handler定义为：

void StartSTAThread_Handler(object source, ElapsedEventArgs e)
{
     thread.Start();
     thread.Join();
     thread = null;
}

该线程调用我用来写入 Excel 的方法，并使用上述IMessageFilter接口处理被拒绝的消息。我要做的最后一件事是完全限定 excel OM 引用，即；代替：

Excel.Range rng = app.ActiveSheet.Range["range_name"];
rng.Copy(); // ERRROR: message filter's RetryRejectedCall is NOT called

我必须使用完全限定的引用：

app.ActiveSheet.Range["range_name"].Copy // OK: calls RetryRejectedCall when excel dialog etc is showing

虽然这似乎符合我的需要，但它似乎与此处另一张海报描述的“两点规则”相矛盾......

于 2012-12-06T08:45:04.023 回答