Mira acabo de hacer la siguiente prueba, y me funciona sin ningún problema:
Código Delphi
[-]
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' ;
{$R *.RES}
begin
Application.Initialize;
Application.HelpFile := 'D:\pruebas\Ren2003e.hlp';
Application.CreateForm(TForm1, Form1);
Application.Run;
implementation
{$R *.DFM}
function TForm1.ApplicationEvents1Help(Command: Word; Data: Integer;
var CallHelp: Boolean): Boolean;
begin
ShowMessage('Llamando a la ayuda');
end;
Cada vez que pulso F1 me muestra el mensaje que ves y ademas me abre el fichero de ayuda que he colocado circunstancialmente.
Un Saludo.