⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 trqhslform.cpp

📁 这是本人两年前兼职为某个公司做的石油钻进设计软件
💻 CPP
字号:
// TrqhslForm.cpp : implementation file
//

#include "stdafx.h"
#include "cvenus.h"
#include "TrqhslForm.h"
#include "ShwrjCalFuction.h"
#include "Preview.h"
#include "resource.h"

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

/////////////////////////////////////////////////////////////////////////////
// CTrqhslForm

IMPLEMENT_DYNCREATE(CTrqhslForm, CFormView)

CTrqhslForm::CTrqhslForm()
	: CFormView(CTrqhslForm::IDD)
{
	//{{AFX_DATA_INIT(CTrqhslForm)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}

CTrqhslForm::~CTrqhslForm()
{
}

void CTrqhslForm::DoDataExchange(CDataExchange* pDX)
{
	CFormView::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CTrqhslForm)
	DDX_Control(pDX, IDC_SPREAD1, m_SJSR);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CTrqhslForm, CFormView)
	ON_WM_CONTEXTMENU()
	//{{AFX_MSG_MAP(CTrqhslForm)
	ON_WM_CREATE()
	ON_COMMAND(ID_SHWRJ_OPEN, OnShwrjOpen)
	ON_COMMAND(ID_SHWRJ_CALC, OnShwrjCalc)
	ON_COMMAND(ID_SHWRJ_SAVE, OnShwrjSave)
	ON_COMMAND(ID_SHWRJ_PRINTPREVIEW, OnShwrjPrintpreview)
	ON_COMMAND(ID_SHWRJ_PRINT, OnShwrjPrint)
	ON_WM_SIZE()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CTrqhslForm diagnostics

#ifdef _DEBUG
void CTrqhslForm::AssertValid() const
{
	CFormView::AssertValid();
}

void CTrqhslForm::Dump(CDumpContext& dc) const
{
	CFormView::Dump(dc);
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CTrqhslForm message handlers

BEGIN_EVENTSINK_MAP(CTrqhslForm, CFormView)
    //{{AFX_EVENTSINK_MAP(CTrqhslForm)
	ON_EVENT(CTrqhslForm, IDC_SPREAD1, 4 /* Change */, OnChangeSpread1, VTS_I4 VTS_I4)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

void CTrqhslForm::OnChangeSpread1(long Col, long Row) 
{
	double YL;
	
	m_SJSR.SetCol(5);
	m_SJSR.SetRow(4);	
    YL=atof(m_SJSR.GetText());
    if(YL>=0.1&&YL<0.2)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-50");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("108");
	}
    if(YL>=0.2&&YL<0.3)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-50");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("132");
	}
    if(YL>=0.3&&YL<0.4)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-50");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("144");
	}
    if(YL>=0.4&&YL<0.6)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-40");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("156");
	}
	if(YL>=0.6&&YL<1.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-40");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("168");
	}
	if(YL>=1.0&&YL<1.5)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-40");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=1.5&&YL<2.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-40");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=2.0&&YL<3.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-30");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=3.0&&YL<5.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-30");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=5.0&&YL<10.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-30");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=10.0&&YL<15.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-20");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=15.0&&YL<20.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("-20");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=20.0&&YL<30.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("20");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=30.0&&YL<40.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("20");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=40.0&&YL<50.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("20");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=50.0&&YL<60.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("30");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	if(YL>=60.0&&YL<=70.0)
	{
		m_SJSR.SetCol(3);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("30");
		m_SJSR.SetCol(4);
	    m_SJSR.SetRow(5);	
        m_SJSR.SetText("180");
	}
	
}

int CTrqhslForm::OnCreate(LPCREATESTRUCT lpCreateStruct) 
{
	if (CFormView::OnCreate(lpCreateStruct) == -1)
		return -1;
	
	// TODO: Add your specialized creation code here
	GetParentFrame()->SetWindowText(_T("天然气含水量计算"));
	
	return 0;
}

