저도 초보인데 일단 제가 아는 내용 몇자 적었습니다.

우선 프린트 다이얼로그 컴포넌트와
Canvas의 TextOut을 사용하면 프린트를 할 수 있습니다.
예를 들면,

if(PrintDialog1->Execute())
{
  TPrinter *ptr2 = Printer();

  ptr2->Canvas->Font->Size= 10;
  ptr2->Canvas->Font->Name= "굴림체";

  ptr2->BeginDoc();

   for(int i=0; i<StringGrid1->RowCount;i++)
   {
      ptr2->Canvas->TextOut(500,500+150*i,StringGrid1->Cells[0][i]);
      ptr2->Canvas->TextOut(800,500+150*i,StringGrid1->Cells[1][i]);
      ptr2->Canvas->TextOut(1600,500+150*i,StringGrid1->Cells[2][i]);
      ptr2->Canvas->TextOut(2600,500+150*i,StringGrid1->Cells[3][i]);
   }
  ptr2->EndDoc();
}

이렇게 할 수 있습니다.
자세한 내용은 도움말을 참조하세요...
저도 여기 Q&A에서 도움을 얻어 한 내용입니다.
다음부턴 먼저 찾아보고 질문을 올리면 좋을 것 같습니다.
^^~