Ver Mensaje Individual
  #3  
Antiguo 13-11-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita