Hola Jhonny, gacias por responder a mi post, sabes que ya tengo mi problema solucionado, mi error era que no hacía bien el ciclo, acá dejo mi código, quizás a alguien pueda ayudarle:
Código:
DM.IBDataSet.Locate('nombre', DM.IBDataSet.FieldValues[nombre], []);
if not (DBListBox.Items.Text = '') then
DBListBox.Items.Text:= DBListBox.Items.Text + DM.IBDataSetnombre.Value
else
DBListBox.Items.Text := DM.IBDataSetnombre.Value;
Nuavamente gracias!