矩形体排样问题

// TypeSet.cpp: implementation of the CTypeset class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "..\INC\TypeSet.h"
//用法示例
void TestTypeset(HDC dc)
{
 //声明一个板材对象
 CTypeset typeset;
 //设置板材对象大小
 typeset.m_Desktop.m_dHeight=9999;
 typeset.m_Desktop.m_dWidth=100;
 //声明一个排样元素对象
 CMaterial material;
 //设置排样元素对象大小
 material.SetSize(20,99);
 //添加进入板材对象
 typeset.Add(&material);
 //继续添加
 material.SetSize(99,80);
 typeset.Add(&material);
 material.SetSize(10,60);
 typeset.Add(&material);
 material.SetSize(50,20);
 typeset.Add(&material);
 //添加完毕，进行排样
 typeset.Go();
 //排样完毕，输出
 list<CMaterial*>::iterator iter;
 //画板材对象
 ::Rectangle(dc,typeset.m_Desktop.m_dX,typeset.m_Desktop.m_dY,
  typeset.m_Desktop.m_dX+typeset.m_Desktop.m_dWidth,
  typeset.m_Desktop.m_dY+typeset.m_Desktop.m_dHeight);
 //画排样元素对象
 for(iter=typeset.m_MaterialList.begin();iter!=typeset.m_MaterialList.end();iter++)
 {
  ::Rectangle(dc,(*iter)->m_dX,(*iter)->m_dY,
   (*iter)->m_dX+(*iter)->m_dWidth,
   (*iter)->m_dY+(*iter)->m_dHeight);
 }
 
}
//////////////////////////////////////////////////////////////////////
// CMaterial Class
//////////////////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
#define ZERO 0.00001

CMaterial::CMaterial()
{
 m_dHeight=100;
 m_dWidth=100;
 m_dX=0;
 m_dY=0;
 m_bUsed=FALSE;
 m_bSeletcted=FALSE;
 m_bRotated=FALSE;
 m_iIndex=0;
}
CMaterial::CMaterial(double dWidth,double dHeight)
{
 SetSize(dWidth,dHeight);
 m_dX=0;
 m_dY=0;
 m_bUsed=FALSE;
 m_bSeletcted=FALSE;
 m_bRotated=FALSE;
 m_iIndex=0;
}
CMaterial::CMaterial(CMaterial *pMaterial)
{
 m_dX=pMaterial->m_dX;
 m_dY=pMaterial->m_dY;
 m_dHeight=pMaterial->m_dHeight;
 m_dWidth=pMaterial->m_dWidth;
 m_bUsed=pMaterial->m_bUsed;
 m_bSeletcted=pMaterial->m_bSeletcted;
 m_bRotated=pMaterial->m_bRotated;
 m_iIndex=pMaterial->m_iIndex;
}
void CMaterial::SetSize(double dWidth, double dHeight)
{
 m_dHeight=dHeight;
 m_dWidth=dWidth;
 
}
void CMaterial::Rotated()
{
 m_bRotated=!m_bRotated;
 double dA=m_dHeight;
 m_dHeight=m_dWidth;
 m_dWidth=dA;
}

CMaterial::~CMaterial()
{
}
//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CTypeset::CTypeset()
{
 Clear();
}

CTypeset::~CTypeset()
{
 Clear(); 
}

void CTypeset::Clear()
{
 list<CMaterial*>::iterator iter;
 for(iter=m_MaterialList.begin();iter!=m_MaterialList.end();iter++)
 {
  delete (*iter);
 }
 m_MaterialList.clear();
 m_iCurIndex=0;
}

void CTypeset::Add(CMaterial *pMaterial)
{
 CMaterial *p=new CMaterial(pMaterial);
 p->m_iIndex=m_iCurIndex;
 m_MaterialList.insert(m_MaterialList.end(),p);
 m_iCurIndex++;
}

