文件名称:Delphi多条件判断的学生录取查询程序.rar
文件大小:15KB
文件格式:RAR
更新时间:2022-07-30 06:34:39
Delphi源码-数据库实例
Delphi多条件判断的录取查询程序,中学学生录取查询,查询学生是否被录龋可以单选条件判断、多行条件判断、嵌套条件判断等多种判断,以使查询数据更精确。请参见以下关键代码: begin IF Edit1.text='' Then begin Showmessage('请输入您的中考成绩!!!'); edit1.SetFocus; end else IF StrtoInt(Edit1.text)>=585 THEN begin Label3.Caption:='祝贺你,您已被我校录取!' ; label1.Caption:='☆☆☆☆☆欢迎进入我校学习☆☆☆☆☆'; if StrtoInt(Edit1.text)>=650 then Showmessage('您的成绩出色,您已被分到我校实验班!'); end else begin Label3.Caption:='非常抱歉,您没有被录取!'; label1.Caption:=''; end; end;
【文件预览】:
srcfans.com
----多条件查询()
--------111.bmp(246KB)
--------Project1.res(876B)
--------111.PNG(6KB)
--------Unit1.dfm(2KB)
--------Unit1.ddp(51B)
--------Project1.cfg(434B)
--------Unit1.pas(2KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(5KB)