鱼C论坛

 找回密码
 立即注册
查看: 3169|回复: 7

关于delphi的基础问题

[复制链接]
发表于 2013-6-24 10:42:05 | 显示全部楼层 |阅读模式
5鱼币
各位,不好意思打扰了,我是个零基础的爱好者,我想请教下再学习甲鱼的视频中遇到的几个问题。
1、屏幕保户中,如何输入完密码后,敲击回车即可解锁呢?
2、我有三个密码,如何定义不属于多个条件的?我写(Trim(cbb1.Text ) not in ('aaa','bbb','ccc'))会报错呢。
是不是不能用 not in啊?

最佳答案

查看完整内容

1、在Form的OnKeyPress中写代码2、不知道你说的啥意思
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-6-24 10:42:06 | 显示全部楼层
1、在Form的OnKeyPress中写代码
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if edit1.text='密码' then
begin
if Key=#13 then
Application.Terminate;//do something
end;
end;
2、不知道你说的啥意思
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2013-6-25 08:46:35 | 显示全部楼层
哥哥们帮助下新人好么。。。。。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2013-6-26 10:44:12 | 显示全部楼层

先谢谢您,第二个问题是,如果我想做个判断,让这个值不包含要怎么写,我在sql里是写not in,那delphi是什么呢?delphi的包含是in,那in 相反的是啥啊?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-6-26 11:05:46 | 显示全部楼层
我也说不太好
拿按键来说
如果在就用  if key in['0'..'9',#8] then
如果不在就用if not (key in['0'..'9',#8]) then
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2013-6-26 19:27:01 | 显示全部楼层
aminghanhua 发表于 2013-6-26 11:05
我也说不太好
拿按键来说
如果在就用  if key in['0'..'9',#8] then

  if  not [cbb1.Text in ['管理员''营业员''财务']]then    这句话要怎么写呢?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-7-17 11:01:50 | 显示全部楼层
学习了···················
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-7-17 16:14:06 | 显示全部楼层
你看看集合类型。in是集合类型的运算符。
集合类型里面只能用顺序型的数据
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-12-23 08:26

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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