Question

Delphi7的if else语句问题

刚学delphi7，老师让我们做一个简单的程序。可是这if else语句真是逻辑混乱啊，比如我想表达C++里面的if（i == 1）{}
else if（i >1 && i<3){}
else if(i>3 && i<7){}
这怎么在Delphi7里面表达啊？

Answer 1

if i = 1 then
begin
end
else if (i > 1 ) and (i < 3) then
begin
end
else if (i > 3) and (i < 7) then
begin
end;
Delphi 的语法其实是很简单的，用多了那就会觉得c++难写了

追问

if后面不用跟括号吗？不行啊，能麻烦些详细点吗？比如第一个if的end后面要不要分号啊？我的代码是：

Answer 2

if i = 1 then
begin

end else if (i > 1) and (i < 3) then
begin

end else if (i > 3) and (i < 7) then
begin

end;

追问

不行啊，能麻烦些详细点吗？比如第一个if的end后面要不要分号啊？我的代码是：

追答

else if 前边的End不能用 ；
如下：

procedure TLoginForm.Button1Click(Sender: TObject);
begin
if Edit1.Text = '' then
begin
ShowMessage('请输出用户名：');
end
else if Edit2.Text = '' then
begin
ShowMessage('请输入密码');
end;
MainForm.Show;
end;