Problemas con memoria (Solucionado)

[Blessed]

Saludos amigos del foro:

Estoy haciendo una aplicacion de inventario y facturacion, que lleva control de series de partes.
Las cuales son muchas, he intentado con arreglos manejas desde objetos, arreglos estaticos, publicos y privados, y cuando se emite una factura y se inicia la siguiente, me queda cada vez menos memoria disponible.
Como si los valores de los arreglos no quedaran disponibles al terminar la facturacion; he usado comandos como RELEASE <nombrearreglo>, pero sin ningun cambio.
Despues de 4 o 5 facturas, es necesario salir del programa para poder continuar.

Estoy usando FiveWin 8.01 con xHarbour

Saludos desde Honduras

[MGA]

Blessed

Usted utiliza DIALOGS ou WINDOWS mdi, se usa MDI coloque no valid(hb_gcAll(),.t.)

[karinha]

Hola,

Podrias muestrar como estás haciendo?

Hay algun LOOPING sin el SYSREFRESH()?

No tengo este problema.

Saludos.

[Blessed]

Gracias por su atencion

Estoy usando Dialogs MDI, estoy quitando todos aquellos arreglos que paso por referencia.

Code: Select all  Expand view  RUN

LOCAL myArreglo

Filldata( @MyArreglo )


Olivde mencionar que las consultas pueden ser de 50 elementos o bien de 5000, por lo cual estoy abusando de la memoria, ya que con tablas el funcionamiento es sumamente lento.

Saludos

[MGA]

Blessed, tive um problema parecido de memoria trabalhando com MDIs, só que estava fazendo errado...


No meu caso eu tinha um função que montava BTNBMPs na tela MDI, porem toda vez cria-va objetos em vez de usar os já existentes, isso consumia muita memoria.

Se postar uma parte do seu fonte, podemos analizar juntos.

Espero ter ajudado

[Blessed]

Gracias, esa la mitad del problema

Una libreria de Terceros grafica, que al agregarle todo lo que esta ofrece, me dejo sin memoria; no lo habia notado ya que hacia poco uso de esa libreria.

Saludos, debo reportar esto a mi proveedor;

pero aun tengo los problemas de arreglos.

Saludos

[Blessed]

He estado manejando los arreglos con dos dimensiones

Inicialmente los declaraba estaticos, y los cargaba con las consultas pero al quererlos vaciar, el volumen de memeria usado segun el administrador de tareas no se libera.

Por ahi en el foro lei que no era conveniente manejar arreglos estaticos, e hice el cambio.

Y se nota en la maquina cuando haz hecho varias facturas.
Posteriormente los pase a publicos y privados, pero con el mismo resultado.

Saludos

[Antonio Linares]

Asegurate de vaciar los arreglos (arrays) despues de usarlos no vaya a ser que los estes dejando guardados en alguna variable:

aArreglo := nil

y si lo has guardado en alguna variable, tambien has de vaciarlo:

aTemp := { aArreglo }

aArreglo := nil // esto no ha vaciado el contenido de aTemp !!!

aTemp[ 1 ] := nil // ahora si lo has vaciado

[Blessed]

Antonio Gracias mil.

Esa ha sido la solucion con los arreglos.

Saludos

[Patricio Avalos Aguirre]

Hola

Consulta, es un procedimiento cuando se usa Arreglos:
ya que yo usO bastante arreglo en mi aplicacion:

Code: Select all  Expand view  RUN

#define TOT 40
procedure XX()
local aArray[TOT]

DEFINE DIALOG...
bla..bla..
ACTIBATE DIALOG ...

dbCloeAll()

return

Abria que cambiar algo asi

Code: Select all  Expand view  RUN

#define TOT 40
procedure XX()
local aArray[TOT]

DEFINE DIALOG...
bla..bla..
ACTIBATE DIALOG ...

dbCloeAll()
aArray := NIL
return