Ver Mensaje Individual
  #1  
Antiguo 15-09-2010
chingolo chingolo is offline
Miembro
 
Registrado: feb 2008
Posts: 12
Reputación: 0
chingolo Va por buen camino
LMDCombobox e itemindex

Hola comunidad, disculpen si esta posteado antes pero no lo encontre y me urge.

Delphi 6 SP3, Windows XP SP2

Tengo varios LMDCombobox a los cuales les asigno itemindex:=0 en el onshow de la form
El problema es que si bien los combos estan llenos no aparece en el edit del combo hasta q explicitamente hago click y selecciono algun item, es mas si llamo por segunda vez a un boton q introduce itemindex:=0 el texto si aparece.

curiosamente en la primer parte en el Onexit del combo cuando este no muestra texto aun asi haya asignado su itemindex :=0, este aparece como -1


esto seria el button:
procedure TForm5.cxButton4Click(Sender: TObject);
begin
cxDateEdit1.Clear; //cargada
cxDateEdit2.Clear; //visitada
cxDateEdit3.Clear; //realizada
LMDEdit1.Clear; //numero de cuenta
LMDEdit2.Clear; //numero de obra
cxCurrencyEdit1.Clear; //visita numero
LMDComboBox4.Itemindex:=0 ; //empresas
LMDComboBox1.itemindex:=0; //consultora
LMDComboBox2.itemindex:=0; //asesoramiento

LMDComboBox2.OnSelect(self);
//LMDComboBox3.itemindex:=0;

cxDateEdit1.Date:=date;
insert:=true;
CheckBox1.Checked:=false;
image1.Visible:=false;
image2.Visible:=true;
Image3.Visible:=false;
FocusControl(LMDComboBox4);

y esto en la form
cxbutton4.onclick(self);

no se porq se comportan de esa manera, desde ya muchas gracias
Responder Con Cita