DELPHI7的TStream为何不能读取超过10000的BUFFER

DELPHI7的TStream为什么不能读取超过10000的BUFFER?
DELPHI7的TStream为什么不能读取超过10000的BUFFER?一点按钮就退出。

------解决方案--------------------
BUFFER 的1536000 已经栈溢出了! 计算这个1536000有1M多字节了! 你每次读4K不就行了! 修改为4096个字节吧