TRichEdit* text=new TRichEdit(this);
text->Parent=this;
text->Visible=False;
text->Lines->LoadFromFile("c://456.rtf");
TFormatRange range;
INT lastchar,maxlen,logx,logy;
memset(&range,0,sizeof range);
logx=GetDeviceCaps(img1->Canvas->Handle,LOGPIXELSX);
logy=GetDeviceCaps(img1->Canvas->Handle,LOGPIXELSY);
range.hdc=img1->Canvas->Handle;
range.hdcTarget=range.hdc;
range.rc.right=img1->ClientWidth*1440/logx;
range.rc.bottom=img1->ClientHeight*1440/logy;
range.rcPage=range.rc;
lastchar=0;
maxlen=text->GetTextLen();
range.chrg.cpMax=-1;
range.chrg.cpMin=lastchar;
SendMessageA(text->Handle,EM_FORMATRANGE,1,LPARAM(&range));
img1->Refresh();