Question

delphi if else 语句怎么无限嵌套。或者给个别的可用的语句。

begin
qz2:=(StrToFloat(edt1.Text));
if (1 = pd) then
begin
edt1.Text:=FloatToStr(qz1 + qz2);
end
else if (2 = pd) then
begin
edt1.Text:=FloatToStr(qz1 - qz2);
end;
else if (3 = pd) then
begin
edt1.Text:=FloatToStr(qz1 * qz2);
end;
end;

若以下回答无法解决问题，邀请你更新回答

Answer 1

什么叫“无限嵌套"?
你那个出错的语句前面的 End 后面多了个分号

追问

在帮我解决一个问题立马采纳你，给你多100分，就是我之前保存好的.psa,后来重新打开，点运行老是窗口抖动下就没反应！

追答

不明白你第二个问题

“仅仅抖动”是Delphi 还是你写的那个程序
贴代码 或者发给我看看吧