Ver Mensaje Individual
  #4  
Antiguo 21-04-2008
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Reputación: 24
BlueSteel Va por buen camino
Cool

Mira...

realice esto .. puse 2 combobox... con el mismo texto (disponible - no disponible)

y en el evento onchance de cada combo puse esto.. y funciona super...

Código Delphi [-]
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
     If ComboBox1.ItemIndex = 0 Then
        ComboBox2.ItemIndex := 1
     Else
        ComboBox2.ItemIndex := 0;
end;
procedure TForm1.ComboBox2Change(Sender: TObject);
begin
     If ComboBox2.ItemIndex = 0 Then
        ComboBox1.ItemIndex := 1
     Else
        ComboBox1.ItemIndex := 0;
end;

Salu2
__________________
BlueSteel
Responder Con Cita