[Lazarus]Warnung nicht verwendete Variable?

[Klaus01]

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 obige Code würde auch funktionieren - oder?

Grüße
Klaus