请教个基本问题(0分)

我定义一个结构如下：
TMenuParam = record
MenuName : TStringList;
FuncCode : TStringList;
Prio : integer;......
end;
我在另外一个类中声明了一个TMenuParam类型的动态数组，如下：
TLoadModal = Class(TObject)
protected
MenuList : array of TMenuParam;
public
procedure init;
...
end;
我在TLoadModal类的init过程中初始化MenuList,如下：
procedure TLoadModal.init
var
i : integer;
begin
SetLength(MenuList, 12);
for i := 0 to 11 do
begin
MenuList.MenuName.Create;
MenuList.FuncCode.Create;
MenuLIst.Prio := i;
end;
end;
在我的程序中调用该初始化（init）过程时总是提示非法指针操作，跟踪发现
是执行到MenuList.MenuName.Create;语句出错了。
请问我应该如何创建并添加这个字符列表？