Problema al crear objeto ya existente.

teenspirits
09 de Febrero del 2005
Estoy creando una matriz de objetos en un formulario y , puesto que los objetos varían en función del programa es necesario que los cargue varias veces. Y entonces se produce el error ya que hay objetos que ya se han cargado con anterioridad. La pregunta es: ¿cómo puedo saber si un objeto está cargado ya dentro de un formulario? ¿hay alguna propiedad o alguna sentencia que me indique si ese objeto ya existe?

Gracias x vuestra ayuda, salu2.

en?
09 de Febrero del 2005
If Objeto Is Nothing Then
Set Objeto = ....
Else
'El objeto ya existe
End if

__
Un saludo.

mvallejos
09 de Febrero del 2005
No se entiende por qué necesitas crear varias veces la misma instancia.
De todos modos, si tu array de controles se regenera, puedes descargar las instancias no necesarias con Unload (Unload Objeto(indice)).
Otra cosa que se me ocurre, es hacer una función booleana que te indique la existencia del elemento.
Por ejemplo, se puede pasar un control como parámetro e intentar, dentro de la función, acceder a alguna propiedad del mismo.


Function ExisteObj(Indice as integer) As Boolean
Dim Aux Integer
Err.Clear
On Error goto salida
Aux = Objeto(Indice).Index
ExisteObj = True
exit function
salida:
ExisteObj=False
Err.Clear
End Function