[el_barto]

No mira hazlo asi en tu procedure:

Código Delphi [-]
 
 With IBTable1 do begin
    Open;
//  First;
    While not Eof do begin
        DbGrid1.Columns[0].PickList.Add(IBTable1.FieldByName('campo').Asstring); 
      Next;
    End;
  End;

lo que si no tengo NPI es de como hacerlo segun como indica macoszorrila, es decir agregando un dblookupcombobox y te agradeceria marcos si puedes abrir nuestras mentes con esta interesante solucion