delphi写的程序out of memory??

delphi写的程序out of memory?

 

有如下代码:

 

showmessage(''+''+...+''+);

 

总报错:out of memory。原先一直以为是PIDL内存分配出了问题。。。调试了很久才发现,原来是字符串太长了。。

 

String类型默认时以最大长度255定长;  上面的字符串相加后超过了255长度限制。

 

改成:

 

str:AnsiString;

 

再怎么加都可以。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
回答: 当在Delphi中遇到"out of memory"的错误时,可能是由于内存不足导致的。在TMemoryStream中不断入数据时,TMemoryStream会自动增加空间或者使用setLength来开辟内存空间。然而,当一次开辟较大内存时,可能会出现内存不连续的问题,导致无法开辟内存空间。\[1\]为了解决这个问题,可以使用SetProcessWorkingSetSize函数来设置进程的工作空间大小,以减少内存占用量。\[2\]另外,可以通过取消根据入发现内存不足时的自动开辟内存的方式,改为以原始文件大小+10M的固定长度byte数组来进行初始开辟,并手动管理实际数据的数组长度来进行分批入。\[3\]这样可以避免内存不足的问题。 #### 引用[.reference_title] - *1* *3* [DELPHI 内存流修改16进制文件, 文件太大时候OutofMemory的问题研究](https://blog.csdn.net/Wilber_Qing/article/details/104845360)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v91^insertT0,239^v3^insert_chatgpt"}} ] [.reference_item] - *2* [Delphi 内存 叽歪](https://blog.csdn.net/yangjian900109/article/details/130623587)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v91^insertT0,239^v3^insert_chatgpt"}} ] [.reference_item] [ .reference_list ]

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值