delphi调用打印机问题

[hu0829]

 SetTexT(24,3,'Page ' + IntToStr(iCurrentPage) + ' of ' + IntToStr(iPageCount));
    PrintOrientation := 2;
    PrintSheet;

PrintOrientation是设置打印方向的，查了一下帮助文档

Setting Description Constant
0 - Default (Default) Uses the current printer setting PrintOrientationDefault
1 - Portrait Prints sheet in portrait mode PrintOrientationPortrait
2 - Landscape Prints sheet in landscape mode PrintOrientationLandscape

2是横向打印，当我设置成2的时候执行PrintSheet这里就会报错

access violation at address 77C16FA3 in mscvrt.dll. Write Of address 07FC100

设置成1和0都不会报错，唯独设置成2横向打印报错，mscvrt.dll.也替换几次也不行，求解？？？