VC6.0 MFC 对话框 小球抛物运动 阻力

模拟小球抛物运动轨迹

一、实现抛物运动

1、新建一个工程,如下图所示。
在这里插入图片描述
2、新建一个类,取名“CPaoWu”,如下图所示。
在这里插入图片描述
3、双击“CPaoWu”,在它的头文件里给它定义一个pDC,并定义一些成员变量,代码如下。

class CPaoWu  
{
public:
	void Move();
	void Draw(CDC *p);
	CPaoWu();
	virtual ~CPaoWu();
    //下面开始添加代码
	CDC *pDC; //之前画图都是用OnDraw()里的pDC,现在我们把它定义在类的内部来完成
	int r; //定义圆的半径
	int x,y; //物体用圆来表示
	float vx,vy;//沿x,y轴的速度
	int ax,ay;//沿x,y轴的加速度
	int m; //小球质量
	float DeltaT ;
	float f,fx,fy; //阻力
	float c; //外形阻力系数
	float v;
	float S; //物体横截面积
	float Rho; //空气密度

};

4、我们添加一个Draw(CDC,*p)成员函数来画圆,如下图所示。
在这里插入图片描述

void CPaoWu::Draw(CDC *p) //面向对象的进一步封装
{
	pDC = p;
	pDC->Ellipse(x - r, y - r, x + r, y + r);
}

5、然后在CPaoWu()构造函数里给圆赋初值,代码如下。

CPaoWu::CPaoWu()
{
	x = 100;
	y = 500;
	r = 30; //给圆赋初值

	vx = 300;
	vy = -200;
	ax = 10;
	ay = 8;
	m = 80;

}

