我一直在使用gabr's OmniThreadLibrary来构建ThreadPool。
对于多线程我是新手,这就是为什么我发现OTL非常有趣。
在演示应用程序“app_11_ThreadPool.exe”之后,我在我的应用程序中设置了一个线程池。我的应用程序的目的是获取URL列表,并尝试连接到它们并下载任何自动返回的文件(我正在测试有效负载的潜在恶意软件站点,以便我可以阻止它们。)
通常我会列出500到1000个网站。我有一个TMemo,它在我的主表单上保存了URL。这是我的相关代码。请注意,此代码是从我的“开始”按钮单击事件执行的。
iNumTasks := memoSiteList.Lines.Count - 1;
GlobalOmniThreadPool.MaxQueued := 16;
GlobalOmniThreadPool.MonitorWith(OmniEventMonitor1);
GlobalOmniThreadPool.MaxExecuting := 16;
GlobalOmniThreadPool.MaxQueued := 0;
for iTask := 1 to iNumTasks + 1 do
begin
if iTask mod 4 = 0 then
Application.ProcessMessages;
CreateTask(
TSiteQuery.Create(
url,
full_url,
sProxyServer,
sProxyPort,
sSaveLocation,
bVerboseHeaders)
).MonitorWith(OmniEventMonitor1).Schedule;
end;
这是TSiteQuery:
type
TSiteQuery = class(TOmniWorker)
strict private
{ Private declarations }
FTaskID: int64;
furl: string;
f_full_url: string;
fsProxyServer: string;
fsProxyPort: string;
fbVerboseHeaders: boolean;
fsSaveLocation: string;
private // [..]
现在,一切都很好。运行1000个URL会将我的应用程序的内存使用量从10mb增加到~130mb。这不是什么大问题,我理解这一点。
但问题是,每次点击“开始”,应用程序的内存使用量都会增加~130mb。也许我只是不知道我在做什么,但我的印象是使用线程池意味着我不必每次运行都创建 new 线程。
我希望池中先前创建的线程可以在后续执行时重用。我期待我的应用程序的内存使用量大约保持在130 MB左右,无论我点击“开始”1次还是10次。
有什么建议吗?
此致
答案 0 :(得分:2)
这是线程问题还是内存泄漏问题?尝试使用调试器的“线程状态”窗口来确定您分配的线程数是否实际增加。如果没有,那么你可能在线程内创建对象而不是释放它们。
答案 1 :(得分:1)
看起来更像是内存泄漏问题,而不是线程问题......