[dec]

Hola,

¿Te refieres a algo así?

Código Delphi [-]
 const
   MiArrayDeEnteros: array[1..3] of integer = (1, 2, 3);
   MiArrayDeCadenas: array[1..3] of string = ('Una cadena', 'Otra cadena', 'Otra cadena más');