delphi 打印设置

[wmsyzx]

各位大神：
我想使用代码打印一个from1，同时在打印之前设置页面的页边距和页面大小，是利用代码设置，不能用PageSetupDialog或者PrinterSetupDialog，请问该如何设置？谢啦。
另外，如果将A4纸分成九个区域，想通过代码选择打印到纸上的哪个位置，该如何写啊？