Delphi Record Очистка

<р>Delphi record очистка: когда работа с очень большими записями расходует много памяти, может быть полезно очищать использованные записи, чтобы освободить память. Для этого можно использовать процедуру FillChar или SetLength для инициализации массивов, строк и других типов записей. Также не забывайте присваивать nil записям, для которых больше не требуется память.<р>Пример кода:

type  TSomeRecord = record    SomeField1: Integer;    SomeField2: string;    // more fields...  end;procedure Main;var  SomeRecordArray: array[0..999999] of TSomeRecord;  i: Integer;begin  // Do some work with SomeRecordArray...    // Clear the used records  for i := Low(SomeRecordArray) to High(SomeRecordArray) do  begin    FillChar(SomeRecordArray[i], SizeOf(TSomeRecord), 0);  end;end;