Ver Mensaje Individual
  #2  
Antiguo 03-09-2007
Avatar de Chris
[Chris] Chris is offline
Miembro Premium
 
Registrado: abr 2007
Ubicación: Jinotepe, Nicaragua
Posts: 1.678
Reputación: 19
Chris Va por buen camino
Lo que hago yo es relacionarlos por la propiedad Tag, por ejemplo los checkboxes de la primera columna llevaría un tag de 0 a 19, los de la segunda de 20 a 39. luego en el eventon OnClick lo utilizo un código como este:

Código Delphi [-]
Procedure Form1.CheckOnClick(Sender:TOnject);
var
I : Integer;
Begin

For i := 0 to Self.ComponentCount - 1) Do
Begin
If (Self.Components[i].ClassType = TCheckBox) and ((TCheckBox(Self.Components[i]).Tag - 20) = TCheckBox(Sender).Tag) Then
TCheckBox(Self.Components[i].Enabled := TCheckBox(Sender).Checked;
end;

end;

Espero te sirva el ejemplo. Saludos
__________________
Perfil Github - @chrramirez - Delphi Blog - Blog Web
Responder Con Cita