Какие метаданные генерируются анонимными методами? И есть ли способ удалить его?

Question

Я использую инструмент MapFileStats для проверки сгенерированных файлов карт из delphi. Я обнаружил, что анонимные методы генерируют какие-то метаданные, которые, похоже, не связаны с RTTI. Что это за метаданные? Было бы неплохо удалить его, потому что в нашей производственной среде он суммируется до очень больших размеров.

Пример кода:

program RttiDemo; 

{$APPTYPE CONSOLE} 
{$R *.res} 

uses 
    System.SysUtils; 

{$RTTI EXPLICIT METHODS([]) FIELDS([]) PROPERTIES([])} 
{$WEAKLINKRTTI OFF} 

var 
    AProc: TProc; 

begin 
    try 

    AProc := procedure() 
     begin 
     // ... 
     end; 

    except 
    on E: Exception do 
     WriteLn(E.ClassName, ': ', E.Message); 
    end; 

end. 

Скриншот из MapFileStats:

Другой пример:

program RttiDemo; 

{$APPTYPE CONSOLE} 
{$R *.res} 

uses 
    System.SysUtils; 

{$RTTI EXPLICIT METHODS([]) FIELDS([]) PROPERTIES([])} 
{$WEAKLINKRTTI OFF} 

type 

    TDemo = class 
    procedure Demo(); 
    end; 

procedure TDemo.Demo; 
var 
    AProc: TProc; 
begin 
    AProc := procedure() 
    var 
     i: Integer; 
    begin 
     i := 5; 
     WriteLn(i); 
    end; 

    AProc(); 
end; 

var 
    Demo: TDemo; 

begin 
    Demo := TDemo.Create(); 
    try 
    Demo.Demo; 
    finally 
    FreeAndNil(Demo); 
    end; 
end. 

Скриншот:

Answer 1

Анонимная функция поддерживается классом, который реализует интерфейсы, необходимые для работы анонимной функции. Представленные здесь метаданные представляют информацию, необходимую для этого класса. Я не верю, что вы можете удалить его из своего исполняемого файла.

Ниже будет испускать имя класса объекта, который реализует анонимный метод:

Writeln((IInterface(Pointer(@AProc)^) as TObject).ClassName); 

При добавлении к вашей второй программе, выход:

TDemo.Demo$0$ActRec 

Это то же имя, которое вы выделили в вопросе.