(Resolvido) Abrir o Microsoft Office Word

[Recife]

Pessoal Bom Dia,

Estou com um sistema em que possui um menu principal e nele um sub-menu Modelos, em que nele gostaria que ao clicar abri-se um dialog ( opendialog ) e ao setar o caminho da pasta onde encontra-se os documentos words ( são os modelos já prontos ) abri-se o word. Tipo como usamos com o método winexec para abrir um notepad.

Agradeço a ajuda de todos.

[Jhonas]

exemplo:

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
  MSWord : variant;
begin
  if OpenDialog1.Execute then
     begin
        Msword:=createoleObject('Word.Basic');
        Msword.AppShow;
        Msword.fileopen(OpenDialog1.FileName);
     end;
end;

abraço

[Recife]

Jhonas,

Mais uma vez muito obrigado por sua ajuda. Desculpe-me pela demora, mais estava envolvido em uma homologação de NFe.

[Problema Resolvido]