Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Tipos enumerados no excluyentes? (https://www.clubdelphi.com/foros/showthread.php?t=14491)

Lepe 22-09-2004 11:36:30

Tipos enumerados no excluyentes?
 
Hola amigos,gracias por interesarte en este hilo.
Probablemente no esté usando esto como debo, a ver que sugerencias teneis:

Código Delphi [-]
type TPeriodica = (pAnual=0, pMensual, pSemanal, pDiaria)
       TPeriodicas = set of TPeriodica;

....

Lo que necesito es que una variable de tipo TPeriodicas pueda contener repetidos, es decir
Código Delphi [-]
VarPeriodicas := [pAnual, pAnual, pMensual]

Existe algo predefinido en Delphi para trabajar con esto?

Creo que los tipos enumerados son precisamente para tener opciones excluyentes, pero, ¿existe algo para poder repetir opciones?

Saludos

basti 22-09-2004 12:21:28

El tipo set of es un conjunto, por mucho que añadas pAnual simplemente le indicarás que pAnual está en el conjunto, no cuantas veces está.

Creo que la mejor solución para lo que quieres es un array

TPeriodicas = array of TPeriodica;

Si lo que quieres es saber el número de veces que se repite un valor pero no te importa el orden, entonces mejor podrías declarar:

TPeriodicas = array[pAnual..pDiaria] of integer

un saludo

Lepe 22-09-2004 16:28:27

En realidad no pido un "set of" sino cualquier otra técnica que haya en delphi que permita repetir la misma opción.

Precisamente lo que quiero evitar es Crear tablas, mantenerlas y acciones de búsqueda, de asignación ....Y mañana cuando redefina otras constantes, vuelta a hacer lo mismo.

Lo de array [pAnual .. pDiaria] of integer me ha gustado. Lo apuntaré.

La verdad, creía que al igual que existe la funcion Include y Exclude, podría existir lo que pido, pero en algún sitio de delphi que no lo haya visto o leido.

basti 22-09-2004 19:25:00

Entonces puedes usar la clase TList o alguno de sus descendientes.

Consulta la ayuda de Delphi para ver TList y sus descendientes por si te sirve alguno

Lepe 24-09-2004 02:41:57

He estado mirando y no se ajustaba nada a mis requerimientos, así que me he implementado una clase con un array of integer, y una serie de métodos para consultar y modificar. Me ha llevado solo unos 15 minutejos pero funciona de maravillas.

Muchas gracias por tus sugerencias. Saludos


La franja horaria es GMT +2. Ahora son las 21:59:55.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi