Impressão do word pelo Delphi

Olá pessoal...estou com um pequeno problema, montei a seguinte estrutura no delphi.

Word := CreateOleObject(´Word.Application´);
Word.Documents.open(´c:\´+edit1.text+´.doc´);
Word.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter:=true;
Word.ActiveWindow.ActivePane.View.SeekView := 9;
Word.Selection.Insertbefore(#9+9+9+9+´Ato nº ´+edit2.Text);
Word.Selection.Insertbefore(9+9+9+9+´Folha ´+edit3.Text);
Word.Selection.Insertbefore(9+9+9+9+´Livro ´+edit4.Text);
word.ActiveDocument.printout(pages:=1);
word.close;
Word.quit;

a intenção era imprimir apenas a primeira pagina, ou apenas a segunda e ai por diante, so que acaba imprimindo todas as paginas, alguem sabe como fazer isso funcionar??

vlw..