请教Delphi打印高手。。

Question

是关于DevMOde结构与printer对象属性： 
如下代码：
   var curOrientation: integer;   cbPrinters.items.assign(Printer.Printers);   Printer.PrinterIndex:=Printer.PrinterIndex;
   Printer.GetPrinter(Device, Driver, Port, DMode);
   if hDMode <> 0 then
   begin
      pDMode := GlobalLock(hDMode);
      if pDMode <> nil then
      begin
      curOrientation:=pDMode^.dmOrientation;
      GlobalUnlock(hDMode);
   end;
             
  showMessage(inttostr(curOrientation));  // =1
  showMessage(intTostr(integer(Printer.orientation)));      // =0发现 dmOrientation 与 Printer.orientation的值不同。 这两个值不是当有打印机的打印方向值吗？
我的目的是： 自定义一个打印设置对话框，用当前所选的打印机的打印方向值填充窗体，请问各位朋友应如何做？？？

Answer 1

各位大侠：还有个问题要请教的：如何动态改变FastReport报表的打印页范围， 打印方向,打印份数等等？？？小弟先谢了