马上注册,结交更多好友,享用更多功能^_^
您需要 登录 才可以下载或查看,没有账号?立即注册
x
按钮型控件:Button, BitBtn, SpeedButton。 BitBtn, SpeedButton上面可以有位图,SpeedButton没有焦点,多用于工具栏。 BitBtn的kind属性可以使用预定义的多种带位图按钮,如确认、取消等。 BitBtn, SpeedButton共有属性:Layout,Margin, Spacing。 Layout确定位图在文字的上下左右。 Margin是位图与其所在方向边界的距离。缺省值是-1。 Spacing是位图与文字的距离。缺省值是4。 按钮型控件:RadioButton, CheckBox。 一个是单选,一个是多选。被选中Checked属性为True。 我感觉用RadioGroup和CheckListBox更方便,它每项都是用下标索引的,方便用for、case等方式调用。 比如小甲鱼的实例1用多个if语句,用RadioGroup一句就完成了。 <p class="MsoNormal"><span lang="EN-US">procedure TForm1.RadioGroup1Click(Sender:
TObject);<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">begin<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">
Label1.caption:= RadioGroup1.Items.Strings[RadioGroup1.itemIndex] + '</span><span style="font-family:宋体;mso-ascii-font-family:Calibri;mso-ascii-theme-font:minor-latin;
mso-fareast-font-family:宋体;mso-fareast-theme-font:minor-fareast;mso-hansi-font-family:
Calibri;mso-hansi-theme-font:minor-latin">获胜!</span><span lang="EN-US">';<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">end;</span></p>
RadioButton, CheckBox的checked属性可以得知是否被选中。另外CheckBox还有state属性,它与checked类似,但当AllowGrayed为True时,CheckBox还可以灰选,这时checked仍为False,而state则可以分辨出,分别是cbChecked, cbUnchecked, cbGrayed。 编辑型控件:Edit, MaskEdit, Memo, RichEdit Edit的主要属性: PasswordChar,缺省为#0,明文显示,如改为*,则每个输入的字符都显示为* MaxLength,允许输入最大字符数,-1为不限制。 ReadOnly,为真时不允许输入。 Autoselect,为真时Tab进入时全选 Edit的主要事件: onEnter:获得焦点时 OnChange:内容改变时 OnKeyPress:在文本框按下按键时,包括ctrl-C等非显示按键。 MaskEdit主要是可以限定输入的内容, 按一定格式输入。 主要属性是EditMsk,掩码格式分为三部分,用;隔开。 第一部分是掩码本身。 MaskEdit 输入格式符 (格式符及对应的含义) | | l 表示该位置只可能是一个字母,可以用光标键跳过它,L 表示该位置必须是一个字母(l不是1是小写的L) | | a 表示该位置只可能是一个字母或数字字符,A 表示该位置必须有一个字母或数字字符 | | c 表示该位置只可能是一个字符,C 表示该位置必须有一个字符 | | 9 表示该位置只可能是一个数字,0 表示该位置必须有一个数字 | | “<”格式符表示随后的字母均以小写的形式显示,直到遇到一个“>”格式字符或“<>”格式符。“>”格式符则与“<”正好相反 | | | | 表示该格式符之后的那个掩码格式符将作为数据中的普通字符对待。如果想在数据中放进一个掩码格式符,应该在这个格式符前放一个“\”符号。如“\A” | | | | 如有“!”表示数据前的空格将不被保存在数据中,没有“!”则数据后的空格不被保存。“!”格式符只能放在掩码格式符的第一个字符处 | | |
第二部分只有0或1,为1则分隔符也作为字符串的一部分,为0则只是输入的部分。 第三部分的一个字符用以表示还未输入的部分用此字符先代替显示。
|