Delphi - Pregunta

Estoy usando delphi 7 y tengo problemas para conectarme una base de datos, cuando llego a
AdoConnection1.GetTableNames(NombreTablas, false);
{ Add the table names to a list box }
ListBNombreTablas.Items := NombreTablas;

recibo una excepcion y es enseguida que me trato de concetar a una base de datos
les agradezco si alguien me puede enviar algun tipo de ayuda
Muchas gracias

Nesesito crear una herramienta para red la cual me haga una lista de las maquinas que estan conectadas a esa red nesesito saber componente debo usar mejor para eso les agradesco que algien me pueda ayudar gracias