鱼C论坛

 找回密码
 立即注册
查看: 3899|回复: 6

[学习笔记] 围观窗体与组件01 - 零基础入门学习Delphi023

[复制链接]
发表于 2017-8-15 22:22:18 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
窗体和组件(控件)构成delphi程序的交互界面,窗体作为母体,上面有各种控件,可以实现各种功能。
这几节课介绍窗体及窗体设计、文本型控件、按钮型控件、编辑性控件、列表框型控件、滑块型控件、容器型控件。运行时改变窗体,MDI程序。
窗体的属性,更准确的说是通用控件属性。
  
属性
  
功能
Action
用来设置与菜单项相关的动作对象,通过动作列表编辑器来设置。
Align
用来决定组件在窗体或上一级组件中的位置和尺寸。它有9 个属性值,选择这些属性值可以让组件总位于窗体的顶部、底部、左边或右边等,默认值为alNone。其中alClient 属性值可以让组件总是填满窗体或上一级组件。
Autosize
用于决定组件是否随其所包含内容(文字或图片等)的大小而调整尺寸。
Left
和Top 属性指定该组件在窗体中的左上顶点的坐标值,Left 为x 坐标的值,Top 为y 坐标的值。
Name
是每个组件都具有的属性,该属性用于指明组件对象的名字,通过组件的名字来使用组件。默认情况下,组件的名字是该组件的类名加上一个序号,例如将一个按钮的组件放在窗体上,可在对象查看器中看到这个按钮组件的Name 属性为Button1。可以使用这个默认值,也可以自己来命名。需要注意的是:一个应用程序中组件的名字是不能重复的。
Caption
用于设置组件的标题。
Color
用于设置组件的颜色。
Cursor
用于设定当鼠标的指针落入该组件的区域时鼠标指针的形状。
Font
用于设置组件上所显示的文字的字体。
Heght
和Width 属性用于设置组件的高度和宽度。
Hint
用于设置鼠标指针在组件上停留时显示提示信息的内容;  ShowHint 属性,用于指定鼠标指针在该组件停留时是否显示提示信息,其值为True 时显示提示信息。
ParentColor
当ParentColor 属性、ParentFont 属性和ParentShowHint 属性值设置为True 时,组件使用它的上一级组件的同一属性的设置值,这样可以使程序保持风格一致.
ParentFont
ParentShowHint
PopUpMenu
用于指定当右击该组件时弹出的弹出式菜单PopUpMenu 的名字,此时这个弹出式菜单应该已经存在,PopUpMenu 本身也是一个组件。
Text
用于指定文本类组件显示的文本,类似于Caption 属性。
Visible
决定组件是否可见。当设置为True 时,在运行时可以看到该组件;设为False  时运行时该组件不可见。
主菜单的建立,选择MainMenu控件,双击打开,写出各级菜单,&为按下ALT对于的键,显示为下划线,ShortCut为快捷键。-为分割线。

右键菜单,选择PopupMenu,与主菜单类似,但仅为1列。要与窗体或其他控件关联,只有鼠标在其上时才起作用,一个窗体中可以有多个右键菜单。
多个控件有同一事件过程,可以使用Action属性,这样相当于每个控件事件过程都调用一个事件程序,更准确的是都指向统一事件过程。这样同一功能的按钮、工具栏按钮、菜单和右键菜单就可以用一段程序完成了。
先用ActionList控件双击添加若干个Action,双击Action进入其事件过程Action1Execute编写内容。然后在按钮、工具栏按钮、菜单和右键菜单等的属性Action中选中Action1。
1.jpg
窗体的事件,更准确的说是通用控件事件。
  
OnClick
  
单击某组件触发该事件。
ONDblClick
双击某组件触发该事件
OnEnter
当通过鼠标单击组件或使用Tab 键跳转到组件上时,该组件获得焦点,此时该组件的OnEnter 事件被触发:该组件由焦点状态转为非焦点状态时将触发OnExit 事件
OnExit
OnMouseDown
这是响应鼠标的一组事件。其中当鼠标在组件上被按下时触发OnMouseDown 事件:当鼠标在组件的显示区域内移动时触发OnMouseMove 事件; 当释放了在组件区域内按下的鼠标键时触发OnMouseUp  事件
OnMouseMove
OnMouseUp
OnKeyDown
这是响应键盘的一组事件。组件处于激活的焦点状态时,按下键盘上的键时将触发OnKeyDown 事件,返回的是按下键的键值,可以是复合键;释放一个按下的键时将触发OnKeyUp 事件;键盘上的键一次完整地按下和释放操作将触发OnKeyPress 事件
OnKeyUp
OnKeyPress

评分

参与人数 1鱼币 +4 收起 理由
小甲鱼 + 4

查看全部评分

本帖被以下淘专辑推荐:

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2018-2-23 20:09:26 | 显示全部楼层
仿佛发现了新大陆
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2018-2-25 09:10:45 | 显示全部楼层
总结的很到位
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2019-5-20 21:23:01 | 显示全部楼层
對於我這初學者有大大的幫助謝謝~
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2019-10-9 10:28:11 | 显示全部楼层
非常感谢
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2023-8-20 10:14:34 | 显示全部楼层
感谢
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2023-11-27 17:03:38 | 显示全部楼层
我的Delphi没有搜索组件的功能
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-11-22 00:24

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表