《可视化编程报告C++builder.doc》由会员分享，可在线阅读，更多相关《可视化编程报告C++builder.doc（8页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、二八 二九学年第 二 学期信息科学与工程学院课程设计报告书课程名称： 可视化编程技术与应用 班 级： 电子信息工程2007级 6 班 学 号： 200704135150 姓 名： 张 琦 指导教师： 陈 斌 二九 年 十一 月 一、课程设计目的： 综合运用本课程可视化编程技术及应用理论知识，运用C+Builder编程工具进行应用系统实例设计，从而复习巩固课堂所学的理论知识，提高对所学知识的综合应用能力，并从实践上初步实现可视化编程开发。二、课程设计要求：（任选其一） （一）财务管理系统A.实现用户登录模块B.能进行入账、出账操作 入账：何时何人以何种名义存入多少资金。 出库：何时何人以何种名义
2、支出多是资金。C.能查询系统总的收、支情况； 能查询收、支的详细信息。 （二）影音管理系统 A.能添加、删除影音文件 添加：将影音文件名称及该影音文件所在路径存入数据库； 删除：将影音文件信息从数据库中删除；B.能以列表形式列举出系统中的影音文件，点击列表对应项能播放该 影音文件。C.能按影音文件名查找一个影音文件； 能统计系统中的影音文件数量。三、课程设计方案 影音管理系统 统计文件数目 播放文件 删除文件 添加文件四、课程设计内容： 源程序：/-#include #pragma hdrstop#include Unit1.h/-#pragma package(smart_init)#pra
3、gma resource *.dfmTForm1 *Form1;void _fastcall TForm1:Open1Click(TObject *Sender)OpenDialog1-DefaultExt=wav; OpenDialog1-Filter=wav文件(*.wav)|*.wav|wmv文件(*.wmv)|*.wmv; if (OpenDialog1-Execute() MediaPlayer1-FileName=OpenDialog1-FileName; ListBox1-Items-Add(OpenDialog1-FileName); MediaPlayer1-Display=
4、Panel1; MediaPlayer1-Open(); /播放媒体文件 Timer1-Enabled=false; TrackBar1-Min=0; /设置进度条为初始状态 TrackBar1-Max=MediaPlayer1-Length; TrackBar1-Position=0; /-void _fastcall TForm1:MediaPlayer1Click(TObject *Sender, TMPBtnType Button, bool &DoDefault) Timer1-Enabled=true;/-void _fastcall TForm1:Timer1Timer(TObj
5、ect *Sender) TrackBar1-Position=MediaPlayer1-Position;/-void _fastcall TForm1:Exit1Click(TObject *Sender) if (MediaPlayer1-Mode=mpPlaying) MediaPlayer1-Stop(); MediaPlayer1-Close(); Form1-Close();/-void _fastcall TForm1:Button2Click(TObject *Sender) int i=ListBox1-Count; ShowMessage(共有+IntToStr(i)+个
6、影音文件！);/-void _fastcall TForm1:Button1Click(TObject *Sender)for(int i = ListBox1-Items-Count-1; i = 0; i-) if(ListBox1-Selectedi) ListBox1-Items-Delete(i); /-void _fastcall TForm1:Button3Click(TObject *Sender) / Query1-Open(); / Query1-First(); OpenDialog1-DefaultExt=wav; OpenDialog1-Filter=wav文件(*.
7、wav)|*.wav|wmv文件(*.wmv)|*.wmv; if (OpenDialog1-Execute() MediaPlayer1-FileName = OpenDialog1-FileName; Table1-Open(); Table1-First(); if (Table1-Eof) /Table1-Append(); Table1-Edit(); Table1-FieldByName(Filename)-AsString = OpenDialog1-FileName; Table1-Next(); if (Table1-State = dsEdit | Table1-State
8、 = dsInsert) Table1-Post(); ListBox1-Items-Add(OpenDialog1-FileName); MediaPlayer1-Display=Panel1; MediaPlayer1-Open(); /播放媒体文件 Timer1-Enabled=false; TrackBar1-Min=0; /设置进度条为初始状态 TrackBar1-Max=MediaPlayer1-Length; TrackBar1-Position=0; /-用户界面： 五、课程设计小结：这次课程设计内容是对我们所学习的可视化编程这门课程的一个综合检验，但是对我个人来说，通过这次管理系统编程设计，我深感可视化学习的难度，遇到不少挫折。令人印象最深的就是每一个组建的位置，如果不是经常在课下进行练习的话，很难找到你想要用的关键组件。一句话，熟能生巧也。在课程设计中，我必须综合运用本课程的理论知识进行，并利用C+Builder6.0作为编程工具进行计算机实现，这对我的c+语言学习程度提出不小的要求，总的来说是提高对所学知识的综合应用能力。为了完成可视化编程的这个综合设计任务，在这之前请教不少掌握较好的同学，教材也是翻遍了，发觉编程设计的确是使我学习的一个提高，所以本次课程设计还是很有收获的。