Ver Mensaje Individual
  #2  
Antiguo 15-02-2011
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 chino150.

Perdón pero no entiendo cuál es el problema de usar la propiedad Color del form con los tres Buttons.

Si lo que querés es utilizar un solo evento, numerá la propiedad Tag de los botones a: 0,1 y 2. Luego seleccioná los tres botones y en el Object Inspector, pestaña Events, hacé doble click sobre el evento OnClick y poné este código por ejemplo:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  case TButton(Sender).Tag of
    0: Color:= clRed;
    1: Color:= clBlue;
    2: Color:= clYellow;
  end;
end;

Un saludo.
__________________
Daniel Didriksen

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