腹主动脉钙化看什么科:帮忙解释一下以下代码，谢谢各位（delphi7）

来源：百度文库编辑：神马品牌网时间：2024/04/26 15:12:10

if pass=true then tushuguanli.show
else showmessage('请先输入用户名和密码！');
end;

procedure TForm1.N2Click(Sender: TObject);
begin
if pass=true then xueshengguanli.show
else showmessage('请先输入用户名和密码！');
end;

procedure TForm1.N3Click(Sender: TObject);
begin
if pass=true then jieyueguanli.show
else showmessage('请先输入用户名和密码！');
end;

procedure TForm1.N4Click(Sender: TObject);
begin
if pass=true then chacunbaobiao.show
else showmessage('请先输入用户名和密码！');
end;

procedure TForm1.N5Click(Sender: TObject);
begin
about.show;
end;

当N1这个按钮被按后，检测pass是否等于true
如果等于TRUE，显示tushuguanli这一窗体
否则显示“请先输入用户名和密码”
当N2这个按钮被按后，检测pass是否等于true
如果等于TRUE，显示xueshengguanli这一窗体
否则显示“请先输入用户名和密码”
当N3这个按钮被按后，检测pass是否等于true
如果等于TRUE，显示jieyueguanli这一窗体
否则显示“请先输入用户名和密码”
当N4这个按钮被按后，检测pass是否等于true
如果等于TRUE，显示chacunbaobiao这一窗体
否则显示“请先输入用户名和密码”
当N5这个按钮被按后，检测pass是否等于true
如果等于TRUE，显示about这一窗体
否则显示“请先输入用户名和密码”

楼上回答正确，我没有补充了，呵呵

帮忙解释一下以下代码，谢谢各位（delphi7）帮忙解释一下代码各位，菜鸟求救各位大虾解释一下代码，谢谢各位大虾，急急！！！很不理解！谢谢各位帮忙解释一下！请各位帮忙解释一下请各位帮忙解释一下帮忙解释一下这段代码帮忙解释一下啊谢谢帮忙解释一下，谢谢！帮忙解释一下.谢谢喏.