void CTypeset::Sort()
{
 list<CMaterial*> MaterialList;
 list<CMaterial*>::iterator iter1,iter2,iter3;
 bool bSourceInvert=false;
 while (!m_MaterialList.empty())
 {
  double dMaxLen=0;
  iter2=m_MaterialList.begin();
  CMaterial *p=NULL;
  iter1=m_MaterialList.end()--;
  iter3=iter2;
  while(iter2!=iter1)
  {
   if((*iter2)->m_dWidth>dMaxLen)
   {
    p=*iter2;
    iter3=iter2;
    dMaxLen=(*iter2)->m_dWidth;
    bSourceInvert=false;
   }
   if((*iter2)->m_dHeight>dMaxLen)
   {
    p=*iter2;
    iter3=iter2;
    dMaxLen=(*iter2)->m_dHeight;
    bSourceInvert=true;
   }
   iter2++;
  }
  if(p!=NULL)
  {
   if(bSourceInvert)
    p->Rotated();  
   MaterialList.insert(MaterialList.end(),p);
   m_MaterialList.erase(iter3);
  }
 }
 m_MaterialList.clear();
 for(iter1=MaterialList.begin();iter1!=MaterialList.end();iter1++)
 {
  m_MaterialList.insert(m_MaterialList.end(),(*iter1));
 }
 MaterialList.clear();
}
double CTypeset::Go()
{
 double dRet=0;
 list<CMaterial*> List;
 list<CMaterial*>::iterator iter;
 Sort();
 Typeset(m_Desktop.m_dX,m_Desktop.m_dY,
  m_Desktop.m_dWidth,m_Desktop.m_dHeight,&List);
 m_MaterialList.clear();
 for(iter=List.begin();iter!=List.end();iter++)
 {
  if((*iter)->m_dX<ZERO)
  {
   dRet+=(*iter)->m_dY;
  }
  (*iter)->m_bUsed=FALSE;
  (*iter)->m_bSeletcted=FALSE;
  m_MaterialList.insert(m_MaterialList.end(),(*iter));
 }
 List.clear();
 return dRet;
}

