delphi中TQueue的使用問題

TQueue裏存放的是指針，所要存儲的內容最好建立在堆上，在pop方法之後釋放掉這個空間。

實例代碼：

MMSQueue:= TQueue.Create;
MMSQueue.Push(StrNew(PChar(strAccidentTime)));//堆上申請空間
 strRecv:= MMSQueue.Pop;
       argTime:= StrPas(strRecv);
       StrDispose(strRecv);//手動釋放內存
MMSQueue.Free;