Я создаю здесь утечку памяти?

Очень простой вопрос:

type

TMyRecord = Record
  Int: Integer;
  Str: String;
end;

PMyRecord = ^TMyRecord;

var
  Data: PMyRecord;
begin
  New(Data);
  Data.Int := 42;
  Data.Str := 'Test';
  Dispose(Data);
end;

У меня вопрос, создаю ли я здесь утечку памяти (с помощью String )? Следует ли мне вызвать Data.Str: = ''; перед вызовом Dispose ?

Спасибо!