Отображение файла в браузере, как прописать путь к HTML файлу Опции

[ted]

Привет! Подскажите как сделать так, чтобы по нажатию на кнопку открывался браузер и в него загружался HTML файл, зарание созданный.

[volvo]

procedure TForm1.Button1Click(Sender: TObject);
var HTMLFile: string;
begin
  HTMLFile := 'D:\test_s.htm';
  ShellExecute(Handle, 'open', PChar(HTMLFile), nil, nil, SW_SHOWNORMAL);
end;