Gracias Casimiro! yo estoy recorriendo la tabla con un ciclo porque no estoy utlizando un dblist si no un objeto lista corriente. El código es sencillo:
Código Delphi
[-]
tabla.First;
while not (tabla.EOF) do begin
lista.Items.Add(tabla.FieldByName(codig).AsString);
tabla.Next;
end;