regeadjust.cpp

《蓄热式陶瓷球燃烧器设计系统(版本:1.01aFinal)》为自由软件

// Regeadjust.cpp : implementation file
//

#include "stdafx.h"
#include "HtacBall.h"
#include "Regeadjust.h"

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

/////////////////////////////////////////////////////////////////////////////
// CRegeadjust dialog


CRegeadjust::CRegeadjust(CWnd* pParent /*=NULL*/)
	: CDialog(CRegeadjust::IDD, pParent)
{
	//{{AFX_DATA_INIT(CRegeadjust)
	m_alfc = 0.0f;
	m_alfh = 0.0f;
	m_k1 = 0.0f;
	m_k2 = 0.0f;
	m_Con = _T("");
	//}}AFX_DATA_INIT
}


void CRegeadjust::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CRegeadjust)
	DDX_Text(pDX, IDC_alfc, m_alfc);
	DDX_Text(pDX, IDC_alfh, m_alfh);
	DDX_Text(pDX, IDC_k1, m_k1);
	DDX_Text(pDX, IDC_k2, m_k2);
	DDX_Text(pDX, IDC_Con, m_Con);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CRegeadjust, CDialog)
	//{{AFX_MSG_MAP(CRegeadjust)
	ON_BN_CLICKED(IDREGE, OnRege)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CRegeadjust message handlers

void CRegeadjust::OnRege() 
{
	float Qf,k1,k2,dltk,F;
	float alfc,alfh,tao,Tf1,Tf2,Lf,Cf,Ta1,Ta2;
	float adw,fdw,Ua,Uf,d,Lmdp,a;
	float fai,Fo,dltt,dlttmax,dlttmin,t1,t2; 
	CString Con;

	//读取数据
    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];
	    tao=pbuf[18];
	    Tf1=pbuf[7];
	    Tf2=pbuf[8];
	    Lf=pbuf[9];
	    Cf=pbuf[12];
	    F=pbuf[25];

	    adw=pbuf[20];
	    fdw=pbuf[21];
	    Ua=pbuf[6];
	    Uf=pbuf[13];
	    d=pbuf[14];
	    Lmdp=pbuf[16];
	    a=pbuf[17];
   	    file.Close();
	}

	//要求的综合传热系数k1
    Qf=heat.FTa2(Lf,Cf,Tf1,Tf2,tao);
    t1=Tf1-Ta2;
	t2=Tf2-Ta1;
	if (t1>=t2)
		{dlttmax=t1; dlttmin=t2;}
	else  {dlttmax=t2; dlttmin=t1;}
	dltt=heat.Fdltt(dlttmax,dlttmin);
	if (dltt==0) {	
		MessageBox("运算有误，请重新设定参数");
		return;
	}
	k1=Qf/(F*dltt*2*tao);
	m_k1=k1;
	
	//设计的综合传热系数
	alfc=heat.Falfc(adw,Ua,d);
	alfh=heat.Falfh(fdw,Uf,d);
	Fo=heat.FFo(a,tao,d);
	fai=heat.Ffai(Fo);
	k2=heat.Fk(alfh,alfc,Lmdp,d,fai);
    
	//k1与k2的对比分析，校核结论
    dltk=(k1-k2)/k2;
	if (dltk>=-0.05&&dltk<=0.05) 
		Con="蓄热室功率满足要求！";
	else if(dltk>0.05)
		Con="蓄热室功率不足！";
	else if(dltk<-0.05)
		Con="蓄热室功率太大了！";
	m_alfc=alfc;
	m_alfh=alfh;
	m_k2=k2;
	m_Con=Con;
	UpdateData(FALSE);
}