制作含滚动条的应用程序

1、第第1313章章 制作含滚动条的应用程序制作含滚动条的应用程序 滚动条是一个交互式的、高度可视化的控件，它包括一滚动条是一个交互式的、高度可视化的控件，它包括一个滑块、滚动条的两端的按钮等。个滑块、滚动条的两端的按钮等。滚动条控件与属于窗口的滚动条是不一样的滚动条控件与属于窗口的滚动条是不一样的处于窗口的滚处于窗口的滚动条是由该窗动条是由该窗口创建、管理口创建、管理和释放的和释放的滚动条控件是滚动条控件是由用户创建、由用户创建、管理和释放的管理和释放的13.1 滚动条类简介滚动条类简介作为任何一个窗口的子控件，滚动条可以通过通知代码来创作为任何一个窗口的子控件，滚动条可以通过通知代码来创建，但

2、也可以用对话框资源模板来创建。建，但也可以用对话框资源模板来创建。表 13-1 CScrollBar 类的方法方法说明EnableScrollBar()使滚动条的一个或两个箭头有效或无效GetScrollInfo()获得滚动条的消息GetScrollLimit()获得滚动条的范围GetScrollPos()获得滚动条当前的位置GetScrollRange()获得制定滚动条的当前最大和最小滚动位置SetScrollInfo()设置滚动条的消息SetScrollPos()设置滚动块当前的位置SetScrollRange()设置制定滚动条的最大和最小滚动位置ShowScrollBar()显示或隐藏滚

3、动条创建与初始化滚动条类创建与初始化滚动条类创建创建CScrollBar对象的一般步骤对象的一般步骤(1) 用用C+关键字关键字new和构造函数和构造函数CScrollBar:CScrollBar()为一个为一个ScrollBar对象分配一个实例对象分配一个实例(2) 初始化初始化CScrollBar对象，将一对象，将一个个Windows滚动条赋予它，并用滚动条赋予它，并用CScroll:Create()方法设置参数和方法设置参数和样式样式分配一个滚动条控件对象并返回指向该对象的指针分配一个滚动条控件对象并返回指向该对象的指针CScrollBar:pMyScroll=new CScrollBa

4、rCScrollBar:pMyScroll=new CScrollBar调用调用CScrollBar:Create()方法初始化指针方法初始化指针BOOL Create(BOOL Create(DWORD dwStyleDWORD dwStyle, ,const RECT& rectconst RECT& rect, ,CWnd CWnd * *pParentWndpParentWnd, ,UINT nIDUINT nID););滚动条窗滚动条窗口的样式口的样式表示控件的表示控件的大小和位置大小和位置指向控件所属指向控件所属窗口的指针窗口的指针父窗口与滚动父窗口与滚动条通信的标

5、识条通信的标识在设置滚动条控件时，要通过在设置滚动条控件时，要通过CScrollBar:SetScrollRange()设置其范围。设置其范围。例如，设置滚动范围为例如，设置滚动范围为-100到到100的垂直滚动条：的垂直滚动条：pMyScroll-SetScrollRange(SB_VERT,-100,100);pMyScroll-SetScrollRange(SB_VERT,-100,100);在设置了范围后，还要通过在设置了范围后，还要通过SetScrollPos()设置滚动块当前位置。设置滚动块当前位置。例如，滚动块的位置在例如，滚动块的位置在-100到到100的中间，即为的中间，即为

6、0的位置：的位置：pMyScroller-SetScrollPos(0);pMyScroller-SetScrollPos(0);标题为标题为Application of ScrollBar滚动条的滚滚动条的滚动范围设为动范围设为0到到20单击滚动块与单击滚动块与箭头之间的区箭头之间的区域。滚动块上域。滚动块上移或下移三格，移或下移三格，编辑框中的数编辑框中的数字加字加3 或减或减3单击向上或向下的单击向上或向下的箭头，滚动块向上箭头，滚动块向上或向下移动一格，或向下移动一格，编辑框中的数字加编辑框中的数字加1或减或减1按住滚动块上按住滚动块上下拖动，编辑下拖动，编辑框中的数字随框中的数字随之

