jejeje... me has hecho cargar delphi para probar, y de paso refrescar un poco la memoria con los conjuntos.
El compilador reduce el tamaño del conjunto a su minima expresión. Al contrario tuyo, yo no recuerdo ninguna directiva para cambiar este comportamiento...
Un conjunto no puede tener mas de 256 posibles elementos... con lo que el tamaño máximo de este tipo de dato en memoria será de 32 bytes (256 bits).
Me he atrevido a agregar un par de tipos mas a tu código, siendo estos:
Código Delphi
[-]
TMiTipo7 = 0..255;
TMiSet7 = set of TMiTipo7;
TMiTipo8 = 1..256;
TMiSet8 = set of TMiTipo7;
...
Memo1.Lines.Add(Format('7> Tamaño: %d Tipo: %d', [SizeOf(TMiSet7), SizeOf(TMiTipo7)]));
Memo1.Lines.Add(Format('8> Tamaño: %d Tipo: %d', [SizeOf(TMiSet8), SizeOf(TMiTipo8)]));
Los resultados obtenidos son:
Cita:
Empezado por ejemplo.exe
1> Tamaño: 1 Tipo: 1 Valor del Primer Item:0
2> Tamaño: 1 Tipo: 1 Valor del Primer Item:253
3> Tamaño: 1 Tipo: 4 Valor del Primer Item:0
4> Tamaño: 4 Tipo: 1
5> Tamaño: 5 Tipo: 1
6> Tamaño: 4 Tipo: 1
7> Tamaño: 32 Tipo: 1
8> Tamaño: 32 Tipo: 2
|
Me llama poderosamente la atención el caso 5>, en que el compilador ha usado 5 bytes para almacenar el conjunto, cuando en realidad es posible hacerlo solamente en 4. Precisamente por ello he incluido los dos últimos tipos... para ver si se animaba a usar mas de 32 bytes...
Hasta luego.