C++ CLI 调用问题

Question

我有一个 MainForm 类（如您所料，它是一个表单），上面有一个文本框。我还有另一个名为“Application_Server”的类，它可以做很多其他的事情（不仅仅是与表单背景相关，还有很多基于网络的东西等）。

Application_Server 类在它自己的线程中运行，但需要能够更新表单上的控件，对于这个问题，我们将只使用文本框。

问题是，即使我正在执行命令以通过“调用”设置 textBox 控件的文本，但在运行时仍然出现以下异常：

附加信息：跨线程操作无效：控制 从线程以外的线程访问的“DebugTextBox” 创建于。

这可能是什么原因造成的？我肯定在 MainForm 中调用了一个委托。

以下是相关代码段（为便于阅读而删减）：

MainForm.h：

public ref class MainForm : public System::Windows::Forms::Form {

        delegate void del_updateDebugText(String^ msg);
        del_updateDebugText^ updateDebugText = gcnew del_updateDebugText(this, &MainForm::postDebugMessage);

private: void postDebugMessage(String^ message);
};

MainForm.cpp：

void EagleEye_Server::MainForm::postDebugMessage(String^ message)
{
    Monitor::Enter(DebugTextBox);
    if (this->DebugTextBox->InvokeRequired)
    {
        this->Invoke(updateDebugText, gcnew array<Object^> { message });
    }
    else
    {
        this->DebugTextBox->AppendText(message);
    }
    Monitor::Exit(DebugTextBox);
}

最后，调用它的代码：

void ServerAppManager::postDebugMessage(System::String^ message)
{
    mainFormHandle->updateDebugText(message);
}

void ServerAppManager::applicationStep()
{
    postDebugMessage("Starting\n");
    // This is Run in seperate thread in MainForm.cpp
    while (s_appState == ApplicationState::RUN)
    {       
        postDebugMessage("Testing\n");      
    }

}

谢谢！

Answer 1

从名为 bwSearch 的后台工作人员中，我们从 DoWork 事件处理程序中执行以下调用：

private: System::Void bwSearch_DoWork(System::Object^ sender, System::ComponentModel::DoWorkEventArgs^ e) {
    //... logic
    UpdateTxtOutput("Some message"); 
    //... more logic 
}

我有一个名为txtOutput的RitchTextBox，包含此代码的windows窗体控件也称为frmMain，UpdateTxtOutput定义如下：

       delegate void UpdateTxtOutputDelegate(String^ text);

       void UpdateTxtOutput(String^ text)
       {
           UpdateTxtOutputDelegate^ action = gcnew UpdateTxtOutputDelegate(this, &frmMain::Worker);
           this->BeginInvoke(action, text);
       }

       void Worker(String^ text)
       {
           txtOutput->AppendText("\t" + text + "\n");
       }

Answer 2

我设法通过将“MainForm”类中的方法简化为：

void EagleEye_Server::MainForm::postDebugMessage(String^ message)
{
    Monitor::Enter(DebugTextBox);
    DebugTextBox->AppendText(message);
    Monitor::Exit(DebugTextBox);
}

然后将“Invoke”调用移至调用委托的方法，虽然不是很漂亮，但现在可以使用。我认为这个问题可能是由于表单卡在 Invoke 循环中造成的。我这么说是因为我注意到表单在遇到递归 Invoke 语句后会锁定并停止响应。