Examples Delphi

  1. Home
  2. Delphi
  3. Examples
  4. wordfdocprint
The following Delphi 5 code will open and print a word document.
var
oWord : TWordApplication;
varFileName : OleVariant;
begin
oWord := TWordApplication.Create (Nil);
Try
oWord.Connect;
varFileName := 'c:\temp\test.doc';
oWord.Documents.Open (varFileName,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam);
oWord.ActiveDocument.PrintOut (EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam);
oWord.Disconnect;
Finally
oWord.Free;
End;