Ver Mensaje Individual
  #8  
Antiguo 21-04-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola gaston260, dentro de Component se encuentra la lista de componentes de un propietario en tu caso tu formulario, donde estos componentes pueden ser componentes visuales y no visuales. Pero también puedes utilizar la propiedad Controls de dicho formulario, aquí solo se encuentra la lista de los componentes Visuales.

Sobre esta pregunta "como ago para escribir el codigo de delphi y que se vea higual en este hilo", supongo que te refieres a que el código que quieres publicar se vea de la misma forma que marcos te lo puesto, solo tienes que encerar tu codigo con las etiquetas [delphi] codigo [ /delphi], sin el espacio.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
 i:Integer;
 s:Integer;
begin
 s:=0; 
 for i:=0 to form1.ComponentCount -1 do //ComponentCount-> cantidad de componentes del formulario begin
     If (Components[i] Is TCheckBox) Then //Preguntamos si el componente en esa posición es un CheckBox
      If (Components[i] As TCheckBox).Checked = True Then //Preguntamos si ese CheckBox tiene su propiedad Checked en True, si es asi sumamos
      s:=s+(Components[i] As TCheckBox).Tag;
 end;
 ShowMessage(intToStr(s));
end;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita