Array con diferentes tipos

[ecfisa]

Hola.

A ver, hay una gran confusión en ese código.

Si queres acceder a la propiead Enabled, tendrás que declarar a los elementos del arreglo de tipo TControl o de un descendiente de él:

Código Delphi [-]
type
  TNombreDeArray : array[0..4] of TControl;

var
  v: TNombreDeArray;

Luego sí podrás hacer:

Código Delphi [-]
  v[0]:= Label1;
  v[1]:= Edit1;
  ...
  v[0].Enabled := False;
  ...

Por otro lado, o la variable 'i' es de tipo Integer y por tanto carece de la propiedad Enabled o tendría que ser de tipo TControl o descendiente para que pudieras hacer:

Código Delphi [-]
  if ... then
    for i:= 0 to 2 do
      i.Enabled := false;
    ...

Pero eso nunca sucederá por que la variable de control de un ciclo for debe ser de tipo ordinal.

Sí podrías hacer algo como:

Código Delphi [-]
type
  TNombreDeArray = array[0..4] of TControl;

var
  v: TNombreDeArray;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  v[0]:= Label1;
  v[1]:= Edit1;
  v[2]:= Label2;
  ...
 
  if Ecuaciones[1] then
  begin
    for i:= 0 to 2 do
      v[i].Enabled:= False;
    ...

Saludos.