main.cpp

fgjhkcghkcghmbmcmcmxgfnhgxgnhynxntxrtnt

#include  "main.h"

main()
{
	WINDOW       *Form1;       //第二屏
	QWindow      *Win2;        //操作窗口
	QList        *Grid2;       //列表
	QEdit        *EDIT1[3];    //编号、字符输入框
	QDateEdit    *DATEEDIT1;   //日期
	QButton      *Buttons1[3]; //按钮
	QLabel       *Labels1[10]; //文字控件
	
	QWindow      *Win1;        //操作窗口
	QList        *Grid1;       //列表
	QEdit        *EDIT[3];     //编号、字符输入框
	QDateEdit    *DATEEDIT;    //日期
	QButton      *Buttons[3];  //按钮
	QLabel       *Labels[10];  //文字控件

	InitSCR();  //必须初始化窗口！(现有颜色对编号不能改变，可以添加或修改颜色值)
	char         TEMP[30];

	//建立主窗口，以后的东西必须都在主窗口完成
	Form1 = newwin(24,80,0,0);
	Win2 = new QWindow(Form1,24,80,0,0,true,1);
	Win2->SetCaption("第二演示窗");
//---------------------------------------------------------------------------
	Buttons1[0] = new QButton(Win2->QWin,7,21,50,3," 确定2 ");
	Buttons1[1] = new QButton(Win2->QWin,7,21,60,3," 返回2 ");
	Buttons1[2] = new QButton(Win2->QWin,7,21,70,3," 第1屏 ");
	EDIT1[0] = new QEdit(Win2->QWin,5,2,10,5,'I'); //编号
	EDIT1[1] = new QEdit(Win2->QWin,12,4,10,5,'C');//姓名
	EDIT1[2] = new QEdit(Win2->QWin,12,6,10,5,'F');//金额
	DATEEDIT1 = new QDateEdit(Win2->QWin,8,10,5);  //日期
	Labels1[0] = new QLabel(Win2,5,2,3,"编2号",false);//文字
	Labels1[1] = new QLabel(Win2,5,4,3,"姓2名",false);//文字
	Labels1[2] = new QLabel(Win2,5,6,3,"工2资",false);//文字
	Labels1[3] = new QLabel(Win2,5,8,3,"日2期",false);//文字
	Labels1[4] = new QLabel(Win2,5,10,3,"表2格",false);//文字

	Labels1[5] = new QLabel(Win2,20,2,40,"",false);//文字
	Labels1[6] = new QLabel(Win2,20,4,40,"",false);//文字
	Labels1[7] = new QLabel(Win2,20,6,40,"",false);//文字
	Labels1[8] = new QLabel(Win2,20,8,40,"",false);//文字
	Labels1[9] = new QLabel(Win2,20,10,40,"",false);//文字

	//建立列表窗口
	Grid2 = new QList(Win2->QWin,10,20,10,9,true,1);
	Grid2->AddSTR("联社编码表2");
	Grid2->AddSTR("基层社编码表2");
	Grid2->AddSTR("村组代码表2");
	Grid2->AddSTR("信用分社表2");
	Grid2->AddSTR("单位开户银行2");
	Grid2->AddSTR("信贷员编码表2");
	Grid2->AddSTR("贷款用途表2");
	Grid2->AddSTR("贷款直接项目2");
	Grid2->AddSTR("所属行业表2");
	Grid2->AddSTR("信用等级表2");
	Grid2->AddSTR("利息类别表2");
	Grid2->AddSTR("企业级别表2");
	Grid2->AddSTR("三项周转表2");
	Grid2->AddSTR("信用形式表2");
	Grid2->AddSTR("经济性质表2");
	Grid2->AddSTR("经营形式表2");
	Grid2->AddSTR("表外科目表2");
	Grid2->AddSTR("科目对转表2");
	Grid2->AddSTR("企业经营状态2");
	Grid2->AddSTR("企业风险状态2");
	Grid2->AddSTR("资金周转分类2");
	Grid2->AddSTR("贷款期限分类2");
	Grid2->AddSTR("支农效果表2");
	Grid2->AddSTR("风险级别表2");
	Grid2->AddSTR("解决措施表2");
	Grid2->AddSTR("贷款损失原因2");
	Grid2->AddSTR("换据业务表2");
	Grid2->AddSTR("优惠上浮表2");
//---------------------------------------------------------------------------

	touchwin(stdscr);
	Win1 = new QWindow(stdscr,24,80,0,0,true,1);
	Win1->SetCaption("演示主窗口");

	Buttons[0] = new QButton(Win1->QWin,7,21,50,3," 确定1 ");
	Buttons[1] = new QButton(Win1->QWin,7,21,60,3," 第2屏 ");
	Buttons[2] = new QButton(Win1->QWin,7,21,70,3," 退出1 ");
	EDIT[0] = new QEdit(Win1->QWin,5,2,10,5,'I'); //编号
	EDIT[1] = new QEdit(Win1->QWin,12,4,10,5,'C');//姓名
	EDIT[2] = new QEdit(Win1->QWin,12,6,10,5,'F');//金额
	DATEEDIT = new QDateEdit(Win1->QWin,8,10,5);  //日期
	Labels[0] = new QLabel(Win1,5,2,3,"编1号",false);//文字
	Labels[1] = new QLabel(Win1,5,4,3,"姓1名",false);//文字
	Labels[2] = new QLabel(Win1,5,6,3,"工1资",false);//文字
	Labels[3] = new QLabel(Win1,5,8,3,"日1期",false);//文字
	Labels[4] = new QLabel(Win1,5,10,3,"表1格",false);//文字

	Labels[5] = new QLabel(Win1,20,2,40,"",false);//文字
	Labels[6] = new QLabel(Win1,20,4,40,"",false);//文字
	Labels[7] = new QLabel(Win1,20,6,40,"",false);//文字
	Labels[8] = new QLabel(Win1,20,8,40,"",false);//文字
	Labels[9] = new QLabel(Win1,20,10,40,"",false);//文字


	//建立列表窗口
	Grid1 = new QList(Win1->QWin,10,20,10,9,true,1);
	Grid1->AddSTR("联社编码表");
	Grid1->AddSTR("基层社编码表");
	Grid1->AddSTR("村组代码表");
	Grid1->AddSTR("信用分社表");
	Grid1->AddSTR("单位开户银行");
	Grid1->AddSTR("信贷员编码表");
	Grid1->AddSTR("贷款用途表");
	Grid1->AddSTR("贷款直接项目");
	Grid1->AddSTR("所属行业表");
	Grid1->AddSTR("信用等级表");
	Grid1->AddSTR("利息类别表");
	Grid1->AddSTR("企业级别表");
	Grid1->AddSTR("三项周转表");
	Grid1->AddSTR("信用形式表");
	Grid1->AddSTR("经济性质表");
	Grid1->AddSTR("经营形式表");
	Grid1->AddSTR("表外科目表");
	Grid1->AddSTR("科目对转表");
	Grid1->AddSTR("企业经营状态");
	Grid1->AddSTR("企业风险状态");
	Grid1->AddSTR("资金周转分类");
	Grid1->AddSTR("贷款期限分类");
	Grid1->AddSTR("支农效果表");
	Grid1->AddSTR("风险级别表");
	Grid1->AddSTR("解决措施表");
	Grid1->AddSTR("贷款损失原因");
	Grid1->AddSTR("换据业务表");
	Grid1->AddSTR("优惠上浮表");

	//开始取值
	int RC = 0,RC1 = 0;
	int Count=0;
	while (RC!=10)
	{
		touchwin(stdscr);
		wrefresh(stdscr);
		EDIT[0]->Get();
			Labels[5]->Set(EDIT[0]->Value);
		EDIT[1]->Get();
			Labels[6]->Set(EDIT[1]->Value);
		EDIT[2]->Get();
			Labels[7]->Set(EDIT[2]->Value);
		DATEEDIT->Get();
		{
			if (DATEEDIT->ErrCode!=0)
				Labels[8]->Set(DATEEDIT->ErrorText);
			else
				Labels[8]->Set(DATEEDIT->Value);
		}
		Grid1->Get();
			Labels[9]->Set(Grid1->Value);
		while(1)
		{
			if (Buttons[0]->Get()==10)
			{
				EDIT[0]->Set("");
				EDIT[1]->Set("");
				EDIT[2]->Set("");
				DATEEDIT->Set("1945-10-01");
				break;
			}
			if(Buttons[1]->Get()==10)
			{
				RC1 = 0;
				touchwin(Form1);
				wrefresh(Form1);
				while (RC1!=10)
				{
					EDIT1[0]->Get();
						Labels1[5]->Set(EDIT1[0]->Value);
					EDIT1[1]->Get();
						Labels1[6]->Set(EDIT1[1]->Value);
					EDIT1[2]->Get();
						Labels1[7]->Set(EDIT1[2]->Value);
					DATEEDIT1->Get();
					{
						if (DATEEDIT1->ErrCode!=0)
							Labels1[8]->Set(DATEEDIT1->ErrorText);
						else
							Labels1[8]->Set(DATEEDIT1->Value);
					}
					Grid2->Get();
						Labels1[9]->Set(Grid2->Value);
					while(1)
					{
						if (Buttons1[0]->Get()==10)
						{
							sprintf(TEMP,"第%d次",Count);
							Buttons1[0]->SetText(TEMP);
							EDIT1[0]->Set("");
							EDIT1[1]->Set("");
							EDIT1[2]->Set("");
							DATEEDIT1->Set("1945-10-01");
							break;
						}
						if(Buttons1[1]->Get()==10)
							break;
						if(Buttons1[2]->Get()==10)
						{
							RC1=10;
							break;
						}
					}
				}
				break;
			}
			if(Buttons[2]->Get()==10)
			{
				endwin();
				exit(0);
			}
		}
		Count++;
	}
}