void CTrqhslForm::OnInitialUpdate() 
{
	CFormView::OnInitialUpdate();
	
	// TODO: Add your specialized code here and/or call the base class
/*	int i,j;

	m_SJSR.SetMaxRows(10);
	m_SJSR.SetMaxCols(5);
    
	m_SJSR.SetDisplayColHeaders(FALSE);//取消表头
	m_SJSR.SetDisplayRowHeaders(FALSE);//取消表头
    m_SJSR.SetGridShowHoriz(FALSE);//不显示网格线
	m_SJSR.SetGridShowVert(FALSE);//不显示网格线

	m_SJSR.SetRow(-1);
	m_SJSR.SetCol(-1);
	m_SJSR.SetAction(3);
	m_SJSR.SetFontName("宋体");
	m_SJSR.SetFontSize(12);

	m_SJSR.SetCol(3);
	m_SJSR.SetRow(1);
	m_SJSR.SetColWidth(3,20);
	m_SJSR.SetRowHeight(1,15);
	m_SJSR.SetValue("参数输入");

   //设置表格不可编辑
	for(i=1;i<=5;i++)
	   for(j=1;j<=10;j++)
	   {
			m_SJSR.SetCol(i);
			m_SJSR.SetRow(j);
		    m_SJSR.SetCellType(5);
	   }
	
   // 设置单元格线样式
   for(i=1;i<=5;i++)
	   for(j=2;j<=6;j++)
	   {
			m_SJSR.SetCol(i);
			m_SJSR.SetRow(j);
			m_SJSR.SetCellBorderType(16);//单元格为实框
			m_SJSR.SetCellBorderStyle(1);//实线
			m_SJSR.SetCellBorderColor(RGB(0,0,0));//单元格边框颜色
			m_SJSR.SetAction(16);//激活
	   }
	
	m_SJSR.SetCol(1);
	m_SJSR.SetColWidth(1,18);
	m_SJSR.SetRowHeight(1,20);

	m_SJSR.SetRow(2);	
	m_SJSR.SetValue("参数名称");    
	m_SJSR.SetRow(3);
	m_SJSR.SetText("天然气相对密度");
  	m_SJSR.SetRow(4);
	m_SJSR.SetText("压力");
	m_SJSR.SetRow(5);
	m_SJSR.SetText("温度");
  	m_SJSR.SetRow(6);
	m_SJSR.SetText("盐含量");

	m_SJSR.SetCol(2);
	m_SJSR.SetColWidth(2,15);
	m_SJSR.SetRowHeight(2,20);

	m_SJSR.SetRow(2);
	m_SJSR.SetValue("单位");
	m_SJSR.SetRow(3);
	m_SJSR.SetText("");
	m_SJSR.SetRow(4);
	m_SJSR.SetText("MPa");
	m_SJSR.SetRow(5);
	m_SJSR.SetText("℃");
	m_SJSR.SetRow(6);
	m_SJSR.SetText("%");

	m_SJSR.SetCol(3);
	m_SJSR.SetColWidth(3,12);//
	
	m_SJSR.SetRow(2);
	m_SJSR.SetValue("最小值");
	m_SJSR.SetRow(3);
	m_SJSR.SetText("0.55");
	m_SJSR.SetRow(4);
	m_SJSR.SetText("0.1");
	m_SJSR.SetRow(5);
	m_SJSR.SetText("0");
	m_SJSR.SetRow(6);
	m_SJSR.SetText("0");

	m_SJSR.SetCol(4);
	m_SJSR.SetColWidth(4,8);

	m_SJSR.SetRow(2);
	m_SJSR.SetValue("最大值");
	m_SJSR.SetRow(3);
	m_SJSR.SetText("1.0");
	m_SJSR.SetRow(4);
	m_SJSR.SetText("70");
	m_SJSR.SetRow(5);
	m_SJSR.SetText("180");
	m_SJSR.SetRow(6);
	m_SJSR.SetText("50");

	m_SJSR.SetCol(5);
	m_SJSR.SetColWidth(5,12);
	m_SJSR.SetRow(2);
	m_SJSR.SetValue("参数值");
    for(i=3;i<=6;i++)
	{
		m_SJSR.SetRow(i);
		m_SJSR.SetCellType(2);
		m_SJSR.SetTypeFloatDecimalPlaces(5);
		m_SJSR.SetTypeFloatMin(-100);
		m_SJSR.SetTypeFloatMax(99999);
	}	

	m_SJSR.SetCol(3);
	m_SJSR.SetRow(8);
	m_SJSR.SetColWidth(3,18);
	m_SJSR.SetValue("计算结果");

	m_SJSR.SetCol(2);
	m_SJSR.SetRow(9);
	m_SJSR.SetColWidth(2,10);
	m_SJSR.SetValue("含水量");

	m_SJSR.SetCol(4);
	m_SJSR.SetRow(9);
	m_SJSR.SetCellType(5);
	m_SJSR.SetValue("g/m^3");

	m_SJSR.SetCol(2);
	m_SJSR.SetRow(9);
    m_SJSR.SetCol2(2);
	m_SJSR.SetRow2(9);
	m_SJSR.SetBlockMode(TRUE);
	m_SJSR.SetCellBorderType(16);
	m_SJSR.SetCellBorderStyle(1);
	m_SJSR.SetCellBorderColor(RGB(0,0,0));
	m_SJSR.SetAction(16);
    m_SJSR.SetBlockMode(FALSE);

	m_SJSR.SetCol(3);
	m_SJSR.SetRow(9);
    m_SJSR.SetCol2(3);
	m_SJSR.SetRow2(9);
	m_SJSR.SetBlockMode(TRUE);
	m_SJSR.SetCellBorderType(16);
	m_SJSR.SetCellBorderStyle(1);
	m_SJSR.SetCellBorderColor(RGB(0,0,0));
	m_SJSR.SetAction(16);
    m_SJSR.SetBlockMode(FALSE);

	m_SJSR.SetCol(4);
	m_SJSR.SetRow(9);
    m_SJSR.SetCol2(4);
	m_SJSR.SetRow2(9);
	m_SJSR.SetBlockMode(TRUE);
	m_SJSR.SetCellBorderType(16);
	m_SJSR.SetCellBorderStyle(1);
	m_SJSR.SetCellBorderColor(RGB(0,0,0));
	m_SJSR.SetAction(16);
    m_SJSR.SetBlockMode(FALSE);

    m_SJSR.SetRow(10);
    m_SJSR.SetValue("  ");	
*/	
}

