delphi - 加载图像和调整图像大小的最快方法是什么？

Question

我需要显示给定目录中图像的缩略图。在将图像加载到图像组件之前，我使用 TFileStream 读取图像文件。然后将位图调整为缩略图大小，并分配给 TScrollBox 上的 TImage 组件。

它似乎工作正常，但对于较大的图像来说速度会慢很多。

是否有更快的方法从磁盘加载(图像)文件并调整其大小？

谢谢，彼得

Answer 1

不是真的。您可以做的是在后台线程中调整它们的大小，并使用“占位符”图像，直到调整大小完成。然后，我会将这些调整大小的图像保存到某种缓存文件中以供以后处理(Windows 执行此操作，并在当前目录中调用缓存拇指.db)。

关于线程架构本身，您有多种选择。处理所有图像的单个线程，或线程只知道如何处理单个图像的线程池。 AsyncCalls库甚至是另一种方式，可以让事情变得相当简单。