Hola finees
Una Matriz sencilla pero que te dara una idea:
Código Delphi
[-]
Type
TDiaSemana = (Lunes, Martes, Miercoles, Jueves, Viernes, Sabado, Domingo);
Código Delphi
[-]
Var
Hoy: TDiaSemana;
Incidencias: Array[1..5] of TDiaSemana;
Begin
Hoy:= Domingo;
Incidencias[1] := Miercoles;
Sacado de mi librito.
Saludos