Delphiで印刷関連のプログラム作るのですがうまくいきません

moji1　　moji2　　moji3　　moji4
aaaa　　aaaa　　aaaa　　　aaaa
aaaa　　aaaa　　aaaa　　　aaaa
aaaa　　aaaa　　aaaa　　　aaaa
aaaa　　aaaa　　aaaa　　　aaaa
------------------------------
以降何行続くかはデータにより変わる。
横向き印刷でやりたいのですがどうしたらいいでしょうか？

Orientation := poLandscape;を指定するとプリントアウトされなくなっちゃうんです。
データじたいはメモリ上に持ってます。
Gridに張り付けて印刷しようとか色々考えましたがダメでした。
こうしたら良いよって言うのがあったら教えて下さい。