delphi - 我需要 Free() TDateTime 吗？

Question

它似乎有效，但我正在挠头试图找到内存泄漏，而且我不太擅长这类事情:-(

const UNIX_START_DATE: TDateTime = 25569.0;

function UnixToDateTime(USec: Longint): TDateTime;
begin
  Result := (Usec / 86400) + UNIX_START_DATE;
end;

我实际上并没有调用TDateTime.Create() - 但编译器是这样的(这意味着我必须在某个地方释放它)？或者，由于 TDateTime 基本上只是一个 double ，编译器是否只是将其插入堆栈以分配给调用者？

Answer 1

没有什么可以免费的。 TDateTime 是一种基于 Double 的简单类型，因此它不会在堆上分配。