como complemento a mensage anterior,
si deseas que el programa funcione en donde se instale, no debes poner la ruta fìsica, debes poner ruta relativa.
CODIGO:
bool ret;
ret = CreateODBCAlias("MiAlias",
"bd.mdb",
ExtractFilePath(Application->ExeName),
"Esto es una prueba");
// Devuelve true si se crea correctamente
ShowMessage(ret ? "Creado" : "Error");
solo se sustituye :
"C:directorio", por la direccion en donde se encuentra el programa.
ExtractFilePath(Application->ExeName),
bueno un saludo a todos.