void CTrqhslForm::OnShwrjOpen() 
{
	CString fileDialogFilter1="天然气含水量计算数据文件(*.HSL)|*.HSL||";
	const char fileDialogExt1[] = "HSL";
	CFileDialog fileDialog1(TRUE,fileDialogExt1,NULL,OFN_FILEMUSTEXIST, fileDialogFilter1);
    if(fileDialog1.DoModal()==IDOK)
	{
	    CString filename1=fileDialog1.GetPathName();//+fileDialog.GetFileName();		
	    m_SJSR.LoadFromFile(filename1);		
	}
    UpdateData(FALSE);		
	
}

void CTrqhslForm::OnShwrjCalc() 
{
	// TODO: Add your command handler code here
	 double w0,tt,yl;
	 double w;
	 double cr,xx;
	 double cs,s;
	 //输入数据:温度tt(c)、压力yl(MPa)、盐含量s(%)、相对密度xx
	 //输出数据:天然气含水量w(g/m^3)
	  CString Temp1,Temp2,Temp4,Temp5;
	  char Temp3[30];
	  m_SJSR.SetCol(5);
	  m_SJSR.SetRow(3);   
	  Temp1=m_SJSR.GetText();
      xx = atof(Temp1);

	  m_SJSR.SetRow(5);   
	  Temp2=m_SJSR.GetText();   
	  tt=atof(Temp2);

	  m_SJSR.SetRow(4);   
	  Temp4=m_SJSR.GetText(); 
      yl=atof(Temp4);

      m_SJSR.SetRow(6);   
	  Temp5=m_SJSR.GetText(); 
      s=atof(Temp5);
//判断数据有效性
	  int i;
	  double zxz[10],zdz[10],qz[10];
	  for(i=3;i<=6;i++)
	  {
        m_SJSR.SetRow(i);
		m_SJSR.SetCol(3);
		zxz[i]=atof(m_SJSR.GetText());
		m_SJSR.SetCol(4);
		zdz[i]=atof(m_SJSR.GetText());
		m_SJSR.SetCol(5);
        qz[i]=atof(m_SJSR.GetText());
	  }
	  if(qz[3]>=zxz[3]&&qz[3]<=zdz[3]&&qz[4]>=zxz[4]&&qz[4]<=zdz[4]&&qz[5]>=zxz[5]&&qz[5]<=zdz[5]&&qz[6]>=zxz[6]&&qz[6]<=zdz[6])
	  {
		  w0=hslt(tt,yl);
		  cr=crt(xx,tt);
		  cs=0.9999-0.003315*s-0.0003444*pow(s,2)+0.000007714*pow(s,3)-0.00000011046*pow(s,4);
		  w=w0*cr*cs;
	   //输出结果
		  gcvt(w,7,Temp3);
		  m_SJSR.SetCol(2);
		  m_SJSR.SetRow(9);
		  m_SJSR.SetValue(Temp3);
	  }
	  else
	  {
          AfxMessageBox("输入数据非法,请验证数据再计算");
	  }
	
}

