723 lines
30 KiB
C++
723 lines
30 KiB
C++
// ExtinguisherCalcDlg.cpp : implementation file
|
|
//
|
|
|
|
#include "stdafx.h"
|
|
#include "ExtinguisherCalcDlg.h"
|
|
#include <MSWORD8.h>
|
|
|
|
#ifdef _DEBUG
|
|
#define new DEBUG_NEW
|
|
#undef THIS_FILE
|
|
static char THIS_FILE[] = __FILE__;
|
|
#endif
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// CExtinguisherCalcDlg dialog
|
|
|
|
void ExtinguisherCalc()
|
|
{
|
|
CTemporaryResourceOverride vTemp;
|
|
CExtinguisherCalcDlg dlg;
|
|
dlg.DoModal();
|
|
}
|
|
|
|
CExtinguisherCalcDlg::CExtinguisherCalcDlg(CWnd* pParent /*=NULL*/)
|
|
: CDialog(CExtinguisherCalcDlg::IDD, pParent)
|
|
{
|
|
//{{AFX_DATA_INIT(CExtinguisherCalcDlg)
|
|
m_nArea = 500;
|
|
m_csRet1 = _T("");
|
|
m_csRet2 = _T("");
|
|
m_iArch = 0;
|
|
m_iEnviroment = 1;
|
|
m_iFire = 0;
|
|
m_iLevel = 1;
|
|
m_csCalc = _T("计算过程：");
|
|
//}}AFX_DATA_INIT
|
|
|
|
m_dUnitArea = 0.0; //单位灭火级别最大保护面积
|
|
m_dK = 0.0; //修正系数
|
|
m_dQ = 0.0; //灭火级别
|
|
}
|
|
|
|
|
|
void CExtinguisherCalcDlg::DoDataExchange(CDataExchange* pDX)
|
|
{
|
|
CDialog::DoDataExchange(pDX);
|
|
//{{AFX_DATA_MAP(CExtinguisherCalcDlg)
|
|
DDX_Text(pDX, IDC_EDIT_AREA, m_nArea);
|
|
DDX_Text(pDX, IDC_EDIT_LEVEL1, m_csRet1);
|
|
DDX_Text(pDX, IDC_EDIT_LEVEL2, m_csRet2);
|
|
DDX_Radio(pDX, IDC_RADIO_ARCH1, m_iArch);
|
|
DDX_Radio(pDX, IDC_RADIO_ENVIRONMENT1, m_iEnviroment);
|
|
DDX_Radio(pDX, IDC_RADIO_FIREA, m_iFire);
|
|
DDX_Radio(pDX, IDC_RADIO_LEVEL1, m_iLevel);
|
|
DDX_Text(pDX, IDC_STATIC_CALC, m_csCalc);
|
|
//}}AFX_DATA_MAP
|
|
}
|
|
|
|
|
|
BEGIN_MESSAGE_MAP(CExtinguisherCalcDlg, CDialog)
|
|
//{{AFX_MSG_MAP(CExtinguisherCalcDlg)
|
|
ON_BN_CLICKED(IDC_BUTTON_HELPFIRE, OnButtonHelpfire)
|
|
ON_BN_CLICKED(IDC_BUTTON_HELPLEVEL, OnButtonHelplevel)
|
|
ON_BN_CLICKED(IDC_BUTTON_TYPE, OnButtonType)
|
|
ON_BN_CLICKED(IDC_BUTTON_TYPE2, OnButtonType2)
|
|
ON_BN_CLICKED(IDC_BTN_BOOK, OnBtnBook)
|
|
//}}AFX_MSG_MAP
|
|
END_MESSAGE_MAP()
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// CExtinguisherCalcDlg message handlers
|
|
|
|
BOOL CExtinguisherCalcDlg::OnInitDialog()
|
|
{
|
|
CDialog::OnInitDialog();
|
|
|
|
|
|
return TRUE; // return TRUE unless you set the focus to a control
|
|
// EXCEPTION: OCX Property Pages should return FALSE
|
|
}
|
|
|
|
//6.5采用《技术措施P220》 7.0参数变化很大，采用《灭火器配置规范》2005年
|
|
void CExtinguisherCalcDlg::OnOK()
|
|
{
|
|
UpdateData(TRUE);
|
|
CString csTmp, csUnit;
|
|
double U(0), Q(0), K(0);
|
|
if(m_iFire == 0){ //A类火灾
|
|
csUnit = _T("A");
|
|
|
|
if(m_iLevel == 0) { //轻度危险
|
|
U = 100;
|
|
m_csRet2 = _T("1A");
|
|
}
|
|
else if(m_iLevel == 1){ //中度危险
|
|
U = 75;
|
|
m_csRet2 = _T("2A");
|
|
}
|
|
else if(m_iLevel == 2){ //严重危险度
|
|
U = 50;
|
|
m_csRet2 = _T("3A");
|
|
}
|
|
}
|
|
else if(m_iFire == 1){ //B类火灾
|
|
csUnit = _T("B");
|
|
|
|
if(m_iLevel == 0){ //轻度危险
|
|
U = 1.5;
|
|
m_csRet2 = _T("21B");
|
|
}
|
|
else if(m_iLevel == 1){ //中度危险
|
|
U = 1.0;
|
|
m_csRet2 = _T("55B");
|
|
}
|
|
else if(m_iLevel == 2){ //严重危险度
|
|
U = 0.5;
|
|
m_csRet2 = _T("89B");
|
|
}
|
|
}
|
|
if(m_iEnviroment == 0) //无消火栓和灭火系统
|
|
{
|
|
K = 1.0;
|
|
m_sFireControl = _T("无消火栓和灭火系统");
|
|
}
|
|
else if(m_iEnviroment == 1)//只有消火栓
|
|
{
|
|
K = 0.9;
|
|
m_sFireControl = _T("只有消火栓");
|
|
}
|
|
else if(m_iEnviroment == 2)//只有灭火系统
|
|
{
|
|
K = 0.7;
|
|
m_sFireControl = _T("只有灭火系统");
|
|
}
|
|
else if(m_iEnviroment == 3)//有消火栓和灭火系统
|
|
{
|
|
K = 0.5;
|
|
m_sFireControl = _T("有消火栓和灭火系统");
|
|
}
|
|
else if(m_iEnviroment == 4)//可燃物露天堆场、甲乙丙类液体储罐区、可燃气体储罐区
|
|
{
|
|
K = 0.3;
|
|
m_sFireControl = _T("可燃物露天堆场、甲乙丙类液体储罐区、可燃气体储罐区");
|
|
}
|
|
|
|
|
|
if(m_iArch == 0){ //地上建筑
|
|
csTmp = _T("Q=K*S/U");
|
|
//公式: Q = K * S/U Q:灭火等级，S:保护面积，U:(每A,B最大保护面积) K:修正系数
|
|
Q = K*m_nArea/U;
|
|
}
|
|
else{ //地下建筑
|
|
//公式: Q = 1.3*K * S/U Q:灭火等级，S:保护面积，U:(每A,B最大保护面积) K:修正系数
|
|
Q = 1.3*K*m_nArea/U;
|
|
csTmp = _T("Q=1.3*K*S/U");
|
|
}
|
|
m_csRet1.Format(_T("%.2f %s"), Q, csUnit);
|
|
|
|
m_dUnitArea = U;
|
|
m_dK = K;
|
|
m_dQ = Q;
|
|
m_csCalc.Format(_T("计算过程：建筑保护面积S=%.1f平方米 配置基准U=%.1f 修正系数K=%.1f %s"), m_nArea, U, K, csTmp);
|
|
UpdateData(FALSE);
|
|
}
|
|
|
|
void CExtinguisherCalcDlg::OnButtonHelpfire()
|
|
{
|
|
UpdateData();
|
|
CString csMsg;
|
|
if(m_iFire == 0){
|
|
csMsg = _T("A类火灾：指含碳固体可染物，如木材、棉、毛、麻、纸张等燃烧的火灾\n\n");
|
|
csMsg += _T("存在A类火灾危险的工业建筑场所举例\n");
|
|
csMsg += _T("1:木工厂房和竹、藤加工厂房\n");
|
|
csMsg += _T("2:针织、纺织、化纤生产厂房\n");
|
|
csMsg += _T("3:服装加工厂和印染厂房\n");
|
|
csMsg += _T("4:毛纺厂粗加工厂房和毛涤厂选毛厂房\n");
|
|
csMsg += _T("5:谷物加工厂房\n");
|
|
csMsg += _T("6:卷烟厂的切丝、卷制、包装厂房\n");
|
|
csMsg += _T("7:印刷厂印刷厂房\n");
|
|
csMsg += _T("8:纸张、竹木、及其制品的库房\n");
|
|
csMsg += _T("9:人造纤维及其织物的库房，棉、毛、丝、麻及其织物的库房\n");
|
|
csMsg += _T("10:火柴、香烟、糖、茶叶库房\n");
|
|
csMsg += _T("11:中药材库房\n");
|
|
csMsg += _T("12:橡胶、塑料及其制品的库房\n\n");
|
|
|
|
csMsg += _T("存在A类火灾危险的民用建筑场所举例\n");
|
|
csMsg += _T("1:资料室、档案室\n");
|
|
csMsg += _T("2:旅馆客房\n");
|
|
csMsg += _T("3:电影院、剧院、会堂、礼堂的舞台及后台\n");
|
|
csMsg += _T("4:医院的病历室\n");
|
|
csMsg += _T("5:博物馆\n");
|
|
csMsg += _T("6:电影、电视摄影棚\n");
|
|
csMsg += _T("7:图书馆、美术馆\n");
|
|
csMsg += _T("8:百货楼、营业厅、商场\n");
|
|
csMsg += _T("9:邮政信函和包裹分检房、邮袋库\n");
|
|
csMsg += _T("10:文物保护场所\n");
|
|
csMsg += _T("11:教学楼\n");
|
|
csMsg += _T("12:办公楼\n");
|
|
}
|
|
else{
|
|
csMsg = _T("B类火灾：指甲乙丙类液体，如汽油、煤油、柴油、甲醇、乙醚、丙酮等燃烧的火灾\n\n");
|
|
csMsg += _T("存在B类火灾危险的工业建筑场所举例\n");
|
|
csMsg += _T("1:甲、乙、丙类油品和有机溶剂的提炼、回收、洗涤部位及其泵房、罐桶间\n");
|
|
csMsg += _T("2:甲醇、乙醇、丙酮、丁酮、异丙醇、醋酸乙酯、苯的合成或精制厂房\n");
|
|
csMsg += _T("3:植物油加工厂的浸出厂房和精练厂房\n");
|
|
csMsg += _T("4:白酒库房\n");
|
|
csMsg += _T("5:工业用燃油锅炉房\n");
|
|
csMsg += _T("6:柴油、机器油或变压器油罐桶间\n");
|
|
csMsg += _T("7:油淬火处理车间\n");
|
|
csMsg += _T("8:汽车加油库、修车间\n\n");
|
|
|
|
csMsg += _T("存在B类火灾危险的民用建筑场所举例\n");
|
|
csMsg += _T("1:民用燃油锅炉房\n");
|
|
csMsg += _T("2:使用甲、乙、丙类液体和有机溶剂、试剂的理化实验室及库房\n");
|
|
csMsg += _T("3:房修公司的油漆间及其库房\n");
|
|
csMsg += _T("4:厨房的烹调油锅灶\n");
|
|
csMsg += _T("5:民用的油浸变压器室、充油电容器室、注油开关室\n");
|
|
csMsg += _T("6:汽车加油站\n");
|
|
}
|
|
|
|
AfxMessageBox(csMsg);
|
|
}
|
|
|
|
void CExtinguisherCalcDlg::OnButtonHelplevel()
|
|
{
|
|
UpdateData();
|
|
CString csMsg;
|
|
csMsg = _T("民用建筑危险等级的分级举例\n\n");
|
|
if(m_iLevel == 2){
|
|
csMsg += _T("严重危险级\n");
|
|
csMsg += _T("1:重要的资料室、档案室\n");
|
|
csMsg += _T("2:设备贵重或可燃物多的实验室\n");
|
|
csMsg += _T("3:广播电视演播室、道具间\n");
|
|
csMsg += _T("4:电子计算机房及数据库\n");
|
|
csMsg += _T("5:重要的电信机房及数据库\n");
|
|
csMsg += _T("6:高级旅馆的公共活动用房及大厨房\n");
|
|
csMsg += _T("7:电影院、剧院、会堂、礼堂的舞台及后台部位\n");
|
|
csMsg += _T("8:医院的手术室、药房和病历室\n");
|
|
csMsg += _T("9:博物馆、图书馆的珍藏室、复印室\n");
|
|
csMsg += _T("10:电影电视摄影棚\n");
|
|
}
|
|
else if(m_iLevel == 1){
|
|
csMsg += _T("中危险级\n");
|
|
csMsg += _T("1:设有空调设备、电子计算机、复印机等的办公室\n");
|
|
csMsg += _T("2:学校或科研单位的理化实验室\n");
|
|
csMsg += _T("3:广播、电视的录音室、播音室\n");
|
|
csMsg += _T("4:高级旅馆的其它部位\n");
|
|
csMsg += _T("5:电影院、剧院、会堂、礼堂、体育馆的放映室\n");
|
|
csMsg += _T("6:百货楼、营业厅、综合商场\n");
|
|
csMsg += _T("7:图书馆、书库\n");
|
|
csMsg += _T("8:多功能厅、餐厅、及厨房\n");
|
|
csMsg += _T("9:展览厅\n");
|
|
csMsg += _T("10:医院的理疗室、透视室、心电图室\n");
|
|
csMsg += _T("11:重点文物保护场所\n");
|
|
csMsg += _T("12:邮政信函和包裹分检房、邮袋库\n");
|
|
csMsg += _T("13:高级住宅\n");
|
|
csMsg += _T("14:燃油、燃气锅炉房\n");
|
|
csMsg += _T("15:民用的油浸变压器室和高、低压配电室\n");
|
|
}
|
|
else if(m_iLevel == 0){
|
|
csMsg += _T("轻危险级\n\n");
|
|
csMsg += _T("1:电影院、剧院、会堂、礼堂、体育馆的观众厅\n");
|
|
csMsg += _T("2:医院门诊部、住院部\n");
|
|
csMsg += _T("3:学校教学楼、幼儿园与托儿所的活动室\n");
|
|
csMsg += _T("4:办公楼\n");
|
|
csMsg += _T("5:车站、码头、机场的候车、候船、候机厅\n");
|
|
csMsg += _T("6:普通旅馆\n");
|
|
csMsg += _T("7:商店\n");
|
|
csMsg += _T("8:10层及10层以上的普通住宅\n");
|
|
}
|
|
AfxMessageBox(csMsg);
|
|
|
|
}
|
|
|
|
void CExtinguisherCalcDlg::OnButtonType()
|
|
{
|
|
UpdateData();
|
|
CString csMsg;
|
|
csMsg = _T("灭火器的灭火级别\n\n");
|
|
csMsg += _T("灭火器类别 灭火级别 型号规格\n");
|
|
/* if(m_iFire == 0){
|
|
csMsg += _T("水(手提式) 5A MS7(MSQ7)\n");
|
|
csMsg += _T("水(手提式) 8A MS9(MSQ9)\n");
|
|
csMsg += _T("化学泡沫(手提式) 5A MP6\n");
|
|
csMsg += _T("化学泡沫(手提式) 8A MP9\n");
|
|
csMsg += _T("化学泡沫(推车式) 13A MPT40\n");
|
|
csMsg += _T("化学泡沫(推车式) 21A MPT65\n");
|
|
csMsg += _T("化学泡沫(推车式) 27A MPT90\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 3A MFAC1\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 5A MFAC2\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 5A MFAC3\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 8A MFAC4\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 8A MFAC5\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 13A MFAC6\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 13A MFAC8\n");
|
|
csMsg += _T("干粉－磷酸铵盐(手提式) 21A MFAC10\n");
|
|
csMsg += _T("干粉－磷酸铵盐(推车式) 21A MFAT25\n");
|
|
csMsg += _T("干粉－磷酸铵盐(推车式) 27A MFAT35\n");
|
|
csMsg += _T("干粉－磷酸铵盐(推车式) 34A MFAT50\n");
|
|
csMsg += _T("干粉－磷酸铵盐(推车式) 43A MFAT70\n");
|
|
csMsg += _T("干粉－磷酸铵盐(推车式) 55A MFAT100\n");
|
|
}
|
|
else{
|
|
csMsg += _T("化学泡沫(手提式) 2B MP6\n");
|
|
csMsg += _T("化学泡沫(手提式) 4B MP9\n");
|
|
csMsg += _T("化学泡沫(推车式) 18B MPT40\n");
|
|
csMsg += _T("化学泡沫(推车式) 25B MPT65\n");
|
|
csMsg += _T("化学泡沫(推车式) 35B MPT90\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 2B MFN1\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 5B MFN2\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 7B MFN3\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 10B MFN4\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 12B MFN5\n");
|
|
csMsg += _T("干粉－碳酸氢钠(手提式) 14B MFN6\n");
|
|
csMsg += "干粉－碳酸氢钠(手提式) 18B MFN8\n";
|
|
csMsg += "干粉－碳酸氢钠(手提式) 20B MFN10\n";
|
|
csMsg += "干粉－碳酸氢钠(推车式) 35B MFNCT25\n";
|
|
csMsg += "干粉－碳酸氢钠(推车式) 45B MFNCT35\n";
|
|
csMsg += "干粉－碳酸氢钠(推车式) 65B MFNCT50\n";
|
|
csMsg += "干粉－碳酸氢钠(推车式) 90B MFNCT70\n";
|
|
csMsg += "干粉－碳酸氢钠(推车式) 120B MFNCT100\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 2B MFAC1\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 5B MFAC2\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 7B MFAC3\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 10B MFAC4\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 12B MFAC5\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 14B MFAC6\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 18B MFAC8\n";
|
|
csMsg += "干粉－磷酸铵盐(手提式) 20B MFAC10\n";
|
|
csMsg += "干粉－磷酸铵盐(推车式) 35B MFAT25\n";
|
|
csMsg += "干粉－磷酸铵盐(推车式) 45B MFAT35\n";
|
|
csMsg += "干粉－磷酸铵盐(推车式) 65B MFAT50\n";
|
|
csMsg += "干粉－磷酸铵盐(推车式) 90B MFAT70\n";
|
|
csMsg += "干粉－磷酸铵盐(推车式) 120B MFAT100\n";
|
|
csMsg += "二氧化碳(手提式) 1B MT2\n";
|
|
csMsg += "二氧化碳(手提式) 2B MT3\n";
|
|
csMsg += "二氧化碳(手提式) 3B MT5\n";
|
|
csMsg += "二氧化碳(手提式) 4B MT7\n";
|
|
csMsg += "二氧化碳(推车式) 8B MTT20\n";
|
|
csMsg += "二氧化碳(推车式) 10B MTT25\n";
|
|
}
|
|
*/
|
|
//7.0 新参数
|
|
if(m_iFire == 0){
|
|
csMsg += _T("水 1A MS/Q3\n");
|
|
csMsg += _T("水 1A MS/T3\n");
|
|
csMsg += _T("水 1A MS/Q6\n");
|
|
csMsg += _T("水 1A MS/T6\n");
|
|
csMsg += _T("水 2A MS/Q9\n");
|
|
csMsg += _T("水 2A MS/T9\n");
|
|
csMsg += _T("泡沫 1A MP3、MP/AR3\n");
|
|
csMsg += _T("泡沫 1A MP4、MP/AR4\n");
|
|
csMsg += _T("泡沫 1A MP6、MP/AR6\n");
|
|
csMsg += _T("泡沫 2A MP9、MP/AR9\n");
|
|
csMsg += _T("干粉－磷酸铵盐 1A MF/ABC1\n");
|
|
csMsg += _T("干粉－磷酸铵盐 1A MF/ABC2\n");
|
|
csMsg += _T("干粉－磷酸铵盐 2A MF/ABC3\n");
|
|
csMsg += _T("干粉－磷酸铵盐 2A MF/ABC4\n");
|
|
csMsg += _T("干粉－磷酸铵盐 3A MF/ABC5\n");
|
|
csMsg += _T("干粉－磷酸铵盐 3A MF/ABC6\n");
|
|
csMsg += _T("干粉－磷酸铵盐 4A MF/ABC8\n");
|
|
csMsg += _T("干粉－磷酸铵盐 6A MF/ABC10\n");
|
|
csMsg += _T("卤代烷 0.5A MY2\n");
|
|
csMsg += _T("卤代烷 0.5A MY3\n");
|
|
csMsg += _T("卤代烷 1A MY4\n");
|
|
csMsg += _T("卤代烷 1A MY6\n");
|
|
}
|
|
else{
|
|
csMsg += _T("水 55B MS/T3\n");
|
|
csMsg += _T("水 55B MS/T6\n");
|
|
csMsg += _T("水 89B MS/T9\n");
|
|
|
|
csMsg += _T("泡沫 55B MP3、MP/AR3\n");
|
|
csMsg += _T("泡沫 55B MP4、MP/AR4\n");
|
|
csMsg += _T("泡沫 55B MP6、MP/AR6\n");
|
|
csMsg += _T("泡沫 89B MP9、MP/AR9\n");
|
|
|
|
csMsg += _T("干粉－碳酸氢钠 21B MF1\n");
|
|
csMsg += _T("干粉－碳酸氢钠 21B MF2\n");
|
|
csMsg += _T("干粉－碳酸氢钠 34B MF3\n");
|
|
csMsg += _T("干粉－碳酸氢钠 55B MF4\n");
|
|
csMsg += _T("干粉－碳酸氢钠 89B MF5\n");
|
|
csMsg += _T("干粉－碳酸氢钠 89B MF6\n");
|
|
csMsg += _T("干粉－碳酸氢钠 144B MF8\n");
|
|
csMsg += _T("干粉－碳酸氢钠 144B MF10\n");
|
|
|
|
csMsg += _T("干粉－磷酸铵盐 21B MF/ABC1\n");
|
|
csMsg += _T("干粉－磷酸铵盐 21B MF/ABC2\n");
|
|
csMsg += _T("干粉－磷酸铵盐 34B MF/ABC3\n");
|
|
csMsg += _T("干粉－磷酸铵盐 55B MF/ABC4\n");
|
|
csMsg += _T("干粉－磷酸铵盐 89B MF/ABC5\n");
|
|
csMsg += _T("干粉－磷酸铵盐 89B MF/ABC6\n");
|
|
csMsg += _T("干粉－磷酸铵盐 144B MF/ABC8\n");
|
|
csMsg += _T("干粉－磷酸铵盐 144B MF/ABC10\n");
|
|
|
|
csMsg += _T("卤代烷 21B MY1\n");
|
|
csMsg += _T("卤代烷 21B MY2\n");
|
|
csMsg += _T("卤代烷 34B MY3\n");
|
|
csMsg += _T("卤代烷 34B MY4\n");
|
|
csMsg += _T("卤代烷 55B MY6\n");
|
|
|
|
csMsg += _T("二氧化碳 21B MT2\n");
|
|
csMsg += _T("二氧化碳 21B MT3\n");
|
|
csMsg += _T("二氧化碳 34B MT5\n");
|
|
csMsg += _T("二氧化碳 55B MT7\n");
|
|
}
|
|
|
|
AfxMessageBox(csMsg);
|
|
|
|
}
|
|
|
|
void CExtinguisherCalcDlg::OnButtonType2()
|
|
{
|
|
UpdateData();
|
|
CString csMsg;
|
|
csMsg = _T("灭火器的灭火级别\n\n");
|
|
csMsg += _T("灭火器类别 灭火级别 型号规格\n");
|
|
|
|
if(m_iFire == 0){
|
|
csMsg += _T("水 4A MST20\n");
|
|
csMsg += _T("水 4A MST40\n");
|
|
csMsg += _T("水 4A MST60\n");
|
|
csMsg += _T("水 6A MST125\n");
|
|
csMsg += _T("泡沫 4A MPT20、MPT/AR20\n");
|
|
csMsg += _T("泡沫 4A MPT40、MPT/AR40\n");
|
|
csMsg += _T("泡沫 4A MPT60、MPT/AR60\n");
|
|
csMsg += _T("泡沫 6A MPT125、MPT/AR125\n");
|
|
csMsg += _T("干粉－磷酸铵盐 6A MFT/ABC20\n");
|
|
csMsg += _T("干粉－磷酸铵盐 8A MFT/ABC50\n");
|
|
csMsg += _T("干粉－磷酸铵盐 10A MFT/ABC100\n");
|
|
csMsg += _T("干粉－磷酸铵盐 10A MFT/ABC125\n");
|
|
}
|
|
else{
|
|
|
|
csMsg += _T("泡沫 113B MPT20、MPT/AR20\n");
|
|
csMsg += _T("泡沫 144B MPT40、MPT/AR40\n");
|
|
csMsg += _T("泡沫 233B MPT60、MPT/AR60\n");
|
|
csMsg += _T("泡沫 297B MPT125、MPT/AR125\n");
|
|
|
|
csMsg += _T("干粉－碳酸氢钠 183B MFT20\n");
|
|
csMsg += _T("干粉－碳酸氢钠 297B MFT50\n");
|
|
csMsg += _T("干粉－碳酸氢钠 297B MFT100\n");
|
|
csMsg += _T("干粉－碳酸氢钠 297B MFT125\n");
|
|
|
|
|
|
csMsg += _T("干粉－磷酸铵盐 183B MFT/ABC20\n");
|
|
csMsg += _T("干粉－磷酸铵盐 297B MFT/ABC50\n");
|
|
csMsg += _T("干粉－磷酸铵盐 297B MFT/ABC100\n");
|
|
csMsg += _T("干粉－磷酸铵盐 297B MFT/ABC125\n");
|
|
|
|
|
|
csMsg += _T("卤代烷 70B MYT10\n");
|
|
csMsg += _T("卤代烷 144B MYT20\n");
|
|
csMsg += _T("卤代烷 183B MYT30\n");
|
|
csMsg += _T("卤代烷 297B MYT50\n");
|
|
|
|
csMsg += _T("二氧化碳 55B MTT10\n");
|
|
csMsg += _T("二氧化碳 70B MTT20\n");
|
|
csMsg += _T("二氧化碳 113B MTT30\n");
|
|
csMsg += _T("二氧化碳 183B MTT50\n");
|
|
}
|
|
|
|
AfxMessageBox(csMsg);
|
|
}
|
|
|
|
void CExtinguisherCalcDlg::OnBtnBook()
|
|
{
|
|
if (fabs(m_dQ) < 1e-3)
|
|
{
|
|
AfxMessageBox(_T("请先进行计算!"));
|
|
return;
|
|
}
|
|
|
|
COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR), vtTrue((short)TRUE), vtFalse((short)FALSE);
|
|
_Application wordApplication;
|
|
Documents wordDocuments;
|
|
_Document activeDocument;
|
|
Paragraphs wordParagraphs;
|
|
Selection wordSelection;
|
|
|
|
if (!wordApplication.CreateDispatch(_T("Word.Application")))
|
|
{
|
|
AfxMessageBox(_T("不能执行Microsoft Word 8.0!"));
|
|
return;
|
|
}
|
|
wordApplication.SetVisible(TRUE);
|
|
wordDocuments = wordApplication.GetDocuments();
|
|
activeDocument = wordDocuments.Add(vtOptional,vtOptional);
|
|
|
|
//写一行字
|
|
wordSelection = wordApplication.GetSelection();
|
|
wordParagraphs = wordSelection.GetParagraphs();
|
|
wordParagraphs.SetAlignment(1); // 0: 居左 1：居中 2：居右
|
|
wordSelection.TypeText(_T("灭火器的灭火等级计算\n"));
|
|
wordParagraphs.SetAlignment(0); // 0: 居左 1：居中 2：居右
|
|
|
|
wordSelection.TypeText(_T("\n依据<<建筑灭火器配置设计规范(GB50140-2005)>>\n"));
|
|
if (m_iArch == 0)
|
|
{
|
|
wordSelection.TypeText(_T("地面以上建筑计算单元的最小需配灭火级别计算公式:\n"));
|
|
wordSelection.TypeText(_T("Q = K * (S / U)\n"));
|
|
}
|
|
else
|
|
{
|
|
wordSelection.TypeText(_T("地面以下场所计算单元的最小需配灭火级别计算公式:\n"));
|
|
wordSelection.TypeText(_T("Q = 1.3 * K * (S / U)\n"));
|
|
}
|
|
|
|
wordSelection.TypeText(_T("Q - 计算单元的最小需配灭火级别(A或B)\n"));
|
|
wordSelection.TypeText(_T("S - 计算单元的保护面积(m2)\n"));
|
|
wordSelection.TypeText(_T("U - A类或B类火灾场所单位灭火级别最大保护面积(m2/A 或 m2/B)\n"));
|
|
wordSelection.TypeText(_T("K - 修正系数\n"));
|
|
wordSelection.TypeText(_T("\n修正系数\n"));
|
|
|
|
//修正系数表
|
|
int rows(6), columns(2);
|
|
Selection wSelection = wordApplication.GetSelection();
|
|
Range oRange = wSelection.GetRange();
|
|
Tables oTables = activeDocument.GetTables();
|
|
_Table oTable = oTables.Add(oRange, rows, columns);
|
|
// cet 2010.3.25 add
|
|
Borders oBorders = oTable.GetBorders();
|
|
oBorders.SetInsideLineStyle(1); // 设置表格线型
|
|
oBorders.SetOutsideLineStyle(1);
|
|
|
|
Columns oColumns;
|
|
Column oColumn;
|
|
oColumns = oTable.GetColumns();
|
|
oColumn = oColumns.Item(1);
|
|
oColumn.SetWidth(190, 0); // 0 = wdAdjustNone
|
|
oColumn = oColumns.Item(2);
|
|
oColumn.SetWidth(85, 0);
|
|
|
|
Cell oCell;
|
|
oCell = oTable.Cell(1, 1);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("计算单元"));
|
|
|
|
oCell = oTable.Cell(1, 2);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("k"));
|
|
|
|
InitTableData();
|
|
|
|
for(int i=1;i<6;i++)
|
|
{
|
|
oCell = oTable.Cell(i+1, 1);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(m_arFactName[i-1]);
|
|
|
|
oCell = oTable.Cell(i+1, 2);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(m_arFactValue[i-1]);
|
|
}
|
|
|
|
COleVariant vtOptional2((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
|
|
wordSelection = wordApplication.GetSelection();
|
|
wordSelection.GoTo(COleVariant((short)3), // 3 = wdGoToLine
|
|
COleVariant((short)-1),vtOptional2,vtOptional2); // -1 = wdGoToLast
|
|
|
|
wSelection = wordApplication.GetSelection();
|
|
wSelection.TypeParagraph();
|
|
wordSelection.TypeText(_T("式中U的取值见下表:\n"));
|
|
if (m_iFire == 0)
|
|
wordSelection.TypeText(_T("A类火灾场所灭火器的最低配置基准\n"));
|
|
else
|
|
wordSelection.TypeText(_T("B类火灾场所灭火器的最低配置基准\n"));
|
|
|
|
//配置表
|
|
rows = 3,columns = 4;
|
|
Range oRange2 = wSelection.GetRange();
|
|
Tables oTables2 = activeDocument.GetTables();
|
|
_Table oTable2 = oTables2.Add(oRange2, rows, columns);
|
|
// cet 2010.3.25 add
|
|
Borders oBorders2 = oTable2.GetBorders();
|
|
oBorders2.SetInsideLineStyle(1); // 设置表格线型
|
|
oBorders2.SetOutsideLineStyle(1);
|
|
|
|
oColumns = oTable2.GetColumns();
|
|
oColumn = oColumns.Item(1);
|
|
oColumn.SetWidth(190, 0); // 0 = wdAdjustNone
|
|
oColumn = oColumns.Item(2);
|
|
oColumn.SetWidth(85, 0);
|
|
oColumn = oColumns.Item(3);
|
|
oColumn.SetWidth(85, 0);
|
|
oColumn = oColumns.Item(4);
|
|
oColumn.SetWidth(85, 0);
|
|
|
|
oCell = oTable2.Cell(1, 1);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("危险等级"));
|
|
|
|
oCell = oTable2.Cell(1, 2);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("严重危险等级"));
|
|
|
|
oCell = oTable2.Cell(1, 3);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("中危险等级"));
|
|
|
|
oCell = oTable2.Cell(1, 4);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("轻危险级"));
|
|
|
|
oCell = oTable2.Cell(2, 1);
|
|
oRange = oCell.GetRange();
|
|
oRange.InsertAfter(_T("单具灭火器最小配置灭火级别"));
|
|
|
|
oCell = oTable2.Cell(2, 2);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("3A"));
|
|
else
|
|
oRange.InsertAfter(_T("89B"));
|
|
|
|
oCell = oTable2.Cell(2, 3);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("2A"));
|
|
else
|
|
oRange.InsertAfter(_T("55B"));
|
|
|
|
oCell = oTable2.Cell(2, 4);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("1A"));
|
|
else
|
|
oRange.InsertAfter(_T("21B"));
|
|
|
|
oCell = oTable2.Cell(3, 1);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("单位灭火级别最大保护面积(m2/A)"));
|
|
else
|
|
oRange.InsertAfter(_T("单位灭火级别最大保护面积(m2/B)"));
|
|
|
|
oCell = oTable2.Cell(3, 2);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("50"));
|
|
else
|
|
oRange.InsertAfter(_T("0.5"));
|
|
|
|
oCell = oTable2.Cell(3, 3);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("75"));
|
|
else
|
|
oRange.InsertAfter(_T("1.0"));
|
|
|
|
oCell = oTable2.Cell(3, 4);
|
|
oRange = oCell.GetRange();
|
|
if (m_iFire == 0)
|
|
oRange.InsertAfter(_T("100"));
|
|
else
|
|
oRange.InsertAfter(_T("1.5"));
|
|
|
|
COleVariant vtOptional3((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
|
|
wordSelection = wordApplication.GetSelection();
|
|
wordSelection.GoTo(COleVariant((short)3), // 3 = wdGoToLine
|
|
COleVariant((short)-1),vtOptional3,vtOptional3); // -1 = wdGoToLast
|
|
|
|
CString sTmpText,sDangerRate;
|
|
wSelection = wordApplication.GetSelection();
|
|
wSelection.TypeParagraph();
|
|
wordSelection.TypeText(_T("已知条件:\n"));
|
|
sTmpText.Format(_T("灭火配置场所的保护面积：S = %.2f平方米\n"),m_nArea);
|
|
wordSelection.TypeText(sTmpText);
|
|
|
|
if (m_iLevel == 0)
|
|
sDangerRate = _T("轻危险级");
|
|
else if (m_iLevel == 1)
|
|
sDangerRate = _T("中危险级");
|
|
else if (m_iLevel == 2)
|
|
sDangerRate = _T("严重危险级");
|
|
|
|
if (m_iFire == 0)
|
|
sTmpText.Format(_T("危险等级,火灾级别：%s,A类火灾\n"),sDangerRate);
|
|
else
|
|
sTmpText.Format(_T("危险等级,火灾级别：%s,B类火灾\n"),sDangerRate);
|
|
wordSelection.TypeText(sTmpText);
|
|
|
|
if (m_iFire == 0)
|
|
sTmpText.Format(_T("单位灭火级别最大保护面积：U = %.1f(m2/A)\n"),m_dUnitArea);
|
|
else
|
|
sTmpText.Format(_T("单位灭火级别最大保护面积：U = %.1f(m2/B)\n"),m_dUnitArea);
|
|
|
|
wordSelection.TypeText(sTmpText);
|
|
sTmpText.Format(_T("灭火设施情况：%s\n"),m_sFireControl);
|
|
wordSelection.TypeText(sTmpText);
|
|
sTmpText.Format(_T("修正系数：K = %.1f\n"),m_dK);
|
|
wordSelection.TypeText(sTmpText);
|
|
|
|
wordSelection.TypeText(_T("\n计算结果：\n"));
|
|
if (m_iFire == 0)
|
|
sTmpText.Format(_T("灭火器配置所需的灭火级别：Q = %.2fA\n"),m_dQ);
|
|
else
|
|
sTmpText.Format(_T("灭火器配置所需的灭火级别：Q = %.2fB\n"),m_dQ);
|
|
wordSelection.TypeText(sTmpText);
|
|
sTmpText.Format(_T("单具灭火器最小配置灭火级别：%s\n"),m_csRet2);
|
|
wordSelection.TypeText(sTmpText);
|
|
|
|
}
|
|
|
|
//初始化WORD中表格数据
|
|
void CExtinguisherCalcDlg::InitTableData()
|
|
{
|
|
m_arFactName.RemoveAll();
|
|
m_arFactValue.RemoveAll();
|
|
|
|
m_arFactName.Add(_T("未设室内消火栓系统和灭火系统"));
|
|
m_arFactName.Add(_T("设有室内消火栓系统"));
|
|
m_arFactName.Add(_T("设有灭火系统"));
|
|
m_arFactName.Add(_T("设有室内消火栓系统和灭火系统"));
|
|
m_arFactName.Add(_T("可燃物露天堆场\n甲、乙、丙类液体储罐区\n可燃气体储罐区"));
|
|
|
|
m_arFactValue.Add(_T("1.0"));
|
|
m_arFactValue.Add(_T("0.9"));
|
|
m_arFactValue.Add(_T("0.7"));
|
|
m_arFactValue.Add(_T("0.5"));
|
|
m_arFactValue.Add(_T("0.3"));
|
|
}
|