(记得在必要的地方嵌入#include "PaoWu.h"头文件!)

6、在CYunDongView类里添加消息响应句柄“WM_TIMER”,如下图所示。
在这里插入图片描述
7、然后添加菜单,并建立类向导,给它“开始”、“结束”加上命令消息,如下图所示。
在这里插入图片描述
在这里插入图片描述
8、在OnMStart()和OnMStop()里添加如下代码。

void CYunDongView::OnMStart() 
{
	// TODO: Add your command handler code here
	SetTimer(1,50,NULL);
}

void CYunDongView::OnMStop() 
{
	// TODO: Add your command handler code here
	KillTimer(1);
}

9、再让圆动起来,我们添加一个Move()函数,如下图所示。
在这里插入图片描述
代码如下:

void CPaoWu::Move()
{
    DeltaT = 0.1;
	v = sqrt(vx * vx + vy * vy);
	f = c * Rho * S * v * v;
	fx = f * vx/v; //sinθ = vx/v
	fy = -f * vy/v;
	ax = -fx/m; //x轴阻力加速度
	ay = fy/m + 10; //y轴阻力加速度
	vx += ax * DeltaT;
	vy += ay * DeltaT;
	x += vx * DeltaT;
	y += vy * DeltaT;
}

10、在OnTimer()里调用Move()函数,代码如下。

void CYunDongView::OnTimer(UINT nIDEvent) 
{
	// TODO: Add your message handler code here and/or call default
	pw.Move(); //调用
	Invalidate(TRUE); //重画
	CView::OnTimer(nIDEvent);
}

11、到这儿,我们就已经完成了,整个结构如下图所示。
在这里插入图片描述
二、添加对话框改变参数

1、新建对话框,并添加以下控件,如下图所示。
在这里插入图片描述
在这里插入图片描述
注意:编辑框“属性 >> 样式”中的“数字”不要勾选,因为后面我们在设置一些参数的时候有可能用上小数、负数,勾选后就只能设置正整数了。

2、建立一个IDD_Dlg_SetPaoWuPara所对应的类,并添加成员变量,如下图所示。
在这里插入图片描述
在这里插入图片描述
3、添加一个“抛物运动参数设置”菜单,并添加命令消息,如下图所示。
在这里插入图片描述
在这里插入图片描述
4、在OnMSetPaoWuPara()中添加代码(记得嵌入头文件)。

void CYunDongView::OnMSetPaoWuPara() 
{
	// TODO: Add your command handler code here
	CDlg_SetPaoWuPara dlg_setPaoWuPara;
	if(dlg_setPaoWuPara.DoModal() == IDOK)
	{
		pw.x = dlg_setPaoWuPara.m_x;
		pw.y = dlg_setPaoWuPara.m_y;
		pw.r = dlg_setPaoWuPara.m_r;
		pw.m = dlg_setPaoWuPara.m_m;
		pw.vx = dlg_setPaoWuPara.m_vx;
		pw.vy = dlg_setPaoWuPara.m_vy;
		pw.c = dlg_setPaoWuPara.m_c;
		pw.S = dlg_setPaoWuPara.m_S;
		pw.Rho = dlg_setPaoWuPara.m_Rho;
		
		Invalidate(TRUE);
	}
}

5、此时的Move()代码如下,并附上部分代码界面截屏。

void CPaoWu::Move()
{	
	DeltaT = 0.1;
	v = sqrt(vx * vx + vy * vy);
	f = c * Rho * S * v * v;
	fx = f * vx/v; //sinθ = vx/v
	fy = -f * vy/v;
	ax = -fx/m; //x轴阻力加速度
	ay = fy/m + 10; //y轴阻力加速度
	vx += ax * DeltaT;
	vy += ay * DeltaT;	
	x += vx * DeltaT;
	y += vy * DeltaT;
}

在这里插入图片描述
6、编译运行结果如下图所示。
在这里插入图片描述
在这里插入图片描述

  • 5
    点赞
  • 32
    收藏
    觉得还不错? 一键收藏
  • 3
    评论
主要是模拟初中的物理实验的有源代码,可供初学者使用! 采用 MFC 编制 MVC 模式之球体演示程序 作者:haykey 下载源代码   在传统面向过程的程序设计中,往往采用 Input-Processing-Output 模式,这“归功”于 DOS 操作系统的单任务。当 Windows 图形界面 OS 出现后,MVC(Model-View-Controller)模型更适合 Windows 图形界面程序的设计,它将数据处理和数据显示分离开,使维护,扩展系统更加灵活 。其中,View:负责 显示数据,它从Model处获得数据然后显示。当然,一个Model会有用户可从不同角度来观察的多个View。Model:存储数据以及对数据进行各种运算和处理 。Controller:负责接受用户输入,并且把用户输入转换成对 Model 的操作。因此Controller 可能会修改 Model 的数据,当数据修改后,更新 View。其结构示意图如下:   一直采用MFC编程的朋友可能不太熟悉它,这是因为MFC的文档视图结构就是基于MVC的高层结构,这蒙蔽了我们的双眼。虽然MS替我们做了,我们还是有必要接触它,以在SDK or 其他地方有的放矢。我做了一个球体演示的例子,其界面如下:   左侧两个表面积和体积Edit让使用者从文本的角度精确地观察,我们称其为TextView。右侧为从CStatic派生的CGraphicView,使得人们可直观地观察Sphere.对话窗口CMVCSphereDlg是控制器,来获取用户的键盘输入(输入半径后回车)和在Static上的鼠标点击与拖动(可动态调整球体半径并实时反馈球体变化)而CSphere类是模型,存储了球体半径和计算表面积,计算体积等处理半径数据的操作.   现在让我们详细看看代码,来感受下Model,View,Controller之间如何关联,如何协同工作的。 class CSphere { public: ... .... //更新Graphic-VIEW BOOL UpdateGraphicView(HWND hWnd,const CRect &rect,BOOL bErase); //更新Text-VIEW void UpdateTextView(); //外界Controller的接口:设置球体半径 void SetRadius(float r); private: //球体半径 float m_fRadius; //计算球体表面积 float CalculateArea(float radius); //计算球体体积 float CSphere::CalculateVolumn(float radius); };   这里面 UpdateTextView,UpdateTextView 就是当用户输入新半径或拖动鼠标 Controller 捕获后通知 Model,Model 通知两个View更新显示 。具体代码如下: BOOL CSphere::UpdateGraphicView(HWND hWnd,const CRect &rect,BOOL bErase) { //data format examination if(!::IsWindow(hWnd)||::IsRectEmpty(&rect)) { AfxMessageBox("View is not created by now or rect is empty"); return false; } //get the window pointer from window handle CWnd *pView = CWnd::FromHandle(hWnd); if(pView == NULL) return false; //set graphic view''s radius in order to painting ((CGraphicView*)pView)->SetRadius(m_fRadius); bPaintSphere = true;//set paint tag true //repaint if(!::InvalidateRect(hWnd,&rect,bErase)&& !::UpdateWindow(hWnd)) { AfxMessageBox("UpdateView failed"); return true; } pView = NULL; return false; } void CSphere::UpdateTextView() { CMVCSphereDlg *parent = (CMVCSphereDlg *)AfxGetMainWnd(); CWnd *wnd1 = parent->GetDlgItem(IDC_SURFACE); CWnd *wnd2 = parent->GetDlgItem(IDC_VOLUMN); CString str; str.Format("%.2f平方米",CalculateArea(m_fRadius)); wnd1->SetWindowText(str); str.Empty(); str.Format("%.2f立方米",CalculateVolumn(m_fRadius)); wnd2->SetWindowText(str); } CGraphicView中绘图关键代码如下: void CGraphicView::OnPaint() { ... ..... if(!bPaintSphere) dc.DrawText("球体演示",rect,DT_VCENTER|DT_CENTER|DT_SINGLELINE); else { int r=(int)m_radius;//半径取整 CPoint MiddlePoint = rect.CenterPoint();//以矩形框的中心为球心 int x=MiddlePoint.x; int y=MiddlePoint.y; oldpen = (CPen*)dc.SelectObject(&solid_pen); oldbru = (CBrush*)dc.SelectObject(&brush); dc.Ellipse(x-r,y-r,x+r,y+r); //先画一个圆形 dc.SelectObject(&dash_pen); dc.Arc(x-r/2,y-r,x+r/2,y+r,x,y-r,x,y+r); //再画4个半圆弧 dc.Arc(x-r/2,y-r,x+r/2,y+r,x,y+r,x,y-r); dc.Arc(x-r,y-r/2,x+r,y+r/2,x-r,y,x+r,y); dc.Arc(x-r,y-r/2,x+r,y+r/2,x+r,y,x-r,y); ... ... } } 关于控制器CMVCSphereDlg响应用户输入半径回车核心代码如下: BOOL CMVCSphereDlg::PreTranslateMessage(MSG* pMsg) { UpdateData(); //violation examination if(m_r100) { AfxMessageBox("半径输入范围(0---100)"); return false; } if(pMsg->message == WM_KEYDOWN) if(pMsg->wParam == VK_RETURN)//回车 { CRect rect; m_GraphicView.GetClientRect(rect); m_Sphere.SetRadius(m_r);//把用户输入转换成对Model的操作 m_Sphere.UpdateTextView();//更新View m_Sphere.UpdateGraphicView(m_GraphicView.GetSafeHwnd(),rect,true);//更新View return true; } ... ... } 响应鼠标拖动核心代码如下: void CMVCSphereDlg::OnMouseMove(UINT nFlags, CPoint point) { CRect rect; m_GraphicView.GetClientRect(rect); CPoint middlepoint = rect.CenterPoint(); //if click on the graphic view if(rect.PtInRect(point)&&bIsDragging) { double dbDistance2 = (point.x-middlepoint.x)*(point.x-middlepoint.x)+(point.y-middlepoint.y)*(point.y-middlepoint.y); double dbDistance = sqrt(dbDistance2); if(dbDistance>100.) dbDistance = 100.; m_r = (float)dbDistance; //update radius edit UpdateData(false); m_Sphere.SetRadius(m_r); m_Sphere.UpdateTextView(); m_Sphere.UpdateGraphicView(m_GraphicView.GetSafeHwnd(),rect,true); } ... ... } 该程序功能简单,只是示例性说明采用 MFC 如何实现MVC模型,就当抛砖引玉了。具体实现参考源代码例子。
评论 3
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值