Example #1
0
/*
	PasteCol 表名 源列名称 目标列名称
 */
bool TCManager::PasteCol(TCPacket &inP,AnaWord &aw, TCPacket &outP)
{
	if (aw.GetWordCount() !=4)
		return SetResultState(false,outP,GetLanguage(FormatIsError)); 

	int nUserID = GetUserID(inP);
	if (nUserID==0)
		return SetResultState(false,outP,GetLanguage(UserIDIsNotFound));
	
	string sTableName = aw.GetAt(1);
	string sSrcName  = aw.GetAt(2);
	string sDstName  = aw.GetAt(3);
	CDataInterface *pDI = g_system.GetCurData(nUserID,aw.GetAt(1));
	if (pDI == NULL)
		return SetResultState(false,outP,GetLanguage(UserTableIsNotFound));
	CField *pSrcField = pDI->FieldByName(sSrcName.c_str());
	if (pSrcField == NULL)
		return SetResultState(false,outP,GetLanguage(FieldNameNotFind)); 
	CFieldType ft = pSrcField->GetFieldType();
	CField *pDstField = pDI->FieldByName(sDstName.c_str());
	if (pDstField == NULL)
	{
		pDstField = pDI->m_DataAccess.m_pFieldList->CreateField(ft);
		pDstField->SetFieldName(sDstName);
		pDstField->SetWidth(pSrcField->GetWidth());
		pDI->m_DataAccess.m_pFieldList->Add(pDstField);
	}
	pDI->m_DataAccess.First();
	while (!pDI->m_DataAccess.Eof())
	{
		pDI->m_DataAccess.Edit();
		if (pSrcField->IsNull())
		{
			pDstField->SetNull();
		}
		else
		{
			if (ft == fDouble)
				pDstField->SetAsDouble(pSrcField->GetAsDouble());
			else if (ft == fInt)
				pDstField->SetAsInteger(pSrcField->GetAsInteger());
			else if (ft == fBoolean)
				pDstField->SetAsBool(pSrcField->GetAsBool());
			else if (ft == fString)
				pDstField->SetAsString(pSrcField->GetAsString());
			else
				pDstField->SetAsDateTime(&pSrcField->GetAsDateTime());
		}
		pDI->m_DataAccess.Next();
	}
	return SetResultState(true,outP);
}
void CMarkovChain::DrawResult()
{
	if (m_nTotalID > 1000 || m_bSaveData)
	{
		//在主界面输出聚类结果
		int i;
		CDataAccess DataAcc;
		CField *pUserIdNum = DataAcc.m_pFieldList->CreateField(fInt);
		CField *pCluster = DataAcc.m_pFieldList->CreateField(fInt);
		pUserIdNum->SetFieldName("用户序号");
		pCluster->SetFieldName("分类结果");
		DataAcc.m_pFieldList->Add(pUserIdNum);
		DataAcc.m_pFieldList->Add(pCluster);
		for ( i=0; i<m_nTotalID; i++)
		{
			DataAcc.Append();
			pUserIdNum->SetAsInteger(i+1);
			pCluster->SetAsInteger(m_VecClus(i) );
		}
		BOOL bSucSave;//保存文件
		CTString NoUse, FileName;
		if (m_bSaveData)
		{
			bSucSave = DataAcc.SaveFile(m_DataFile, &NoUse);
			FileName = m_DataFile;
		}
		else
		{
			CTString strOutNameTemp = "_马尔可夫链聚类结果";
			CTString strOrgNameTemp = m_pDataInterface->m_DataAccess.GetFileName();
			FileName = CFileReadWrite::GetSaveFileName(strOrgNameTemp, strOutNameTemp);
			bSucSave = DataAcc.SaveFile(FileName, &NoUse);
		}

		CRsltElementText * pWarningTextRslt = new CRsltElementText( "马尔可夫链分类结果" );
		CTString strWarn;
		if (bSucSave)
			strWarn = "模型运行结束,结果已经成功输出到"+FileName+"文件里。";
		else
			strWarn = "模型运行结束,结果已经成功输出到"+NoUse+"文件里。";
		pWarningTextRslt->AddString(strWarn);
		m_pResult->Add( pWarningTextRslt );
		return;
	}
	else
	{
		CTLTable * pTable = new CTLTable;
		CRsltElementTable * pETable = new CRsltElementTable("马尔可夫链分类结果",pTable);//申请一个表对象类的对象
		pTable->CreateTable(2, 2);
		pTable->SetTitle("马尔可夫链分类情况");

		pTable->SetCols(2);
		pTable->SetRows(m_nTotalID+1);
		pTable->InsertColumn(0,"用户序号");
		pTable->InsertColumn(1,"分类结果");
		CTString str;
		for(int i=0;i<m_nTotalID;i++)
		{
			str.Format("%d",i+1);
			pTable->InsertItem(i,str);
			pTable->SetItemText(i, 1, m_VecClus(i) );
		}
		m_pResult->Add(pETable);
		return;
	}
}