double CTypeset::Typeset(double dStartX,double dStartY,double dStartHei,double dStartWid,
       list<CMaterial*> *pList)
{
 CMaterial  *tmpunit=NULL;
 list<CMaterial*>::iterator iter,iter1;
 double  dArea1,dArea2,dArea;//横放和竖放时的排样面积,和最后方案的排样面积
 double  dRestArea1,dRestArea2;//横放和竖放时排样后的剩余面积
 list<CMaterial*> List1,List2;////横放和竖放时的最佳排样序列
 double  dHeight,dWidth;

 dHeight=dStartHei;
 dWidth=dStartWid;

 if(m_MaterialList.empty())
  return 0;
 for(iter=m_MaterialList.begin();iter!=m_MaterialList.end();iter++)
 {
  if((*iter)->m_bUsed!=FALSE)
   continue;
  if((*iter)->m_dWidth<(*iter)->m_dHeight)
  {
   MessageBox(NULL,"错误","ERROR",MB_OK);
   return 0;
  }

  //找出一张能放入的最大的没有排过的板材
  //如果板材横竖都能放入
  if(((dHeight>(*iter)->m_dWidth-ZERO)&&(dWidth>(*iter)->m_dHeight-ZERO))
   &&((dHeight>(*iter)->m_dHeight-ZERO)&&(dWidth>(*iter)->m_dWidth-ZERO)))
  { 
   if(dStartX<ZERO)
    dWidth=(*iter)->m_dHeight;

   (*iter)->SetUsed(TRUE);//对该图排样

   //先横着放入继续排样，计算剩余面积
   dArea1=Typeset(dStartX+(*iter)->m_dWidth,dStartY,
      dHeight-(*iter)->m_dWidth,(*iter)->m_dHeight,&List1);
   dRestArea1=dHeight*dWidth-dArea1-(*iter)->GetArea();
   dRestArea1=dRestArea1/(dHeight*dWidth);//剩余面积率

   //将刚才排过的板材状态还原，再竖直放入该图继续排样，计算剩余面积
   if(dStartX<ZERO)
    dWidth=(*iter)->m_dWidth;

   SetStatus(&List1,FALSE);
   tmpunit=(*iter)->Copy();
   tmpunit->Rotated();
   dArea2=Typeset(dStartX+tmpunit->m_dWidth,dStartY,
      dHeight-tmpunit->m_dWidth,tmpunit->m_dHeight,&List2);
   dRestArea2=dHeight*dWidth-dArea2-tmpunit->GetArea();
   dRestArea2=dRestArea2/(dHeight*dWidth);//剩余面积率
  }
  else if((dHeight>(*iter)->m_dWidth-ZERO)&&(dWidth>(*iter)->m_dHeight-ZERO))//如果板材只能横着放入
  {
   if(dStartX<ZERO)
    dWidth=(*iter)->m_dHeight;

   (*iter)->SetUsed(TRUE);//对该图排样
   dArea1=Typeset(dStartX+(*iter)->m_dWidth,dStartY,
      dHeight-(*iter)->m_dWidth,(*iter)->m_dHeight,&List1);
   dRestArea1=dHeight*dWidth-dArea1-(*iter)->GetArea();
   dRestArea1=dRestArea1/(dHeight*dWidth);//剩余面积率

   dRestArea2=dRestArea1+10;//不再尝试竖放，将竖放剩余面积设大
  }
  else if((dHeight>(*iter)->m_dHeight-ZERO)&&(dWidth>(*iter)->m_dWidth-ZERO))//如果板材只能竖着放入
  {
   if(dStartX<ZERO)
    dWidth=(*iter)->m_dWidth;

   (*iter)->SetUsed(TRUE);//对该图排样
   tmpunit=(*iter)->Copy();
   tmpunit->Rotated();
   dArea2=Typeset(dStartX+tmpunit->m_dWidth,dStartY,
      dHeight-tmpunit->m_dWidth,tmpunit->m_dHeight,&List2);
   dRestArea2=dHeight*dWidth-dArea2-tmpunit->GetArea();
   dRestArea2=dRestArea2/(dHeight*dWidth);//剩余面积率

   dRestArea1=dRestArea2+10;//不再尝试横放，将横放剩余面积设大
  }
  else
   continue;

  //记录优化的排样序列
  CMaterial *tmp=NULL;
  if(dRestArea1<dRestArea2+ZERO)//当前板材横向排结果优化
  {
   SetStatus(&List2,FALSE);//将纵向排的排样序列还原状态
   SetStatus(&List1,TRUE);//将横向排的排样序列标志为使用
   dArea=dArea1+(*iter)->GetArea();;
   tmp=(*iter)->Copy();
   tmp->m_dX=(int)dStartX;
   tmp->m_dY=(int)dStartY;
   pList->insert(pList->end(),tmp);
   while(!List1.empty())
   {
    iter1=List1.begin();
    pList->insert(pList->end(),*iter1);
    List1.erase(iter1);
   }
   //释放不好的序列
   for(iter1=List2.begin();iter1!=List2.end();iter1++)
   {
    delete (*iter1);
   }
   List2.clear();
   delete tmpunit;
  }
  else//当前板材纵向排结果优化
  {
   SetStatus(&List1,FALSE);//将横向排的排样序列还原状态
   SetStatus(&List2,TRUE);//将纵向排的排样序列标志为使用
   if(tmpunit==NULL)
   {
    MessageBox(NULL,"错误","ERROR",MB_OK);
    return 0;
   }
   
   dArea=dArea2+(*iter)->GetArea();
   tmp=tmpunit->Copy();
   tmp->m_dX=(int)dStartX;
   tmp->m_dY=(int)dStartY;
   pList->insert(pList->end(),tmp);
   while(!List2.empty())
   {
    iter1=List2.begin();
    pList->insert(pList->end(),*iter1);
    List2.erase(iter1);
   }
   //释放不好的序列
   for(iter1=List1.begin();iter1!=List1.end();iter1++)
   {
    delete (*iter1);
   }
   List1.clear();

   delete tmpunit;
  }
  double next_x,next_y,next_len,next_wid;
  next_x=dStartX;
  next_y=dStartY+tmp->m_dHeight;
  next_len=dHeight;
  next_wid=dStartWid-tmp->m_dHeight;
  if(next_wid>ZERO)//板材还有剩余
  {
   //继续排下一行
   dArea=dArea+Typeset(next_x,next_y,next_len,next_wid,&List1);
   //记录排样序列
   SetStatus(&List1,TRUE);
   for(iter1=List1.begin();iter1!=List1.end();iter1++)
   {
    pList->insert(pList->end(),(*iter1));
   }
   List1.clear();
  }
  return dArea;
 }
 return 0;
}