void CTrqhslForm::OnShwrjSave() 
{
	UpdateData(TRUE);
	CString fileDialogFilter1="天然气含水量计算数据文件(*.HSL)|*.HSL||";
	const char fileDialogExt1[] = "HSL";
	CFileDialog fileDialog1(FALSE,fileDialogExt1,NULL,OFN_FILEMUSTEXIST, fileDialogFilter1);
    if(fileDialog1.DoModal()==IDOK)
	{
	    CString filename1=fileDialog1.GetPathName();//+fileDialog.GetFileName();		
	    m_SJSR.SaveToFile(filename1,FALSE);		
	}	
	
}

void CTrqhslForm::OnShwrjPrintpreview() 
{
	// TODO: Add your command handler code here
	CPreview dlg(&m_SJSR);
	dlg.DoModal();
	
}

void CTrqhslForm::OnShwrjPrint() 
{
	// TODO: Add your command handler code here
    m_SJSR.SetAction(13);		
	
}

void CTrqhslForm::OnContextMenu(CWnd*, CPoint point)
{
	// CG: This block was added by the Pop-up Menu component	{		if (point.x == -1 && point.y == -1){			//keystroke invocation			CRect rect;			GetClientRect(rect);			ClientToScreen(rect);			point = rect.TopLeft();			point.Offset(5, 5);		}		CMenu menu;		VERIFY(menu.LoadMenu(IDR_POPUP_SHWRJ));		CMenu* pPopup = menu.GetSubMenu(0);		ASSERT(pPopup != NULL);		CWnd* pWndPopupOwner = this;//		while (pWndPopupOwner->GetStyle() & WS_CHILD)//			pWndPopupOwner = pWndPopupOwner->GetParent();		pPopup->TrackPopupMenu(TPM_LEFTALIGN | TPM_RIGHTBUTTON, point.x, point.y,			pWndPopupOwner);	}
}

void CTrqhslForm::OnSize(UINT nType, int cx, int cy) 
{
	CFormView::OnSize(nType, cx, cy);
	
	// TODO: Add your message handler code here
	if(m_SJSR.m_hWnd != NULL)
	{
		CRect rc;	
		GetClientRect(&rc);
		m_SJSR.SetWindowPos(NULL, rc.left, rc.top, rc.Width(), rc.Height(), NULL);
	}
	
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -