TRect MinRect;

　　Graphics::TBitmap *bt2=new Graphics::TBitmap;

　　TJPEGImage *j=new TJPEGImage;

　　//************************

　　j->Quality=Qlity;

　　//************************

　　CopyScreenUint CopyScreen;

　　CopyScreenItemUint CopyScreenItem;

　　TMemoryStream *ms=new TMemoryStream;

　　ms->Write(&TcpMsg,sizeof(TcpMsgUint));

　　ms->Write(&CopyScreen,sizeof(CopyScreenUint));

　　do{

　　for (num1=0;num1 for (num2=0;num2 for (num3=num1+1;num3<=xCount;num3++){

　　MaxCNum=0;

　　for (num4=num2+1;num4<=yCount;num4++){ //遍历所有矩形

　　CNum=GetChangedNum(TRect(num1,num2,num3,num4));

　　if (CNum>MaxCNum) MaxCNum=CNum;

　　m=(num3-num1)*(num4-num2);

　　if (2*m-CNum MinSize=2*m-CNum;

　　MinRect=TRect(num1,num2,num3,num4);

　　}

　　}

　　}

　　TMemoryStream *ms;

　　BitBlt(bt2->Canvas->Handle,0,0,ItemWidth-1,ItemHeight-1,bt->Canvas->Handle,0,0);

　　j->Assign(bt2);

　　j->SaveToStream(ms2);

　　CopyScreenItem.Rect=TRect(num1,num2,num3,num4);

　　CopyScreenItem.FileType=JPEGFILE; //JPEGFILE 定义为：#define JPEGFILE 1

　　ms2->Position=0;

　　CopyScreenItem.Length=ms2->Size;

　　ms->Write(&CopyScreenItem,sizeof(ScreenItemUint));

　　ms->CopyFrom(ms2,ms2->Size);

　　ChangedNum++;

　　}while(MaxCNum>0);

　　TcpMsg.Type=MsgCopyScreen;

　　ms->Position=0;

　　TcpMsg.Length=ms->Size-sizeof(TcpMsgUint);

　　CopyScreen.Count=ChangedNum;

　　ms->Write(&TcpMsg,sizeof(TcpMsgUint));

　　ms->Write(&CopyScreen,sizeof(CopyScreenUInt));

　　ms->Position=0;

　　sock->SendStream(ms);

　　}

　　这个程序把屏幕画面切分为了多个部分，并存储画面为JPG格式，这样压缩率就变的十分的高了。通过这种方法压缩处理过的数据，变得十分小，甚至在屏幕没有改变的情况下，传送的数据量为0，在这里不做过多分析了，有兴趣的朋友，可以多看看。