BCBでフォームの印刷

質問

Borland C++ Builder 5(Pro)を使っています。
TForm上にTImageを乗せ、そこにPolyline等で図形を描いています。
それを印刷したいのですが、TImageにはPrintメソッドがないので、
TFormのPrintメソッドを呼び出していますが、印刷できません。
プリンタのジョブを監視していると、何も印刷せずに「印刷済」になっています。

印刷ボタン、印刷設定ボタンのOnClickは以下のようになっています。
間違い等ありましたらご指摘ください。
// 印刷ボタン
void __fastcall TGraphForm::PrintButtonClick(TObject *Sender)
{
　　if(PrintDialog->Execute()){
　　　　GraphForm->Print();
　　}
}
// 印刷設定ボタン
void __fastcall TGraphForm::PrtSetupButtonClick(TObject *Sender)
{
　　PrinterSetupDialog->Execute();
}

回答No.1

BLUEPIXY

これが、スタンダードな方法かどうかは知らないのですが、
ずっと昔に作ったプログラムを見てみると
別のフォームとイメージに、元のＤＣを使ってBitBltしてからPrintしていました。
参考になれば