skinview.cpp

石油行业油井损害软件,有详细的油井损害模型,对石油建模有重要帮助

 // SkinView.cpp : implementation of the CMyView class
//

#include "stdafx.h"
#include "储层损害矿场评价软件.h"

#include "SkinDoc.h"
#include "SkinView.h"
#include "math.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

#define   F1FileFormulaOne3		0

/////////////////////////////////////////////////////////////////////////////
// CMyView

IMPLEMENT_DYNCREATE(CMyView, CView)

BEGIN_MESSAGE_MAP(CMyView, CView)
	//{{AFX_MSG_MAP(CMyView)
	ON_WM_ERASEBKGND()
	ON_COMMAND(ID_FILE_PRINT_REPORT, OnFilePrintReport)
	ON_COMMAND(ID_FILE_EXPORTTOWORD, OnFileExporttoword)
	ON_UPDATE_COMMAND_UI(ID_FILE_EXPORTTOWORD, OnUpdateFileExporttoword)
	ON_UPDATE_COMMAND_UI(ID_FILE_PRINT_REPORT, OnUpdateFilePrintReport)
	//}}AFX_MSG_MAP
	// Standard printing commands
	ON_COMMAND(ID_FILE_PRINT, CView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_DIRECT, CView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_PREVIEW, CView::OnFilePrintPreview)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMyView construction/destruction

CMyView::CMyView()
{
	// TODO: add construction code here
	pReport1 = new CVCF1;
	pReport2 = new CVCF1;
	pChart = new CChartfx;
	bFontCreate = bChartCreat = bPrint = bReportCreat = bPrintReport = FALSE;
	char ModuleName[256];
	GetModuleFileName(NULL, ModuleName, 255);
	int pos;
	CString Name=ModuleName;
	pos=Name.ReverseFind('\\');
	ReportName = Name.Left(pos+1)+"report.vts";
 }

CMyView::~CMyView()
{
	msselection.ReleaseDispatch();
	msdocu.ReleaseDispatch();
	msword.ReleaseDispatch();


	delete pChart;
	delete pReport1;
	delete pReport2;
}

BOOL CMyView::PreCreateWindow(CREATESTRUCT& cs)
{
	// TODO: Modify the Window class or styles here by modifying
	//  the CREATESTRUCT cs

	return CView::PreCreateWindow(cs);
}

/////////////////////////////////////////////////////////////////////////////
// CMyView drawing

