2016-11-28 90 views
1

在应用程序中,我有一个任务,直到它崩溃,一直消耗内存。用processExplorer观察我发现下面的函数每次调用时都会分配大约50MB(它被称为30次)。当函数退出时,这个内存不会被释放,即使我调用了GarbageCollect。需要注意的是所谓的像功能:powerbuilder内存不释放

Of_IsOrario, Of_GetCell, Of_GetRowCount, Of_GetColCOunt 

刚刚返回值(不分配内存)

long ll_file, i, j, ll_bytes, ll_fileWithTitles 
double ld_value 
string ls_line 
n_cst_string str 



ll_fileWithTitles = FileOpen(as_fileName + "text.txt", LineMode!, Write!, Shared!, Replace!, EncodingAnsi!) 
ll_file = FileOpen(as_fileName, LineMode!, Write!, Shared!, Replace!, EncodingAnsi!) 

if ll_file < 0 then 
     MessageBox("Σφάλμα", "Could not create file " + as_fileName) 
     return false 
end if 

for i = 1 to Of_GetColCount() 
     if in_tasks[i].Of_IsOrario() then 
       ls_line += "~tO" + in_Tasks[i].is_symbol 
     else 
       ls_line += "~t" + in_Tasks[i].is_symbol 
     end if     
next 
FileWrite(ll_fileWithTitles, ls_line) 

for i = 1 to Of_GetRowCount() 
     ls_line = "" 
     for j = 1 to Of_GetColCount() 
       ld_value = -Of_GetCell(i, j) 

       if ls_line <> "" then ls_line += "~t" 
       ls_line += string(ld_value) 
     next 
     ls_line = str.Of_GlobalReplace(ls_line, ",", ".") 
     if IsNull(ls_line) then 
       ls_line = ls_line 
     end if 
     ll_bytes = FileWrite(ll_file, ls_line) 
     ls_line = string(in_matrix[i].il_agentId) + "~t" + ls_line 
     ll_bytes = FileWrite(ll_fileWithTitles, ls_line) 
next 

FileClose(ll_file) 
FileClose(ll_fileWithTitles) 

return true 
+0

PowerBuilder的版本? –

+0

为什么你有构造'如果IsNull(ls_line)然后ls_line = ls_line ...'。它会改变什么吗?我可以理解'ls_line =“”' –

回答

0

我不知道你的PowerBuilder的版本是什么,但是尝试更换ISNULL()

CR#304251 PB企业语言 - 运行时8.0.3 UpperBound上的任何一个blob 不是一个数组,并且大的blob上的IsNull函数正在泄漏 内存。对任何变量执行这些函数时都会发生泄漏。 这是一个错误,但不能在8.0.3补丁中修复。解决方法也是 使用实际的数据类型变量。

CR#279144 PB Enterprise DW - Runtime 8.0.1 IsNull的点号表示为 datawindow列数据泄漏内存。

CR#217105 PB企业窗口 - 当 一个应用程序在开发或运行时(P码和机器代码)上运行,当 ISNULL与任何数据类型使用运行时7.0.2内存使用上升。

[...]

它还增加了以下内容:

Yield() 
GarbageCollect()