Question

delphi for死循环，如何实现。

Answer 1

要想形成死循环很简单 让条件永远无法满足即可

Answer 2

呵呵是的var
I,S:Integer;
begin
for I := 0 to 3 do
begin
while I>1 do begin
inc(S);
Button1.Caption := intToStr(S);
end;
end;
end;