写了一个NT下的服务程序，在服务开始的时候动态分派内存，在停止的时候为什么不能释放？(50分)

procedure TBoard.ServiceStop(Sender: TService; var Stopped: Boolean);
Var MyIniFile:TIniFile;
begin
While (LastLoginer^.FrontLoginer<>Nil)and(LastLoginer^.FrontLoginer<>LastLoginer) do
begin
LastLoginer:=LastLoginer^.FrontLoginer;
Dispose(LastLoginer^.NextLoginer);//为什么不能这样释放？
end;
Dispose(LastLoginer);
ServerSocket1.Active:=False;
GetSystemDirectory(@MySysPath,255);
MySysFile:=StrPas(MySysPath)+'/LRP2000_AutoRemind.INI';
try
MyIniFile:=TIniFile.Create(MySysFile);
MyIniFile.WriteString('自动提示服务','['+DateTimetoStr(Now)+']','服务正常停止');
finally
MyIniFile.Free;
end;
end;

怎么没人回答呢？

up