[Decoding]

Примерно так:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  W: OleVariant;
begin
   W := CreateOleObject( 'Word.Application' );
   // W.Visible := true;
   W.Documents.Open( 'c:\111.doc' );
   W.PrintOut;
   W.Quit;
   W := Unassigned;
end;