Ver Mensaje Individual
  #2  
Antiguo 01-06-2006
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.278
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
=> Se podría hacer fácilmente si desde ADO se pudiesen consultar las tablas de sistema de Access; Bastaría con una consulta sobre la tabla MSysObjects con el criterio (Type=-32764). El problema es que yo no he conseguido consultar ésta tabla desde Delphi a través de ADO (si lo descubres dímelo).

Otra forma más manual es la siguiente:
(1) Puedes mantener una tabla temporal con los listados existentes. Para crea una consulta como ésta para generar una tabla y la ejecutas desde la macro AutoExec, por ejemplo. Te mantendrá actualizada esa tabla temporal.

Código SQL [-]
SELECT MSysObjects.Name INTO tmpListados
FROM MSysObjects
WHERE (((MSysObjects.Type)=-32764));


(2) Después desde Delphi basta con que usues un TADOQuery con la siguiente consulta:

Código SQL [-]
select * from tmpListados
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita