打印Memo的文本信息

核心提示：TPRinter * pPrinter=Printer();pPrinter->Title="打印Memo1中的数据";pPrinter->BeginDoc();int y=10;for(int i=0;i<Memo1->Lines->Count;i++){pPrint

　　TPRinter * pPrinter=Printer();
pPrinter->Title="打印Memo1中的数据";
pPrinter->BeginDoc();
int y=10;
for(int i=0;i<Memo1->Lines->Count;i++)
　{
　pPrinter->Canvas->TextOut(10,y,Memo1->Lines->Strings[i]);
　y+=pPrinter->Canvas->TextHeight("A");
　}
pPrinter->EndDoc();