中央广播电视大学 课件 工具栏设计_Delphi程序设计第五章

第12讲工具栏设计 ●工具栏组件 ●快捷按钮特性 ●快捷按钮设计

第12讲 工具栏设计 ⚫工具栏组件 ⚫快捷按钮特性 ⚫快捷按钮设计

工具栏组件 7Forn1 回☒ 文件编辑 ToolBar (win32 SpeedButton (Additional

工具栏组件 ToolBar （win32） SpeedButton （Additional）

SpeedButton ●Glyph属性-按钮图片 OProgram files/Common files/ BorlandShared/Images/Buttons ●Caption,属性-按钮名称 ●ShowHint属性-true OHint-提示信息

SpeedButton ⚫Glyph属性－按钮图片 Program files/Common files/ BorlandShared/Images/Buttons ⚫Caption属性 －按钮名称 ⚫ShowHint属性－true Hint －提示信息

快捷按钮类型 ●命令型 。剪切、 复制、粘贴 ●复选框型 。黑体、斜体 ●单选按钮型 。左对齐、居中、右对齐

快捷按钮类型 ⚫命令型 剪切、复制、粘贴 ⚫复选框型 黑体、斜体 ⚫单选按钮型 左对齐、居中、右对齐

普通抉钮型 ●GroupIndex属性 。取值为0（隐含值） ..TForm1.SpeedButton1Click(...) begin 功能代码. end;

普通按钮型 ⚫GroupIndex属性 取值为0（隐含值） ... TForm1.SpeedButton1Click(...) begin 功能代码... end;

单选教钮型 ●GroupIndex属性 。非0 。同组按钮取相同值 ●Down是否为按下状态(TF) ..TForm1.SpeedButton2Click(...) 选中代码

单选按钮型 ⚫GroupIndex属性 非0 同组按钮取相同值 ⚫Down 是否为按下状态（T/F） ... TForm1.SpeedButton2Click(...) 选中代码

复选框型 ◆GroupIndex,属性-非0值 ●AllowAllUp)属性-True ●Down属性-True/False ..TForm1.SpeedButton3Click(...) if SpeedButton3.Down then 选中的处理 12-1创建工具栏

复选框型 ⚫GroupIndex属性 －非0值 ⚫AllowAllUp属性 － True ⚫Down属性 －True/False ... TForm1.SpeedButton3Click(...) if SpeedButton3.Down then 选中的处理 12-1创建工具栏

工具栏例 编辑程序 ZForn1 回☒ 文件编辑视图帮助 国过堡 宋体 可B可++→ RichEdit1 回圆画 12-2演示例子

工具栏例 － 编辑程序 12-2演示例子

本讲小结 ●工具栏设计 OToolBar SpeedButton +. ●ToolBar: OVisible T/F ●SpeedButton ODown T/F

本讲小结 ⚫工具栏设计 ToolBar ＋ SpeedButton +... ⚫ToolBar： Visible （T/F） ⚫SpeedButton Down （T/F）

本讲小结 ●快捷按钮设计 。命令型：Grouplndex=O 。单选按钮：Grouplndex=n 。复选框：GroupIndex=n oAllowAllUp true

本讲小结 ⚫快捷按钮设计 命令型： GroupIndex＝0 单选按钮：GroupIndex＝n 复选框： GroupIndex＝n AllowAllUp－true