Código Delphi
[-] procedure TfrmConceptos.txtcbChange(Sender: TObject);
begin
sqlBuscar.SQL.Text:='SELECT CVE_TIPOCOBRO FROM CONCEPTOS';
sqlBuscar.Active:=true;
while not sqlBuscar.Eof do
begin
txtcb.Items.Add(sqlBuscar.Fields[0].text);
sqlBuscar.Next;
end;
intenta pornerlo en el OnCreate del form luego me comentas.
Saludos