delphi - resueltos - ¿Es posible declarar una matriz constante que incluya otra matriz constante?

vectores en java ejemplos

Question

Quiero hacer algo como esto:

const

  MyFirstConstArray: array[0..1] of string = (''Hi'', ''Foo'');
  MySecondConstArrayWhichIncludesTheFirstOne: array[0..2] of string = 
    MyFirstConstArray + (''Bar'');

Básicamente quiero el siguiente resultado:

MyFirstConstArray -> (''Hi'', ''Foo'');
MySecondConstArrayWhichIncludesTheFirstOne -> (''Hi'', ''Foo'', ''Bar'');

¿Es posible de alguna manera?

Answer 1

No lo creo. Tendrás que hacerlo en código. Si se trata de constantes globales, puede hacer la inicialización en la sección ''inicialización'' de la unidad.

Answer 2

AFAIK, no puedes hacer eso.
Pero si el objetivo es garantizar que declare su cadena constante real solo una vez, le sugiero que declare las cadenas individuales y luego las agrupe en matrices:

const
  MyConst1 = ''Hi'';
  MyConst2 = ''Foo'';
  MyConst3 = ''Bar'';
  MyFirstConstArray: array[0..1] of string = (MyConst1, MyConst2);
  MySecondConstArrayWhichIncludesTheFirstOne: array[0..2] of string = 
    (MyConst1, MyConst2, MyConst3);

Por cierto, tu sintaxis es incorrecta, tienes que precisar el tipo de elementos de la matriz.

Answer 3

En realidad, puedes hacerlo usando registros. Utilizo esta técnica a gran escala para crear definiciones para ciertos comportamientos de entidades en mi software. es una técnica muy poderosa:

type
      TPerson=record
        // generally you''d put all kinds of addition stuff here including enums, 
        // sets, etc
        saPets:array[0..2] of string;
      end;

const
  scDog=''Dog'';

  MyPeople:array[0..1] of TPerson=
    ((saPets:(scDog, ''Cat'', ''Fish''); ),
     (saPets:(''Iguana'', ''Tarantula'', ''''); ));

begin
  ShowMessage(MyPeople[0].saPets[0]);

end;

Una cosa que no puedes hacer es referirte a las cadenas de recursos. por lo tanto, cualquier traducción debe ser hecha por el código que recupera el valor. generalmente los indexo con enumeraciones; al hacerlo, puedo hacer que el software sea más fácil de modificar porque no se compilará si dejo algo importante fuera.

Answer 4

Si el orden no es relevante, entonces use conjuntos enumerados.

type
  TMyConsts = (tConstFoo, tConstHi, TConstBar);
const
  MyFirstConstSet = [tConstFoo, tConstHi];
  MySecondConstSet = MyFirstConstSet + [TConstBar];
  MyConstStrings: array[TMyConsts] of string = (''Foo'', ''Hi'', ''Bar'');

Puede usar la matriz MyConstStrings para resolver sus enumeraciones en cadenas si lo desea. Depende de tu objetivo