7、变化之变化当前值为当前值为10单击单击Up按钮，按钮，滚动块移到最滚动块移到最上边，编辑框上边，编辑框的数字变为的数字变为0单击单击Down按钮按钮，滚动块移到最，滚动块移到最下边，编辑框的下边，编辑框的数字变为数字变为20单击单击Reset 按按钮，滚动块移钮，滚动块移到中间，编辑到中间，编辑框的数字变为框的数字变为10单击单击Exit 按钮，退按钮，退出应用程出应用程序序13.2 滚动条类编程实例滚动条类编程实例1. 应用程序的可视化编程部分应用程序的可视化编程部分 对对话话框框中中各各个个对对象象的的属属性性 对对象象 ID Caption 滚滚动动条条 IDC_XCROLLBAR 无无

8、 编编辑辑框框 IDC_EDIT1 无无 Up 按按钮钮 IDC_UP_BUTTON &Up Down 按按钮钮 IDC_DOWN_BUTTON &Down Reset 命命令令按按钮钮 IDC_RESET_BUTTON &Reset Exit 按按钮钮 IDC_EXIT_BUTTON &Exit 2. 应用程序的代码编程部分应用程序的代码编程部分（1 ）给滚动条连接变量）给滚动条连接变量ID变量名变量名类别类别 类型类型IDC_SCROLLBAR m_ScrollbarControlCscrollbarIDC_EDITlm_EditControlCEditBO

9、OL CSCROLLBARDlg:OnInitDialog()BOOL CSCROLLBARDlg:OnInitDialog() CDialog:OnInitDialog(); CDialog:OnInitDialog(); / /将将“About.”About.”菜单项加入到系统菜单中。菜单项加入到系统菜单中。 /IDM_ABOUTBOX/IDM_ABOUTBOX必须在系统命令范围内。必须在系统命令范围内。 ASSERT(IDM_ABOUTBOX & 0 xFFF0) = IDM_ABOUTBOX);ASSERT(IDM_ABOUTBOX & 0 xFFF0) = IDM_A