void CMyView::OnDraw(CDC* pDC)
{
	CMyDoc* pDoc = GetDocument();
	ASSERT_VALID(pDoc);
	// TODO: add draw code for native data here

	pReport1->ShowWindow(SW_HIDE);
//	pDC->SetMapMode(MM_LOMETRIC);
	pDC->SetBkMode(TRANSPARENT);
//	LOGFONT lFont, lFont2;
//	myfont.GetLogFont(&lFont2);
//	CFont *poldFont = pDC->SelectObject(&myfont);
//	poldFont->GetLogFont(&lFont);
	TEXTMETRIC	tx;
	pDC->GetTextMetrics(&tx);
	int dh = tx.tmHeight*1.5;	// 屏幕显示行间距
	
	if(pDoc->OPER == BIAOPI || pDoc->OPER == SHENDU )
	{
		pChart->ShowWindow(SW_HIDE);
		str1.Format("总表皮系数 =  %-10.4lf", pDoc->s);
		str2.Format("　　部分打开表皮系数 =  %-10.4lf，　　　　　　射孔表皮系数 =  %-10.4lf",
			pDoc->spt, pDoc->spf);
		str3.Format("　　非达西流表皮系数 =  %-10.4lf，　　地层边界形状表皮系数 =  %-10.4lf",
			pDoc->snd,pDoc->sca);
		str4.Format("　　一条边界表皮系数 =  %-10.4lf，　　　　两条边界表皮系数 =  %-10.4lf", 
			pDoc->s1b, pDoc->s2b);
		str5.Format("　　　　相变表皮系数 =  %-10.4lf，　　　　　　井斜表皮系数 =  %-10.4lf", 
			pDoc->scp, pDoc->sws);
		str6.Format("　　各向异性表皮系数 =  %-10.4lf，　　　　　变产量表皮系数 =  %-10.4lf",
			pDoc->san, pDoc->svq);
		str7.Format("　　压力敏感表皮系数 =  %-10.4lf，　　　　地层损害表皮系数 =  %-10.4lf",
			pDoc->sym, pDoc->sd);
		
		GetClientRect(Client);
		pDC->DPtoLP(Client);
		Client.top = 40;
		pDC->DrawText(str1, -1, &Client, DT_CENTER | DT_SINGLELINE);
		Client.top += dh;
		pDC->DrawText(str2, -1, &Client, DT_CENTER | DT_SINGLELINE);
		Client.top += dh;
		pDC->DrawText(str3, -1, &Client, DT_CENTER | DT_SINGLELINE);
		Client.top += dh;
		pDC->DrawText(str4, -1, &Client, DT_CENTER | DT_SINGLELINE);	
		Client.top += dh;
		pDC->DrawText(str5, -1, &Client, DT_CENTER | DT_SINGLELINE);
		Client.top += dh;
		pDC->DrawText(str6, -1, &Client, DT_CENTER | DT_SINGLELINE);
		Client.top += dh;
		pDC->DrawText(str7, -1, &Client, DT_CENTER | DT_SINGLELINE);
	}
	if(pDoc->OPER == SHENDU)
	{
		str1.Format("损害深度 =  %-10.4lf(m)",pDoc->fls);
		Client.top += (long) dh*1.5;
		pDC->DrawText(str1, -1, &Client, DT_CENTER | DT_SINGLELINE);
//		pDC->TextOut(10,10,str1);
	}
	if(pDoc->OPER==ZENGCHAN )
	{
		str1.Format("增产率 = %-7.3lf",pDoc->dpr0);
		pDC->TextOut(5, 20,str1);

		double maxYValue= pDoc->dqr[0];
		double maxXValue= pDoc->ds[0];
		double dXRange, dYRange, di;
		for(int i=1; i<40; i++)
		{
			maxYValue=max(maxYValue, pDoc->dqr[i]);
			maxXValue=max(maxXValue, pDoc->ds[i]);
		}

		for( di=pow(10,floor(log10(maxXValue))-1); di < maxXValue; di*=10)
		{
			dXRange = di;
			if( maxXValue / dXRange <= 10 ) break;
			dXRange = di*2;
			if( maxXValue / dXRange <= 10 ) break;
			dXRange = di*5;
			if( maxXValue / dXRange <= 10 ) break;
		}
		maxXValue = ceil(maxXValue/dXRange) * dXRange;

		for( di=pow(10, floor(log10(maxYValue))-1); di< maxYValue; di*=10)
		{
			dYRange = di;
			if( maxYValue / dYRange <= 10 ) break;
			dYRange = di*2;
			if( maxYValue / dYRange <= 10 ) break;
			dYRange = di*5;
			if( maxYValue / dYRange <= 10 ) break;
		}
		maxYValue = ceil(maxYValue/dYRange) * dYRange;

		pChart->SetAdm(1, maxYValue);
		pChart->SetAdm(7, maxXValue);
		pChart->SetAdm(2, dYRange);
		pChart->SetAdm(8, dXRange);

		pChart->OpenDataEx(6, 1L, 40L);
		pChart->SetThisSerie(0);
		for(i=0; i<40; i++)
		{
			pChart->SetXValue(i, pDoc->ds[i]);
		}
		pChart->CloseData(6);

		pChart->OpenDataEx(1, 1L, 40L);
		pChart->SetThisSerie(0);
		for(i=0; i<40; i++)
		{
			pChart->SetValue(i, pDoc->dqr[i]);
		}
		pChart->CloseData(1);
		GetClientRect( &Client);
//		Client.left=Client.right/5;		// 图形左侧让出1/5
		Client.left = 110;				// 图形左侧让出110点

		pChart->MoveWindow( &Client, FALSE );	
		pChart->Refresh();
		pChart->ShowWindow(SW_SHOW);
	}
	else
		pChart->ShowWindow(SW_HIDE);

//	pDC->SelectObject(poldFont);
	bPrint = FALSE;
}

/////////////////////////////////////////////////////////////////////////////
// CMyView printing

BOOL CMyView::OnPreparePrinting(CPrintInfo* pInfo)
{
	// default preparation
	if(bPrintReport)	// 打印报告
	{
		pInfo->m_bDirect = TRUE;
//		pInfo->m_bPreview = TRUE;
	}
	return DoPreparePrinting(pInfo);
}

void CMyView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add extra initialization before printing

}

void CMyView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add cleanup after printing
}

/////////////////////////////////////////////////////////////////////////////
// CMyView diagnostics

#ifdef _DEBUG
void CMyView::AssertValid() const
{
	CView::AssertValid();
}

void CMyView::Dump(CDumpContext& dc) const
{
	CView::Dump(dc);
}

CMyDoc* CMyView::GetDocument() // non-debug version is inline
{
	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CMyDoc)));
	return (CMyDoc*)m_pDocument;
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CMyView message handlers

BOOL CMyView::OnEraseBkgnd(CDC* pDC) 
{
	
	// TODO: Add your message handler code here and/or call default
// Create a pruple brush.
CBrush brush (RGB (192 , 192 , 192) );

// Select the brush into the device context.
CBrush* pOldBrush = pDC->SelectObject (&brush);

// Get the area that needs to be erased .
CRect rcClip ;
pDC->GetClipBox (&rcClip);

//Paint the area.
pDC-> PatBlt (rcClip.left , rcClip.top ,
        rcClip.Width ( ) , rcClip.Height ( ) , PATCOPY );

//Unselect brush out of device context .
pDC->SelectObject (pOldBrush );

// Return nonzero to half fruther processing .
return TRUE;
	
//	return CView::OnEraseBkgnd(pDC);
}


void CMyView::OnInitialUpdate() 
{
	CView::OnInitialUpdate();
		
	// TODO: Add your specialized code here and/or call the base class

	CDC* pDC=GetDC();
	pDC->SetMapMode(MM_LOMETRIC);
	pDC->SetBkMode(TRANSPARENT);
	ReleaseDC(pDC);