Como meto en un ComboBox todos los valores de una columna de una tabla

[gorsan]

Buenas compañeros. A ver si alguien me echa un cable con la siguiente cuestion aunque les adelanto que estoy un poco verde en estas cuestiones. Seguro que para ustedes es algo facil.
Trabajo con IB6 y Delphi 7 y lo que quiero hacer es meter en los items de un ComboBox los valores de una columna de una tabla que tiene una restriccion primary key. A ver si alguien me envia una idea que me habra la mente. Un saludo y gracias por anticipado.

[marcoszorrilla]

Independientemente de que yo usaría un DbLookUpCombBox, con una ComboBox habría que cargar a mano, es decir por código:

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin
Table1.First;
  While Not Table1.Eof do
  begin
  ComboBox1.Items.Add(Table1Titular.AsString);
  Table1.Next;
  end;
end;

Un Saludo.

[gorsan]

Parece que va. Seré tonto ... yo habia intentado esto mismo con un IBQuery y no iba.
Muchas gracias y ahora si selecciono uno de los elementos del ComboBox ¿como me posiciono en el en la tabla? teniendo en cuenta que los controles Data-Aware sobre los que se ven los valores de los campos estan contra un IBDataSet. he probado con el EditKey y gotokey (de las tablas BDE) y no va. Tambien con el metodo Locate.

Muchas gracias.

[NestorN]

Hola como dijo marcelozorrilla te conviene usar un DbLookupComboBox
Asignando en las prodiedades Listsourse, keyfield, y Listfield te sale andando todo.
Saludos

[gorsan]

He probado con el DBLookupComboBox y va bien. Solo que cuando crea el formulario solo aparece dentro de los items del combo el del registro actual. Lo he solucionado haciendo un last y luego un first sobre la tabla para que se llenen todos los items.
Tema concluido. Muchas gracias.