Ver Mensaje Individual
  #1  
Antiguo 02-10-2013
Panasys Panasys is offline
Miembro
 
Registrado: ago 2007
Posts: 88
Reputación: 17
Panasys Va por buen camino
TComboBox carga lo que quiere

Bueno, me pasa algo con un TComboBox que no me pasa en otras partes del programa pero en particular esta es que en una parte del programa cargo un pasajero el cual tiene un pais, al TComboBox lo cargo desde una tabla donde tengo los paises.

con:

FData.QAux2.SQL.Clear;
FData.QAux2.SQL.Add('Select * From tpais');
FData.QAux2.Open;

// CARGO EL CAMPO DE PAIS
ModificaPais.Clear;
ModificaPais.Items.Add('Seleccione Pais'); //Este lo agrego para que me ocupe el 0 en el ComboBox
y mantenga concordancia con la tabla
FData.QAux2.First;
While Not FData.QAux2.Eof Do // Realizar mientras no sea fin de archivo
Begin
ModificaPais.Items.Add(FData.QAux2.FieldByName('PAIS').Value);
FData.QAux2.Next;
End;
//ModificaPais.Text := FData.QAux.FieldByName('PAIS').Value;
ModificaPais.ItemIndex := PaisID; // - 1;
Responder Con Cita