Breviario cultural (tema: arreglos ordinales)

[roman]

¿Sabía usted que en delphi, los arreglos pueden usar como índice cualquier tipo ordinal (que no ordinario)? Si piensa que una expresión como ésta

Código Delphi [-]
A['R'] := 84;

es incorrecta, déjeme decirle que usted está en el kinder. En delphi estas declaraciones son perfectamente válidas:

Código Delphi [-]
var
  A: array[Char] of Integer;
  B: array['a'..'z'] of String;

y, desde luego, pueden usarse tal cual:

Código Delphi [-]
A['h'] := 84;

Y cuando se dice cualquier tipo ordinal, se entiende cualquier tipo ordinal:

Código Delphi [-]
type
  TDiaSemana = (Domingo, Lunes, Martes, Miercoles, Jueves, Viernes, Sabado);

var
  SemanaLaboral: array[Lunes..Viernes] of Integer;

begin
  Semana[Miercoles] := 84;
end;

// Saludos