Error TStringList creados en tiempo de ejecución

[jachguate]

En primer lugar, recomiendo que el TStringList debiera crearse en el OnCreate del formulario y destruirse en el OnDestroy.

En el OnShow basta con que se quede la sentencia Lista.Clear que por ahora está de mas.

Hasta luego.

[[poliburro]]

Empezado por jachguate

En primer lugar, recomiendo que el TStringList debiera crearse en el OnCreate del formulario y destruirse en el OnDestroy.

En el OnShow basta con que se quede la sentencia Lista.Clear que por ahora está de mas.

Hasta luego.

Eso es correcto solo si el formulario es dinámicoo, de ser estático genera el error que le está sucediendo al amigo, Insisto, debes colocar la creación del stringlist en el evento onshow.

suerte

[jachguate]

Empezado por poliburro

Eso es correcto solo si el formulario es dinámicoo, de ser estático

Francamente no estoy seguro de que querés decir con "dinámico" y "estático", pero tampoco veo cuales son los argumentos para que el StringList se cree en el OnShow.

De hecho, creo que podría ser en ambos... siempre depende.

[[Lepe]]

Yo opto por el OnCreate, es lo "más seguro para nuestro código", o bien amarrar bien con FreeAndNil la lista, pero es marear la perdiz en este caso. Si queremos tener una lista en memoria a la misma par que un combo, dará igual cargarla después de crear el form que antes de mostrar el form.

Si lo dejas en el OnShow, basta que hagas un :
form1.hide;
form1.show;
form1.hide;
form1.show;
form1.hide;
form1.show;

Para crear 3 listas en memoria con los datos repetidos, las 2 primeras listas se quedaran en el limbo de RAM.

Y en otro orden..... ¿para qué usas esa lista? ya tienes el combo, podrías utilizarlo para buscar elementos o lo que quieras, mientras no asignes el itemindex del combo, no cambiará la selección del mismo.

Saludos

[jachguate]

Empezado por Lepe

Si lo dejas en el OnShow, basta que hagas un :
form1.hide;
form1.show;
form1.hide;
form1.show;
form1.hide;
form1.show;

Tenes toda la razón, Lepe. Cuando he dicho esto:

Empezado por jachguate

De hecho, creo que podría ser en ambos... siempre depende.

Es porque estaba pensando que Hide podría disparar el evento OnClose, pero ahora he abierto el delphi y veo que no lo hace. Así, no hay paridad entre la creación y la liberación de la lista, provocando pérdida de memoria.

[[poliburro]]

Empezado por jachguate

Francamente no estoy seguro de que querés decir con "dinámico" y "estático", pero tampoco veo cuales son los argumentos para que el StringList se cree en el OnShow.

De hecho, creo que podría ser en ambos... siempre depende.

Dinámico: El formulario es creado al vuelo. Antes de iniciar la llamada al formulario debe crearse la instancia.

Estático: El formulario es creado al iniciar la aplicación. Al llamarlo, siempre se llama a la misma instancia.

Dinámico. Los elementos se destuyen y construyen con el formulario.

Estático.

Se crean elementos en el evento OnCreate (Elementos creados una sola ocasión)

Se destruyen los elementos al cerrar el formulario.

Al llamar a la misma instancia, debido a que esta no es creada nuevamente, los elementos a los que se intenta acceder ya no existen pues fueron destruidos al cerrar el formulario.

Punto

[jachguate]

Empezado por poliburro

Estático.

Se crean elementos en el evento OnCreate (Elementos creados una sola ocasión)

Se destruyen los elementos al cerrar el formulario.

Creo que el problema acá es de concepto. Lo que se crea en el OnCreate, debiera destruirse en el OnDestroy.

Hasta luego.

[[Lepe]]

Completo un poquito más:

Empezado por jachguate

Lo que se crea en el OnCreate, debiera destruirse en el OnDestroy.

Y no tiene nada que ver que se creen dinámicamente o estáticamente las ventanas.

El ciclo de vida es el mismo para ambos tipos de Forms.


En honor a la verdad, poliburro ha detectado el fallo del access violation, pero creo no ha sabido explicarse porque tanto jachguate como yo lo hemos malinterpretado.

1º- Deja el StringList en el oncreate como lo tenías. Liberas la lista en el OnDestroy.

2º- El access violation es problema de cómo usas tus ventanas, no tiene nada que ver con el TStringList.

Si tu ventana se llama FrmClientes (por decir algo) y esa variable la usas en todas tus ventanas, en el Onclose añade:

Código Delphi [-]
procedure TFrmclientes.OnClose(... Action:TCloseAction);
begin 
  action := cafree;
  frmClientes := nil;
end;

cuando necesites usar la ventana de nuevo, comprueba si ya está abierta:

Código Delphi [-]
  if Frmclientes <> nil then
    // ya está abierta
  else
    FrmClientes := TFrmclientes.Create(self);

// y para cerrar la ventana:
 FrmClientes.Close;  // o incluso Frmclientes.Free, ambas funcionaran.

Si no usas la variable FrmCliente en tu aplicación, es decir, creas las ventanas así:

Código Delphi [-]
var f:TFrmClientes;
begin 

   f := TFrmclientes.Create(nil / application / self);

// o bien haces esto en alguna ocasión:
 with TFrmclientes.Create(...) do
 try 


 finally
    Free
 end;

Entonces no puedes usar el evento OnClose para poner la variable FrmClientes a nil, siempre deberías usar FreeandNil(f) o de la variable que uses.

Saludos