创建一个可以杀死或终止正在运行的进程的按钮答案

【问题标题】：Creating a button with which a running process can be killed or terminated创建一个可以杀死或终止正在运行的进程的按钮
【发布时间】：2015-12-20 15:14:35
【问题描述】：

我想在我的表单中添加一个按钮，如果用户希望出于任何原因停止进程或加载另一个文件，可以使用该按钮终止正在运行的进程（循环运行数千次）。

该程序有一个部分对多个案例执行插值，并为每个案例创建并保存一个文本文件。一旦进程启动（通过在加载必要的文件后按下按钮来完成），它就会开始运行并且在完成之前无法停止。此过程的持续时间可能在几分钟到几小时之间，具体取决于某些文件的大小。

我从按下按钮时调用的部分复制了一个代码 sn-p（更改了名称和某些部分，并省略了第一个 if 块后面的内容，因为它在这里无关紧要）。

void __fastcall TMapperForm::bt_InterpolationClick(TObject *Sender)
 {
 int i;

 if(someflagused == true)
 {
      different_cases_total = 0;
       for(i=0; i<something_counter; i++)
       {
       CleanStuff();
       FunctionReadingFiles(list_of_stuff->Items->Strings[i]);
       InterpolatingFunction();
       different_cases_total+= no_cases;
       }
 }
}

如上所述，我想创建另一个可以终止/终止进程的按钮。我的主要问题是，当程序运行时，它会死机，我看不到中断循环的方法。

有没有什么方法可以添加一个按钮，即使在循环运行时也保持活动状态并且可以在单击时终止进程？

【问题讨论】：

要让用户界面在您执行某些其他操作时仍然处于活动状态，您必须使用线程，或者在循环中发送 Windows 消息。如果您决定使用线程，请在线程中启动密集进程，并让主线程处理用户界面。
@M.M 是的，我预感到这与线程有关。我的编程知识相当有限，我最近学习了 C++、VCL 和 BCB 的基础知识，以便能够从事这个项目。我会调查一下，谢谢。您能否添加任何特定于您的建议、伪代码或指向显示多线程和终止进程的示例的链接？这是我必须做的（使用带有按钮的停止或终止部分）吗？：C++ Builder Multithreading,
Remy 将随时提供一些示例代码。那篇文章真的很老了。您应该提及您使用的是哪个版本的 C++Builder。
（Remy Lebau？哈哈哈，我喜欢这个社区，他之前评论过我之前的BCB相关问题。）我正在使用BCB 4.0。我正在进行的项目需要我更改 10-15 年前编写的工具的一些功能，因此是旧版本。
如果InterpolatingFunction(); 消失并且很长时间没有回来，那么消息处理解决方案将不起作用

标签： c++ c++builder vcl borland-c++

【解决方案1】：

正如我所见，您正在 VCL 内进行插值，这意味着 VCL 已冻结

VCL/WinProc 函数会停止，直到您的计算完成，因此没有组件将起作用（没有按钮、计时器、滑块......）

如何修复？

将计算移至线程

线程非常适合这个，但你需要做一些同步和

避免从线程访问 VCL 组件和 WinAPI 调用的视觉内容!!!

因此，如果您需要绘制一些东西，请将其传递到您的窗口，然后从 App 主线程（在计时器或其他东西中）进行绘制。

在线程内部扫描一些volatile bool stop;，如果true从for循环中中断。然后在线程集的开始stop=false; 和您的按钮单击事件stop=true;
将您的计算移至应用程序的OnIdle 事件

只需在表单类头文件(*.h) 中添加void __fastcall MyOnIdle(TObject* Sender, bool &Done);，然后在表单(*.cpp) 中添加：
```
    void __fastcall TForm1::MyOnIdle(TObject* Sender, bool &Done)
     {
     for (int i=0;i<1000;i++) // iterate so many times it does not slow the App too much
      {
      if (computation_done) { Done=true; Application->OnIdle=NULL; return; }
      // here iterate your computation
      }
     Done=false; // if you let Done be false all the time the CPU would be 100% loaded !!!)
     } 
```
现在，当您想开始计算时，您只需执行 Application->OnIdle=MyOnIdle; 并停止它，请执行 Application->OnIdle=NULL; 将 TForm1 更改为表单的类名。

OnIdle 事件是 VCL 主线程的一部分，因此您可以随意访问任何 VCL 内容，因此 没有问题 访问冲突和invalidating WinAPI就像线程一样，你也不需要再使用volatile了
可以使用 VCL 计时器

它与OnIdle 事件几乎相同，只是在1000（或任何其他数字）循环在time 传递后停止之后停止。为此，您需要使用例如扫描时间
```
    LARGE_INTEGER i;
    QueryPerformanceFrequency(&i); double freq=double(i.QuadPart);
    QueryPerformanceCounter(&i); double cnt=double(i.QuadPart);
```
freq 以 [Hz] 为单位，cnt 是实际计数，因此在循环内计时器开始时取一个 cnt0 值取另一个 cnt1 和
```
if ((cnt1-cnt0)/freq>double(Timer1->Interval)*0.001*0.9) break;
```
这样您几乎可以在计时器触发的时间运行，因此应用程序在任何 CPU 上都不会太慢。如果您在没有这些计数器的情况下运行操作系统（Win9x ...），您仍然可以使用RDTSC 或一些分辨率足够高的操作系统时间 api

[备注]

只有第一个选项能够像子弹 #2,#3 一样使用您的插值，您需要对其进行重写，以便可以在迭代过程中进行计算，直到完成为止。 p>

【讨论】：

【解决方案2】：

给TButton是没有问题的。问题是要为事件做好准备。此类循环捕获活动和您的应用不响应事件。

bool BreaKtheLoop = false;

void __fastcall TMapperForm::bt_InterpolationClick(TObject *Sender)
 {
 int i;

 if(someflagused) // redundant comparison == true)
 {
   ..
       for(very long loop)
       {
           ...
           Application->ProcessMessages();
           if(BreaktheLoop )
              break;
       }
 }
}

新按钮单击将变量设置为 true；

【讨论】：