multithreading - Delphi 指针内存和释放

我正在使用自定义 Windows 消息将信息从工作线程交换到主 VCL 线程中的表单。每当我需要通过消息发送一些数据时，我都会这样做:

type
  PntStr = ^string;

然后 PostMessage()

var
    pointString : PntStr;

(...)

New(pointString);
pointString^ := mystring;
PostMessage(frmDest.Handle, UM_THREADMSG, UM_MYEVENT1, LPARAM(pointString));

在接收表格上

try
  myStrP := PntStr(MSG.LParam);
  myfunction(myStrP^);
finally
  Dispose(myStrP);
end;

这是处理指针分配的内存的正确方法吗？在指针上调用 Dispose() 是否负责释放内存？

最佳答案

是的，您的方法在内存管理方面是正确的。 New 和 Dispose 正确处理托管类型。这确实是他们存在的目的。

一些细微差别:

检查 PostMessage 的返回值。如果失败，则消息未发布，线程需要处理内存。

不要使用表单的句柄作为接收者。存在竞争条件。表单的窗口可能会在您发布消息的同时重新创建。那么消息就会丢失。或者更糟糕的是，如果 handle 被重新使用，则会被送到不同的窗口。或者更糟糕的是，窗口可能会在错误的线程上重新创建。而是使用 AllocateHWnd 创建一个窗口句柄，其生命周期由您控制。

您的 try/finally 错误。 try 应该在获取资源后出现。这是我们在这里看到的最常见的错误之一。在您的代码中，它可能是良性的，因为赋值不能引发异常，但它仍然值得准确。

关于multithreading - Delphi 指针内存和释放，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/40020890/