Delphi程序设计教程第6章制作工具栏及状态栏.pptx

,单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,人民邮电出版社,6.1,面板组件（,Panel,）,面板组件 在标准,(Standard),页标签上。,该组件用来在窗体上放置一面板，在面板上可以放置其它的组件。,6.1.1,面板,组件,的属性,1,BevelInner,属性,BevelInner,属性确定面板组件的内部斜面。,2,BevelOuter,属性,BevelOuter,属性确定面板组件的外部斜面。,3.,BevelWidth,属性,BevelWidth,属性确定面板的内部斜面和外部斜面的宽度,(,单为像素,),。,BevelInner,属性确定内部斜面如何出现；,BevelOuter,属性确定外部斜面如何出现。使用这三个属性就可以改变面板的外观。,4,BorderWidth,属性,BorderWidth,属性用来确定面板边界的宽度（单位象素）。默认值为,0,，即没有边界。,5.BorderStyle,属性,BorderStyle,属性确定面板边界的类型：,bsNone,，表示无边界；,bsSingle,表示单线边界。,6.Ctrl3D,属性,Ctrl3D,属性确定面板是否为立体的。,7.Cursor,属性,Cursor,属性用来确定当鼠标指针移动到面板上时，鼠标指针的形状。,6.1.2,面板组件的事件,与面板组件有关的主要事件有单击事件（,OnClick,）与双击事件（,OnDblClick,）、,OnEnter,、,OnExit,、,OnStartDrag,、,OnEndDrag,等事件,6.2,快捷按钮组件（,SpeedButton,）,快捷按钮组件 在附加页标签上。,6.2.1,快捷按钮组件的属性,1,AllowAllUp,属性,该属性为布尔型，它确定该快捷按钮所在组中的所有快捷按钮是否可同时不选定（按钮在弹起的状态）。因此，该属性只能用在成组的快捷按钮上（即每一快捷按钮的,GroupIndex,属性非零），若,GroupIndex,为零，则该属性无效。,默认值为,False,，就是成组的快捷按钮中有一个总是选定的，使用,Down,属性确定预选定的快捷按钮；若该属性为的值为,True,，则成组的快捷按钮没有选定的。,改变成组中一个快捷按钮的,AllowAllUp,属性值，将改变该组中的所有,AllowAllUp,属性值。,也可对成组的单个位图按钮使用,AllowAllUp,属性（,GroupIndex,的值大于零），从而该按钮的选定与不选定由用户单击来确定，就像复选框的工作方式一样。要使得单个的快捷按钮像这种方式工作，设置其,GroupIndex,的值大于零（但与任何其它快捷按钮的,GroupIndex,值不同），并且设置,AllowAllUp,属性的值为,True,。,2.,Down,属性,该属性为布尔型，它确定该按钮是处于选定还是不选定状态。默认值为,False,，即处于不选定状态。,虽然对一组快捷按钮的,AllowAllUp,属性都可以设置为,False,，但必须对一个快捷按钮设置,Down,属性。也可在运行时设置,Down,的属性，无须用户单击选定快捷按钮。,3,Glyph,属性,Glyph,指定出现在快捷按钮上的位图,(,表示该按钮的功能,),。使用对象编辑器上该按钮后的按钮可选择位图文件,(,后缀为,.BMP),，或在运行时指定位图文件。,在快捷按钮上的单个位图中可以指定多达,4,个的图像。,对只有一个图像的情形，,Delphi,对不同的状态使用第一个图像，只是暗淡不同而已。对在位图中有多个图像的情形时，必须使用,NumGlyphs,属性指定图像号。所有的图像必须大小相同，水平并排排列。,单击对象编辑器的该属性旁边的值栏，就会打开一个图形编辑器。在图形编辑器中选择,Load,按钮来选择要使用图像的,.BMP,文件。,4,GroupIndex,属性,该属性为整型变量，它确定哪一快捷按钮加入到组中。,默认值为,0,，表示该快捷按钮不属于组。当用户单击该组件时，它处于凹下状态，而当用户释放鼠标时，它就恢复正常的弹起状态。,具有相同,GroupIndex,属性（非,0,）的快捷按钮，就在相同的组中。当用户单击组中的一个快捷按钮时，它就处于凹下状态，直到用户再次单击该组中的另一快捷按钮为止。以这种方式使用的按钮给用户以互斥的选择。,5,Layout,属性,Layout,属性确定出现在位图按钮或加速按钮上图像的位置。,6,Margin,属性,该属性为整型变量，它确定在图形的边界（由,Glyph,属性指定的）和按钮的边界间的像素数。,边沿分界是由图像和文本（由,Layout,属性指定）的分布确定的。如,Layout,的值为,blGlyphLeft,，在图像的左边和按钮的左边则出现边沿。若,Margin,为,3,，则边沿为,3,个像素，若,Margin,为,0,，则没有边沿。,默认值为,-1,，表示图像和文本（由,Caption,属性指定）居中。,7,NumGlyphs,属性,NumGlyphs,指定用于加速按钮上的图像（由,Glyph,属性指定）数。,若在一个位图中有多个图像，则必须使用该属性指定位图中的图像数。所有的图像必须具有相同的大小，并排排列。默认值为,1,，有效值为,1,到,4,。也就是说最多,4,个图像。,在按钮上显示哪一个图像是由按钮的状态确定的，如表,6-3,所示。,对于只有一个图像的情形，,Delphi,对不同的状态使用相同的图像，只是暗淡不同而已。,8,Spacing,属性,该属性为整型变量，它确定出现在加速按钮图像的位置。即在图像（由,Glyph,属性指定）和文本（由,Caption,属性指定）之间的像素数（正数时）。默认值为,4,。若为,0,，则其间没有空隙；若为,-1,，则文本出现在图像与按钮边界中央。,6.2.2,快捷按钮组件的事件,与快捷按钮组件有关的主要事件有单击事件（,OnClick,）与双击事件（,OnDblClick,）。,6.3,制作工具栏,在窗体上建立工具栏是很方便的。首先，在窗体中加入面板，并且将其,Align,属性设置为,alTop,，这时面板会保持它原来的高度，但可调整它的宽度至充满整个窗体，甚至当改变窗体的大小时，面板也可自行调整它的宽度。然后在其中加入快捷按钮或其它的组件。,可以在窗体中添加许多的工具栏。这时，它们会根据加入的顺序垂直排列在窗体的上端（最后加入的工具栏在最上端）。,快捷按钮有三种可能的操作模式。它们可以像正常的按钮一样、单击时切换状态或像一组单选钮一样。,对快捷按钮使用,Glyph,属性来指定图样。可以通过快捷按钮的表现来给使用者了解按钮现在的状态和功能，这包括利用,Down,属性表示按钮是否被按下，使用,Enabled,属性表示按钮是否可用。,为了表示一组互斥的选择，可通过,GroupIndex,属性对快捷按钮进行分组，将相关的快捷按钮放在同一组中，因而当单击该组中的一个按钮时，其它的按钮都会凸起来。,在对快捷按钮分组后，要定义一个切换键：单击该按钮，可使该组中没有按钮被选定。定义切换键使用快捷按钮的,AllowAllUp,属性。,制作完整的工具栏，请参考,6.4,中的例子。,6.4,制作状态栏,制作状态栏，可在窗体中加入一个面板组件，并且将它的,Align,属性设置为,alBottom,，并清除,Caption,属性的值。,对状态栏可以将它分成几个独立的状态框（加入新的面板组件）或使用,BevelInner,及,BorderWidth,属性来产生立体的效果。,更新状态栏的信息可以反应应用程序的当前状态。状态栏显示的文字就是面板组件的,Caption,属性值，可以在事件处理程序中加入改变,Caption,属性值的程序代码来更新状态栏，以反应当前的程序状态。,6.5,使用工具栏组件设计工具栏,6.5.1,工具栏组件,工具栏组件 在,Win32,页标签上，可用来管理和安排可视的组件。使用工具栏组件具有下列优点：,在工具栏组件上按钮的大小和间距自动保持一致；其它的控件也自动保持它们的相对位置和高度；若在一行中按钮显示不下，可以自动折行显示。,1.,工具栏组件的属性,Align,属性,Align,属性用来确定该组件与窗体的对齐方式，也就是在窗体中的位置。,Autosize,属性,该属性为布尔型，当为,True,时，工具栏的大小随着内容的变化而变化。,ButtonHeight,属性,该属性为整型，用来确定工具栏上的按钮和其它组件的高度，单位为像素。,ButtonWidth,属性,该属性为整型，用来确定工具栏上的按钮和其它组件的宽度，单位为像素。,Flat,属性,该属性为布尔型，当为,True,时，工具栏上按钮的边框由普通边框变为弹出式边框。平时按钮和工具栏融为一体，当鼠标指针移动到按钮上时，按钮自动从工具栏上浮现出来。,Images,属性,列出工具栏按钮上出现的图标。每一按钮的,ImageIndex,属性确定显示指定的图标。若不指定图标，则按钮上不显示图标。,List,属性,该属性为布尔型，当为,True,时，图标占据按钮的左半部，标题在右半部；否则图标占据按钮的上半部，标题在下半部。,ShowCaption,属性,该属性为布尔型，当为它,True,时，工具栏上的所有按钮显示文本,(,即,Caption,属性的内容，这时可能改变按钮的大小,),，否则不显示。,2.,工具栏组件的事件,与工具栏组件有关的主要事件有单击事件（,OnClick,）与双击事件（,OnDblClick,）。,6.5.2,工具栏按钮组件,工具栏按钮(,ToolButton),组件是一种特殊的按钮组件，它只配合工具栏组件使用，不能放置在其他窗口组件上。,要在工具栏组件上添加工具按钮，右单击工具栏组件，在弹出的快捷菜单中选择,“,New Button,”,菜单命令即可生成一个空白的工具栏按钮，生成的工具栏按钮依次在工具栏组件上排列。,工具栏组件自己生成工具栏按钮，因此随着工具栏组件的移动或隐藏，工具栏按钮也进行相应的移动或隐藏。,1.,工具栏按钮的属性,Grouped,属性,该属性为布尔型，当为它,True,并且,Style,属性的值为,tbsCheck,时，则同一组中的按钮一次只能选定一个。,对按钮分组右单击工具栏组件，在弹出的快捷菜单中选择,“,New Separator,”,菜单命令即可。,ImageIndex,属性,该属性为整型，用来确定出现在工具栏按钮上的图标。若其值为,0,，则工具栏按钮将显示工具栏组件,Images,属性所确定的图标列表中的第,1,个图标。,Down,属性,该属性为布尔型，当为它,True,时，工具栏按钮被选定，这时按钮为凹下的。当按钮不选定时，按钮为凸起的。,Style,属性,确定工具按钮的显示风格。,2.,工具栏组件的事件,与工具栏组件有关的主要事件有单击事件（,OnClick,）。,6.5.3,设计工具栏,1.,工具栏设计的操作过程,设计工具栏采用下列的操作过程：,第,1,步：设置图表列表。,在,Win32,页标签中选择图表列表组件 ，将其放到窗体上。双击窗体上的图标列表组件，打开图标列表编辑框,(,如图,6-3,所示,),。,在该对话框中添加工具栏按钮要使用的图标。,第,2,步：设置工具栏。,在窗体上添加工具栏按钮组件，并设置其属性。,第,3,步：设置工具栏按钮。,在工具栏组件上添加工具栏按钮，并设置其属性。,第,4,步：编写按钮事件的处理程序。,第,5,步：运行程序，查看设置后的效果。,6.6,使用状态栏组件设计状态栏,状态栏组件 位于,Win32,页标签中。,6.6.1,状态栏组件的属性,1.Align,属性,Align,属性用来确定该组件与窗体的对齐方式，也就是在窗体中的位置。其取值如表,6-5,所示。默认值为,alBottom,，即状态栏位于主窗口的底部。,2.SimplePanel,属性,该属性为布尔型，当为,True,时，状态上只有单个面板，面板上显示的内容为,SimpleText,属性的值，否则状态栏上有多个面板。,3.SimpleText,属性,该属性为字符串型。若状态栏上只有单个面板，该属性的值就是状态栏上显示的内容。,4.SizeGrid,属性,该属性为布尔型，当为,True,时，可在运行时改变状态栏的大小。,5.Canvas,属性,该属性为只读型的，在运行时提供对状态栏上绘图的存取。,6.Panels,属性,该属性包含了状态栏的各个显示面板，在设计时可向状态栏组件添加、删除、修改面板。其方法是单击该属性旁的,“,”,按钮，打开面板编辑器即可。,6.6.2,在状态栏组件中添加或删除显示面板,在状态中添加或删除面板面板采用下面的操作过程：,第,1,步：单击状态栏组件,Panel,属性旁的,“,”,按钮，打开面板编辑器，如图,6-5,所示。,第,2,步：在面板编辑器窗口中添加、删除或改变面板的顺序。,第,3,步：设置面板组件的属性。,在对象结构浏览中选定要设置面板属性的组件，在对象编辑器中进行属性的设置。可设置的属性主要有：,1.Bevel,属性,用于确定面板的显示风格，其取值包括：,Lowered,（以下凹方式显示面板）、,Raised,（以上凸方式显示面板）、,None,（以平面方式显示面板）。,2.Algnment,属性,用于确定面板中字符串的对齐方式，其取值包括：,Leftjustify,（左对齐）、,Rightjustify,（右对齐）、,Center,（居中对齐）。,6.6.3,状态栏同步显示过程,要实现同步显示功能，也就是当鼠标在菜单项上或工具栏上移动时，状态栏上同步显示相关的提示信息，这将使用到下列组件：状态栏组件；菜单、工具栏和工具按钮组件；,Application,组件、窗体组件。,这四种组件之间协同工作的过程如下：,第,1,步：设置菜单组件、工具栏组件和工具按钮组件。,这些组件的,Hint,属性为需要在状态栏上同步显示的提示信息。,第,2,步：编制响应,Application,组件的,Hint,事件，来完成在状态栏上显示体式信息。,当鼠标在菜单项上或工具栏按钮上移动时，,Application,对象将鼠标指针所在处的菜单项或按钮的,Hint,属性的值复制到,Application,的,Hint,属性中，并触发,Application,对象的,OnHint,事件。,