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

📄 heatbalance.cpp

📁 《蓄热式陶瓷球燃烧器设计系统(版本:1.01aFinal)》为自由软件
💻 CPP
字号:
// Heatbalance.cpp : implementation file
//

#include "stdafx.h"
#include "HtacBall.h"
#include "Heatbalance.h"
#include "math.h"

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

/////////////////////////////////////////////////////////////////////////////
// CHeatbalance dialog


CHeatbalance::CHeatbalance(CWnd* pParent /*=NULL*/)
	: CDialog(CHeatbalance::IDD, pParent)
{
	//{{AFX_DATA_INIT(CHeatbalance)
	m_Q1 = 0.0f;
	m_Q2 = 0.0f;
	m_Con = _T("");
	//}}AFX_DATA_INIT
}


void CHeatbalance::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CHeatbalance)
	DDX_Text(pDX, IDC_Q1, m_Q1);
	DDX_Text(pDX, IDC_Q2, m_Q2);
	DDX_Text(pDX, IDC_Con, m_Con);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CHeatbalance, CDialog)
	//{{AFX_MSG_MAP(CHeatbalance)
	ON_BN_CLICKED(IDHEAT, OnHeat)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CHeatbalance message handlers

void CHeatbalance::OnHeat() 
{
	float Q1,Q2,con;
	float Ta1,Ta2,La,Ca,tao,Tf1,Tf2,Lf,Cf;

	UpdateData(TRUE);
	CFileDialog OpenDialog(TRUE, // Open...
							"hbr", // default filename extension
							NULL, // initial filename
							OFN_FILEMUSTEXIST|OFN_PATHMUSTEXIST, // options
							"Data Files(*.hbr)|*.hbr|All Files(*.*)|*.*||", // two filters for modules
							this);
    CString sz;
    CFile file;
    if ( OpenDialog.DoModal() == IDOK ) 
    {   
		sz=OpenDialog.GetFileName();
		file.Open(sz,CFile::modeRead);
		float pbuf[34];
	    file.Read(pbuf,34*sizeof(float));
		Ta1=pbuf[0]; //空气参数
	    Ta2=pbuf[1];
	    La=pbuf[2];
	    Ca=pbuf[5];
        tao=pbuf[18];
	    Tf1=pbuf[7]; //烟气参数
	    Tf2=pbuf[8];
	    Lf=pbuf[9];
	    Cf=pbuf[12];
   	    file.Close();
	}

	Q1=heat.FTa2(Lf,Cf,Tf1,Tf2,tao);  //单位:J
	m_Q1=Q1/1000;
    Q2=heat.FTa2(La,Ca,Ta2,Ta1,tao);  //单位:J
	m_Q2=Q2/1000;
	con=(float) (fabs(Q1-Q2)/Q1);
	if(con<0.05)
		m_Con="设计正确!";
	else m_Con="设计有误,请重设参数!";
    UpdateData(FALSE);
}

⌨️ 快捷键说明

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