Problema con "Help File" en Delphi 7

[pampitasnowman]

Hola a todos, tengo el siguiente problema:

Diseñé una aplicación que corre desde CD, y por ende, no sabría de antemano que letra tiene asignada la PC de cada cliente, a su lectora de CD/DVD. Generé una "Ayuda" con el Shalom Help Maker y este me genera un archivo (por ejemplo) estudiocreativo.hlp. Cuando voy a Delphi 7, en la opción "Project>>Options>>Application>>Help File" y pongo estudiocreativo.hlp, en algunas ocasiones me sale el siguiente error: No se puede hallar el archivo de Ayuda estudiocreativo.hlp. Compruebe si existe en su disco; de lo contrario necesitará instalarlo de nuevo.

El archivo está grabado en el CD, probé con ponerle ../estudiocreativo.hlp, ..\estudiocreativo.hlp y lo mismo.

A veces anda bien, y otras sale ese error, solo con cerrar y volver a ejecutar el soft, o tira el error, o funciona bien. También copio al cd, el otro archivo que me genera el Shalom Help Maker (estudiocreativo.cnt), no solamente el .hlp.

Tal vez esté haciendo algo mal, o el Shalom Help Maker no es de lo mejor, no lo sé, si alguno le pasó lo mismo o sabe como solucionarlo, desde ya, muchas gracias. Un saludo!

[[marceloalegre]]

Claramente es un problema de la ruta al hacer la ejecución
Deberias hacerlo de la siguiente manera:

Código Delphi [-]
ExtractFilePath(Application.ExeName) + '\tu ruta...';

Aclaración tambien puedes usar ParamStr(0) como le lo aclaro el amigo Roman es su momento. Saludos!

[roman]

Completando lo que dice kanvictor:

Código Delphi [-]
Application.HelpFile := ExtractFilePath(Application.ExeName) + '\tu ruta...';

// Saludos

[pampitasnowman]

Muchas gracias! Con el código de kanvictor y la aclaración de roman, hasta ahora no falla. Para completar, si hay más de una lectora de CD/DVD, hay que hacer la excepción correspondiente para ver si hay un CD puesto en la misma, porque sino tira error y...

Código Delphi [-]
ExtractFilePath(Application.ExeName)

... ya pone la barra "\" al final.

De nuevo, muchas gracias! Un saludo, Nacho.