ربط ملف help

السلام عليكم

procedure TForm1.SpeedButtonClick(Sender: TObject);
begin
  Application.HelpFile := 'C:My DocumentsHelphelp.hlp';
  Application.HelpCommand(HELP_FINDER, 1);

end;

saleh2003