[Lazarus]Warnung nicht verwendete Variable?

[TForm1]

Hallo zusammen,
ich frage mich gerade, ob Lazarus an der Stelle einen Bug hat, oder warum meldet sich der Compiler mit der Warnung "Note: Local variable MyRecord is assigned but never used"?

Delphi-Quellcode:

procedure TMyClass.DeleteRecord(index: integer);
var MyRecord: TMyRecord;
      i: integer;
begin
    if index<0 then Exit;
    for i:= index to high(MyArray) do
    begin
        MyArray[i]:= MyArray[i+1];
        MyRecord:= MyArray[i];
    end;
end;

Der Code gehört zu einer Methode zum Löschen eines Records aus einem Array und funktioniert auch problemlos.