ejecutar arhcivo de ayuda!? [Archivo]

Dantael

24-01-2005, 20:48:19

hola!, pues el problema es que tengo una aplicación que se va a ejecutar en una máquina que no tiene delphi ahora ya tengo el archivo de ayuda y el siguiente código

procedure TForm1.Aayuda1Click(Sender: TObject);
var
ruta: pchar;
begin
ruta:= ExtractFilePath(Application.ExeName);
WinHelp(Self.Handle, ruta+'helpfacyrem.hlp', HELP_CONTENTS, 0);
end;

aquí es logico el error de que no puede convertir un string a un pchar, antes lo tenia sin la variable ruta solo con WinHelp(Self.Handle, 'helpfacyrem.hlp', HELP_CONTENTS, 0); pero en la máquina que lo voy a poner manda el mensaje no se puede hallar el archivo helpfacyrem.hlp desea intentar hallarlo usted mismo. No lo abre de inmediato ¿cómo puedo hacer para que lo abra sin que el usuario tenga que buscarlo manualmente?

Gracias de antemano

Neftali [Germán.Estévez]

25-01-2005, 11:33:53

Prueba con éste código; La variable se define como string y luego se convierte.

var
ruta: String;
begin
ruta := ExtractFilePath(Application.ExeName);
WinHelp(Self.Handle, PChar(ruta + 'RAL LIBRARY HELP.HLP'{'helpfacyrem.hlp'}), HELP_CONTENTS, 0);