• Sábado 21 de Diciembre de 2024, 15:14

Autor Tema:  Eliminar Registro de un Arreglo Type  (Leído 2507 veces)

MArio85

  • Miembro activo
  • **
  • Mensajes: 27
    • Ver Perfil
Eliminar Registro de un Arreglo Type
« en: Miércoles 30 de Julio de 2008, 02:03 »
0
Hola tengo un arreglo de un type determinado ( estilo registro de base de datos).
En mi programa depues de una serie de validaciones decido si de los registros del arreglo borro algunos o los dejo
Antes (Cunado era arreglo tipo predeterminado string, integer,etc) solo ponia Arreglo(i) = "", y asi distinguia los vacios y los que tenian informacion pero ahorame he topado con que con el arreglo type no es compatible el Arreglo(i)="" si no que tendria que "declarar" vacio cada campo del registro.

Existe alguna funcion que elimine el registro y de ser posible baje tambien el tamaño del arreglo?, por ejemplo si mi arreglo es de tamaño 5 y borro la posicion 3, el arreglo sigue siendo tamaño 5 o cambia a tamaño4??

Gracias

Saludos

m0skit0

  • Miembro de PLATA
  • *****
  • Mensajes: 2337
  • Nacionalidad: ma
    • Ver Perfil
    • http://fr33kk0mpu73r.blogspot.com/
Re: Eliminar Registro de un Arreglo Type
« Respuesta #1 en: Miércoles 30 de Julio de 2008, 09:35 »
0
No puedes borrar los registros. Lo que sí puedes es borrar los valores de los registros. Los registros son fijos puesto que los has declarado como tipo y eso no se puede modificar.

Para acceder a un registro dentro de un vector (o arreglo):

Código: Text
  1.  
  2. Arreglo(i).NombreRegistro = Valor
  3.  
  4.  

En cuanto al tamaño del vector sigue siendo del tamaño que le hayas especificado a menos que hagas un ReDim que te redimensionaría el vector a un nuevo tamaño. Por ejemplo:

Código: Text
  1.  
  2. ReDim [Preserve] arreglo(10)
  3.  
  4.  

Le daría un tamaño de 10 a arreglo(), aunque perdería todos los datos. Si utilizamos Preserve mantiene los datos que ya hubiera.

Un saludo.