鱼C论坛

 找回密码
 立即注册
查看: 2659|回复: 3

有一个语句不是很明白

[复制链接]
发表于 2012-6-21 15:56:10 | 显示全部楼层 |阅读模式
1鱼币
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
   If (Key >= 'a') And (Key <= 'f') Then
    Key := CHR(ORD(Key) - 32);
end;
这个是要实现的是什么功能

最佳答案

查看完整内容

貌似是在a与f间限制录入小写字符
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-6-21 15:56:11 | 显示全部楼层
貌似是在a与f间限制录入小写字符
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2012-6-21 19:33:04 | 显示全部楼层
看上去像是把a到f的小写字母转换成大写字母
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2012-6-21 19:37:06 | 显示全部楼层
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-3-29 05:39

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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