Miguel:
When I have similar problem, I discover that the cross reference between
Objects, Arrays and Codeblocks with detached local vars referencing to
oWin, have this behavior.
I cut this cross reference calling Destroy() method and calling to End()
method of controls.
//------------
if !Empty( ::aControls )
do while (n := Len(::aControls)) > 0
::aControls[n]:End()
if Len(::aControls) == n
ADel(::aControls,n,.t.)
endif
enddo
endif
//------------
*Walter Negro*
/Desarrollo e Investigación/
VsTour - Softmagic S.R.L.
( 54 ) ( 11 ) 5218-6616
Av. Corrientes 2294 Piso 7 Of.33
C1046AAN - Buenos Aires - Argentina
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
------------------------------------------------------------------------
*::* * VSTour.COM <http://www.vstour.com> * *::*
Miguel Angel Marchuet escribió:
> I don't forgot hb_gcAll( .T. ). I will try to send an auto contained
> example.
>
> I solve the problem for FWH by
>
> ::aControls := Nil
>
> of courser I use HB_gcAll( .T. ) when is needed.
>
> at the end of destroy method of class window, and with this change I
> free more than 3000 HB_ITEM
> in my application +/- 2Mg of memory.
>
> the same problem exists at harbour or worst compiler, because I loose
> 47000 Bytes more with harbour
>
> Is possible that the problem are cross referencing between items of
> deferents classes
>
> Class Window has a reference in his ::aControls of the control, and the
> control has a reference of the window at its
> ::oWnd data member. ?????
>
> Best regards,
> Miguel Angel Machuet
>
> Ron Pinkas escribió:
>
>> Miguel,
>>
>> You probably forgot to call HB_gcAll( .T. ) *after* NO VARIABLE in
>> your application has reference to the value you expect to be released.
>>
>> Ron
>>
>> On Apr 21, 2008, at 10:14 AM, Miguel Angel Marchuet wrote:
>>
>>
>>> For example DATA aControls of class window (Fivewin) are never released
>>> and is not an INIT nor CLASSDATA.
>>>
>>> Only if I assign Nil at Destroy method then is released by
>>>
>>> hb_gcAll( .T. )
>>>
>>> Best regards,
>>> Miguel Angel Marchuet
>>>
>>>
>>> Ron Pinkas escribió:
>>>
>>>> Miguel,
>>>>
>>>> This is only true for INIT values, and CLASSDATA, because such vales
>>>> belong to CLASS DEFINITION!
>>>>
>>>> IAE, I'm almost finished further cleanup and optimization, and will
>>>> commit ASAP.
>>>>
>>>> Ron
>>>>
>>>> On Apr 21, 2008, at 9:04 AM, Miguel Angel Marchuet wrote:
>>>>
>>>>
>>>>> I detect that at [x]Harbour DATA members containing arrays
>>>>> are only released by garbage collector at end of application.
>>>>>
>>>>> I call hb_gcAll( .T. ) after test to measure
>>>>>
>>>>> ? 'Mem used' + cValToChar( Memory( HB_MEM_USED ) ) + " at " + AllTrim(
>>>>> Transform( Memory( HB_MEM_BLOCKS ), '@E 999,999,999' ) ) + Items"
>>>>>
>>>>> but never is released.
>>>>>
>>>>>
>>>>> Only is released if I assign Nil at this items in Destroy METHOD
>>>>>
>>>>>
>>>>> Best regards,
>>>>> Miguel Angel Marchuet
>>>>>
>>>>>
>>>>
>>> -------------------------------------------------------------------------
>>>
>>> This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
>>> Don't miss this year's exciting event. There's still time to save $100.
>>> Use priority code J8TL2D2.
>>> http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
>>>
>>>
>>> _______________________________________________
>>> xHarbour-developers mailing list
>>> [email protected]
>>> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>>>
>>>
>> __________ Información de NOD32, revisión 2701 (20071204) __________
>>
>> Este mensaje ha sido analizado con NOD32 antivirus system
>> http://www.nod32.com
>>
>>
>>
>>
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
> Don't miss this year's exciting event. There's still time to save $100.
> Use priority code J8TL2D2.
> http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
> _______________________________________________
> xHarbour-developers mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
>
>
>
-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
Don't miss this year's exciting event. There's still time to save $100.
Use priority code J8TL2D2.
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
