Delphi Android应用程序的内部内存大小

Question

我正在使用Delphi 10.1.2 Berlin。我需要在Delphi Android应用程序项目中确定内部内存的大小，但即使我在Google上搜索，我也没有找到示例。在这方面我需要你的帮助。

Answer 1

不确定它对Delphi Android应用程序有多大用处，但是我在这里添加了Debug类的导入：

https://github.com/DelphiWorlds/KastriFree/blob/master/API/DW.Androidapi.JNI.Debug.pas

我假设这是要使用的相关类，因为Delphi生成本机可执行文件。这是一些示例代码：

uses
  DW.Androidapi.JNI.Debug;

const
  cBytesPerMegabyte = 1024 * 1024;

procedure TForm1.ShowMemoryUse;
begin
  InfoMemo.Lines.Clear;
  InfoMemo.Lines.Add(Format('Total memory: %.2f MB', [TJDebug.JavaClass.getNativeHeapSize / cBytesPerMegabyte]));
  InfoMemo.Lines.Add(Format('Allocated memory: %.2f MB', [TJDebug.JavaClass.getNativeHeapAllocatedSize / cBytesPerMegabyte]));
  InfoMemo.Lines.Add(Format('Free memory: %.2f MB', [TJDebug.JavaClass.getNativeHeapFreeSize / cBytesPerMegabyte]));
end;