void CMaterial::SetUsed(BOOL bUsed)
{
 m_bUsed=bUsed;
}

void CTypeset::SetStatus(list<CMaterial*> *pList, BOOL bUsed)
{
 list<CMaterial*>::iterator iter1,iter2;
 for(iter1=m_MaterialList.begin();iter1!=m_MaterialList.end();iter1++)
 {
  for(iter2=pList->begin();iter2!=pList->end();iter2++)
  {
   if((*iter1)->m_iIndex==(*iter2)->m_iIndex)
   {
    (*iter1)->m_bUsed=bUsed;
   }
  }
 }
}

CMaterial* CMaterial::Copy()
{
 CMaterial* p=new CMaterial(this);
 return p;
}

 

// TypeSet.h: interface for the CTypeset class.
//
//////////////////////////////////////////////////////////////////////

#if !defined(AFX_TYPESET_H__46213FAE_D2D6_42A6_B801_41D9109CD0FB__INCLUDED_)
#define AFX_TYPESET_H__46213FAE_D2D6_42A6_B801_41D9109CD0FB__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000
#pragma warning(disable:4786)
#pragma warning(disable:4251)
#include <list>
#include <string>
using namespace std;

#ifdef TYPESETLIB_EXPORTS
#define TYPESETLIB_API __declspec(dllexport)
#else
#define TYPESETLIB_API __declspec(dllimport)
#endif

TYPESETLIB_API void TestTypeset(HDC dc);

class TYPESETLIB_API CMaterial 
{
public:
 virtual CMaterial* Copy();
 virtual void SetUsed(BOOL bUsed);
 virtual void Rotated();
 virtual void SetSize(double dWidth,double dHeight);
 virtual double GetArea(){ return m_dHeight*m_dWidth; }
 CMaterial();
 CMaterial(CMaterial *pMaterial);
 CMaterial(double dWidth,double dHeight);
 virtual ~CMaterial();
 double m_dHeight,m_dWidth;
 double m_dX,m_dY;
 BOOL m_bUsed;
 BOOL m_bSeletcted;
 BOOL m_bRotated;
 int m_iIndex;
 
};
class TYPESETLIB_API CTypeset 
{
public:
 virtual double Go();
 virtual void Add(CMaterial *pMaterial);
 CTypeset();
 virtual ~CTypeset();
 list<CMaterial*> m_MaterialList;
 CMaterial m_Desktop;
protected:
 virtual void SetStatus(list<CMaterial*> *pList, BOOL bUsed);
 virtual double Typeset(double dStatrX,double dStatrY,double dStatrHei,double dStatrWid,
  list<CMaterial*> *pList);
 virtual void Sort();
 virtual void Clear();
 int m_iCurIndex;
};

#endif // !defined(AFX_TYPESET_H__46213FAE_D2D6_42A6_B801_41D9109CD0FB__INCLUDED_)

本文地址：http://com.8s8s.com/it/it1364.htm