Dúvidas com ListBox

Boa tarde pessoal,
Há anos não mexia com Delphi e na empresa que trabalho entrou a manutenção de um sistema em Delphi e voltei a mexer com esta incrível ferramenta. Esbarrei em um detalhe que não consigo implementar a alteração. Caso vocês possam me auxiliar. O que vou passar aqui é uma questão que já passada para o cliente como não sendo o melhor tratamento, mas o mesmo não quis alterar os componentes utilizados no sistema, sendo assim e sem mais delongas, segue:
Em um form existem 4 listbox que hoje o retorno de informações são feitos pelos eventos onClick dos listbox, o cliente quer que nos Listbox1 e ListBox2 o retorno das informações sejam feitas pelo evento onChange do DBEdit1(ID e PK do banco). Só que estas informações estão na mesma tabela que são (Fornecedor e valor a ser pago), o ListBox1 carrega os fornecedores e o ListBox2 deveria carregar os valores a serem pagos com seus respectivos fornecedores, só que nesta implementação os valores vem todos fora de ordem inviabilizando assim o uso das informações. Estamos utilizando Delphi Rio e Interbase 2017.
Se alguém puder me dar uma direção de como trazer estes registros ordenados para cada qual.
Obrigado pessoal