10、BOUTBOX); ASSERT(IDM_ABOUTBOX 0 xF000); ASSERT(IDM_ABOUTBOX AppendMenu(MF_SEPARATOR); pSysMenu-AppendMenu(MF_SEPARATOR); pSysMenu-AppendMenu(MF_STRING,IDM_ABOUTBOX,strAboutMenu); pSysMenu-AppendMenu(MF_STRING,IDM_ABOUTBOX,strAboutMenu); （2）初始化滚动条）初始化滚动条/为该对话框设置图标，当该应用程序的主窗口不是一个对话框为该对话框设置图标，当该应用程序的主窗

11、口不是一个对话框时，程序将自动设置图标时，程序将自动设置图标 SetIcon(m_hIcon, TRUE);SetIcon(m_hIcon, TRUE);/ Set big icon/ Set big icon SetIcon(m_hIcon, FALSE); SetIcon(m_hIcon, FALSE);/ Set small icon/ Set small icon m_Scrollbar.SetScrollRange(0,20); m_Scrollbar.SetScrollRange(0,20); m_Scrollbar.SetScrollPos(10); m_Scrollbar.Se

12、tScrollPos(10); char sPos10; char sPos10; itoa(m_Scrollbar.GetScrollPos(),sPos,10);/ itoa(m_Scrollbar.GetScrollPos(),sPos,10);/数值转成字符数值转成字符 m_Edit.SetSel(0,-1);m_Edit.SetSel(0,-1); m_Edit.ReplaceSel(sPos); m_Edit.ReplaceSel(sPos); UpdateData(FALSE); UpdateData(FALSE);return TRUE; / return TRUE unles

13、s you set the focus to return TRUE; / return TRUE unless you set the focus to a controla control （3 ）给滚动条消息添加代码）给滚动条消息添加代码void CSCROLLBARDlg:OnVScroll(UINT nSBCode, UINT nPos,void CSCROLLBARDlg:OnVScroll(UINT nSBCode, UINT nPos, CScrollBar CScrollBar* * pScrollBar) pScrollBar) char sPos10; int iNowP

14、os; char sPos10; int iNowPos; switch(nSBCode) switch(nSBCode) if(pScrollBar=&m_Scrollbar) if(pScrollBar=&m_Scrollbar) case SB_THUMBTRACK: case SB_THUMBTRACK:/拖动滚动滑块时拖动滚动滑块时m_Scrollbar.SetScrollPos(nPos);m_Scrollbar.SetScrollPos(nPos);itoa(nPos,sPos,10);itoa(nPos,sPos,10);m_Edit.SetSel(0,-1);

15、m_Edit.SetSel(0,-1); m_Edit.ReplaceSel(sPos); break;m_Edit.ReplaceSel(sPos); break; case SB_LINEDOWN: case SB_LINEDOWN:/单击滚动条向下的箭头单击滚动条向下的箭头iNowPos=m_Scrollbar.GetScrollPos();iNowPos=m_Scrollbar.GetScrollPos();iNowPos=iNowPos+1;iNowPos=iNowPos+1;if(iNowPos20) iNowPos=20;if(iNowPos20) iNowPos=20;m_Sc

16、rollbar.SetScrollPos(iNowPos);m_Scrollbar.SetScrollPos(iNowPos);itoa(m_Scrollbar.GetScrollPos(),sPos,10);itoa(m_Scrollbar.GetScrollPos(),sPos,10);m_Edit.SetSel(0,-1);m_Edit.SetSel(0,-1); m_Edit.ReplaceSel(sPos); break;m_Edit.ReplaceSel(sPos); break; case SB_LINEUP: case SB_LINEUP:/单击滚动条向上的箭头单击滚动条向上的

17、箭头iNowPos=m_Scrollbar.GetScrollPos();iNowPos=m_Scrollbar.GetScrollPos();iNowPos=iNowPos-1;iNowPos=iNowPos-1;if(iNowPos0)if(iNowPos20)if(iNowPos20)iNowPos=20;iNowPos=20;m_Scrollbar.SetScrollPos(iNowPos);m_Scrollbar.SetScrollPos(iNowPos);itoa(m_Scrollbar.GetScrollPos(),sPos,10);itoa(m_Scrollbar.GetScr

18、ollPos(),sPos,10);m_Edit.SetSel(0,-1);m_Edit.SetSel(0,-1);m_Edit.ReplaceSel(sPos); m_Edit.ReplaceSel(sPos); break;break;case SB_PAGEUP:case SB_PAGEUP:/单击滚动条上面的箭头与滚动块之间的区域单击滚动条上面的箭头与滚动块之间的区域iNowPos=m_Scrollbar.GetScrollPos();iNowPos=m_Scrollbar.GetScrollPos();iNowPos=iNowPos-3;iNowPos=iNowPos-3;if(iN

19、owPos0)if(iNowPosAppWizard Step1-Dialog based-(1)AppWizard-AppWizard Step1-Dialog based-其余默认其余默认(2)(2)打开对话框编辑器打开对话框编辑器 - - 将将“确定确定”和和“取消取消”通过通过Properties“Properties“开始开始” ” 和和“退出退出”，-将将“确定确定”按钮按钮IDID改为改为ID_BEGINID_BEGIN(3)(3)在在ControlControl工具条上选工具条上选PicturePicture按钮按钮-创建一个空的图片框创建一个空的图片框-InsertInser

20、t菜单菜单-ResourceResource菜单项菜单项-在在Resource typeResource type框中选中框中选中BitmapBitmap选项选项-Import-Import-加入加入bmpbmp文件文件-在在PropertiesProperties中的中的typetype中选位图中选位图- - -接受默认的接受默认的IDID值值-图片框中出现位图图片框中出现位图（4 4）在）在ControlControl工具条中选择工具条中选择List ControlList Control按钮按钮-画一个列表框控画一个列表框控件件-在其上单击鼠标右键选择在其上单击鼠标右键选择Propert

21、yProperty菜单项菜单项-将将IDID改为改为IDC_LISTCTRL1IDC_LISTCTRL1，注意还要选中，注意还要选中DisabledDisabled选项选项(5) (5) 在在ControlControl工具条中选择工具条中选择ProgressProgress按钮按钮-画一个进度条控件画一个进度条控件-在其上单击鼠标右键选择在其上单击鼠标右键选择PropertyProperty菜单项菜单项-将将IDID改为改为IDC_PROGRESS1IDC_PROGRESS1，注意还要选中注意还要选中DisabledDisabled选项。选项。(6) Insert(6) Insert菜单菜单

22、-Resource-Resource菜单项菜单项-Resource type-Resource type列表框中的列表框中的IconIcon项项-单击单击ImportImport按钮按钮-加入加入ResRes文件夹中的文件夹中的arrow.icoarrow.ico，empty.icoempty.ico，finished.icofinished.ico三个文件三个文件-将将IDID值改为值改为IDI_ICON_ARROW, IDI_ICON_ARROW, IDI_ICON_EMPTY, IDI_ICON_FINISHEDIDI_ICON_EMPTY, IDI_ICON_FINISHED给控件连接

23、的变量给控件连接的变量控件控件IDID变量类型变量类型变量名变量名IDC_LISTCTRL1IDC_LISTCTRL1ClistCtrlClistCtrlm_ListCtrl1m_ListCtrl1IDC_PROGRESS1IDC_PROGRESS1CprogressCtrlCprogressCtrlm_Progressm_Progress加入的变量加入的变量变量类型变量类型变量名变量名说明说明HICONHICONhIcon7hIcon7存储图像列表中各图标句柄的数组存储图像列表中各图标句柄的数组CStringCStringProcName7ProcName7 存储列表控件中字符信息存储列表控

24、件中字符信息CImageListCImageListm_ImageListm_ImageList 图像列表对象图像列表对象intintm_nCurProcm_nCurProc当前操作过程的号码当前操作过程的号码intintm_nProgressm_nProgress 进度条的位置进度条的位置ClassViewClassView卡卡-在在13_5Dlg13_5Dlg类上类上单击鼠标右键单击鼠标右键-Add member -Add member variablevariable打开打开13_5Dlg.cpp13_5Dlg.cpp文件文件, ,在构造函数中加入初始化变量的代码：在构造函数中加入初始化

25、变量的代码：/初始化变量初始化变量m_nCurProc = 1;m_nCurProc = 1;m_nProgress = 0;m_nProgress = 0;/列表框中的操作的名称列表框中的操作的名称ProcName0= ;ProcName0= ;ProcName1= Checking Partition Table;ProcName1= Checking Partition Table;ProcName2= Checking Boot Record;ProcName2= Checking Boot Record;ProcName3= Checking File System;ProcName

26、3= Checking File System;ProcName4= Checking Directories;ProcName4= Checking Directories;ProcName5= Checking Compressed Disks;ProcName5= Checking Compressed Disks;ProcName6= Checking Disk Surface;ProcName6= Checking Disk Surface;在初始化函数在初始化函数OnInitDialog()OnInitDialog()中加入代码：中加入代码：int n;int n;m_ImageL

27、ist.Create(16,16,0,7,7);/m_ImageList.Create(16,16,0,7,7);/创建图像列表对象，图标大小为创建图像列表对象，图标大小为16161616hIcon0 = AfxGetApp()-LoadIcon(IDI_ICON_ARROW);hIcon0 = AfxGetApp()-LoadIcon(IDI_ICON_ARROW); /加载图标加载图标hIcon1 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon1 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon2 = Afx

28、GetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon2 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon3 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon3 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon4 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon4 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon5 = AfxGetApp()-LoadIcon(IDI_IC

29、ON_EMPTY);hIcon5 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon6 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);hIcon6 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY);for(n=0;n7;n+)for(n=0;n7;n+) m_ImageList.Add(hIconn);m_ImageList.Add(hIconn);/将图标加入图像列表将图标加入图像列表 /在列表控件中加入图象列表在列表控件中加入图象列表m_ListCtrl1.SetImageList(&

30、m_ImageList,LVSIL_SMALL);m_ListCtrl1.SetImageList(&m_ImageList,LVSIL_SMALL);for(n=0;n7;n+)for(n=0;nLoadIcon(IDI_ICON_EMPTY);hIcon0 = AfxGetApp()-LoadIcon(IDI_ICON_EMPTY); /加载图标加载图标m_ImageList.Replace(0,hIcon0);m_ImageList.Replace(0,hIcon0);/替换原有的图标替换原有的图标m_ListCtrl1.DeleteItem(0);m_ListCtrl1.Del

31、eteItem(0);/从列表控件中删除一项从列表控件中删除一项m_ListCtrl1.InsertItem(0,(LPCTSTR)ProcName0,0);m_ListCtrl1.InsertItem(0,(LPCTSTR)ProcName0,0); /列表中加入一项列表中加入一项/改变第一项的图标改变第一项的图标hIcon1 = AfxGetApp()-LoadIcon(IDI_ICON_ARROW);hIcon1 = AfxGetApp()-LoadIcon(IDI_ICON_ARROW);m_ImageList.Replace(1,hIcon1);m_ImageList.Replace

32、(1,hIcon1);m_ListCtrl1.DeleteItem(1);m_ListCtrl1.DeleteItem(1);m_ListCtrl1.InsertItem(1,(LPCTSTR)ProcName1,1);m_ListCtrl1.InsertItem(1,(LPCTSTR)ProcName1,1);GetDlgItem(ID_BEGIN)-EnableWindow(0); /GetDlgItem(ID_BEGIN)-EnableWindow(0); /使使“开始开始”按钮不可用按钮不可用 调用函数调用函数SetTimer()SetTimer()创建定时器，该定时器每隔创建定时器，

33、该定时器每隔0.010.01秒发秒发送送WM_TIMERWM_TIMER消息。消息。 调用函数调用函数LoadIcon()LoadIcon()加载空图标，然后调用函数加载空图标，然后调用函数Replace()Replace()替换图象列表中的题头的图标。替换图象列表中的题头的图标。 为了改变列表控件中显示的图标，还需要调用函数为了改变列表控件中显示的图标，还需要调用函数DeleteItem()DeleteItem()从列表控件中删除第从列表控件中删除第0 0项，并调用函数项，并调用函数InsertItem()InsertItem()在列表控件中加入对应空图标的一项。在列表控件中加入对应空图标的

34、一项。 同理可以改变第一项的图标。最后调用函数同理可以改变第一项的图标。最后调用函数EnableWindow()EnableWindow()使使“开始开始”按钮不可用。按钮不可用。 下述代码中首先根据当前操作号改变进度条的位置，并调下述代码中首先根据当前操作号改变进度条的位置，并调用函数用函数SetPos()SetPos()设置进度条的位置。当设置进度条的位置。当m_nProgress300m_nProgress300时，表时，表明当前操作已完成，跟前面的操作过程相同，调用函数改变当明当前操作已完成，跟前面的操作过程相同，调用函数改变当前操作项前的图标为一个对号。然后将进度条位置清零，操作前操

35、作项前的图标为一个对号。然后将进度条位置清零，操作号码加号码加1 1，此时还需要调用函数将当前操作前的图标改为一个箭，此时还需要调用函数将当前操作前的图标改为一个箭头。如果当前操作号大于头。如果当前操作号大于6 6表明所有的操作已完成，调用函数表明所有的操作已完成，调用函数KillTimer()KillTimer()删除定时器，最后调用函数删除定时器，最后调用函数MessgeBox()MessgeBox()弹出一个弹出一个消息对话框，显示操作的结果。消息对话框，显示操作的结果。 在在OnTimer()OnTimer()函数中加入代码如下：函数中加入代码如下：m_nProgress+=int(6.0/m_nCurProc);m_nProgress+=int(6.0/m_nCurProc);/进度条位置增加进度条位置增加m_Progress.SetPos(m_nProgress);m_Progress.SetPos(m_nProgress);if(m_nProgress=300)if(m_nProgress=300) / /改变刚完成的操作项的图标改变刚完成的