在工作时将控制权返回给用户-Delphi

Question

我在Delphi 2010中编写了一个程序。该程序的一部分处理文件哈希处理，而处理大型文件则需要相当长的时间。 我遇到的问题是，程序不在对用户想要的文件进行哈希处理时，该程序当前在100MB文件上挂起的时间长达60秒。 我希望用户在进行文件哈希处理时能​​够使用程序的其他功能（记事本，字符串哈希处理）。

该计划目前的结构如下：

1. 用户启动哈希（可以通过更改选择的文件或选择哈希算法来完成）
2. 调用函数CheckHashBox
3. CheckHashBox检查是否选择了哈希算法
4. 如果选择调用哈希算法相关功能
5. 散列alogrithms函数对文件进行缓冲，通过散列算法运行，然后将最终输出打印到StringGrid
6. 对所有12种哈希算法重复步骤3-5。

正如我所说的，使用大文件可能要花费60秒，特别是Whirlpool SHA-512算法。 另一个奇怪的事情是，尽管在代码中它应该在返回特定哈希算法之后打印输出，然后再检查下一个结果，直到全部完成才显示结果。

我没有发布任何实际的代码，因为所有这些都涵盖了大量的代码，但是我可以发布任何需要帮助的代码部分。

Answer 1

您需要一个线程..这是另一个很好的答案：

在Delphi 2010中恢复挂起的线程？

邓肯。