【文件属性】:
文件名称: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)