Ver Mensaje Individual
  #2  
Antiguo 04-03-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 grotero76, la verdad ni me había dado cuenta que eso pasaba, al parecer solo pasa la primera vez, lo que se me ocurre es buscar el Indice en el evento OnExit del ComboBox y actualizarlo ademas de tener una banderita para que ese codigo se ejecute solo una vez. Seguro que a alguien se le ocurrira algo mejor.

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
 Flg:=0;
end;

procedure TForm1.ComboBox1Exit(Sender: TObject);
var
 Ind : Integer;
begin
 if Flg= 0 then
  begin
   Ind:=ComboBox1.Items.IndexOf(ComboBox1.Text);
   ComboBox1.ItemIndex := Ind;
   Flg:=1;
  end;
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