Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Ejecutar BDE Administrador (https://www.clubdelphi.com/foros/showthread.php?t=31442)

Colgueit 08-05-2006 17:04:49

Ejecutar BDE Administrador
 
Hola,

En mi programa tengo una opcion que ejecuta el BDE Administrador simplemente llamando a éste con "ShellExecute" en la direccion en la que casi siempre suele estar, es decir, "C:\Archivos de programa\Archivos comunes\Borland Shared\BDE\bdeadmin.exe", pero claro como he dicho casi siempre...

Lo que quisiera es saber si hay alguna forma de conocer la ruta donde se encuentra el BDE Administrador, es decir, que me diga donde esta el archivo "bdeadmin.exe".

Espero que alguien me pueda ayudar, Gracias, Un saludo ;)

Neftali [Germán.Estévez] 08-05-2006 17:33:14

Intentalo con ésta clave del registro:
HKEY_LOCAL_MACHINE\SOFTWARE\Borland\Borland Shared

Colgueit 08-05-2006 17:57:14

La idea es buena, pero he probado a ejecutar la clave con ShellExecute y no va. Exactamente esto es lo que hago:

Código Delphi [-]
ShellExecute(FormConfigurarBDE.Handle,nil,PChar('HKEY_LOCAL_MACHINE\SOFTWARE\Borland\Borland Shared'),'','',SW_SHOWNORMAL)

Me imagino que así no se hace, entonces como ejecuto la clave de registro?

Gracias!!! Taluegoo

Neftali [Germán.Estévez] 08-05-2006 18:09:13

Perdón, me expliqué fatal (es que andaba con un poco de prisa).
Me refería a que utilizando la clase TRegistry de delphi, podrías buscar en esa clave de registro para obtener el directorio donde se encuentran los ficheros compartidos.
Tal vez por ese camino encuentres salida, aunque no lo he probado.

Colgueit 08-05-2006 18:38:04

Ejecutar las utilidades del panel de control
 
Antetodo gracias por la contestación.

No he conseguido hacerlo como dices, pero ya lo he conseguido hacer de otra forma.

Si está instalado el BDE en el ordenador se encontrará un acceso al administrador del BDE en el panel de control, por lo tanto podré acceder a éste por ahi.
Aki dejo el código por si a alguien le sirve (sirve para ejecutar cualquier utilidad del panel de control, basta con cambiar el archivo .cpl, los cuales se encuentran en \windows\system32):
Código Delphi [-]
ShellExecute(Handle,'open','control.exe','bdeadmin.cpl',NIL,SW_SHOW);

Un Saludo.


La franja horaria es GMT +2. Ahora son las 17:23:02.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi