Allgemeine Frage zu einer Schleife

[mkinzler]

Delphi-Quellcode:

for i:= 1 to 3 do
if (Form1.FindComponent('Edit'+IntToStr(i)) as TEdit).text <> '' then begin
  temp := (Form1.FindComponent('Edit'+IntToStr(i)) as TEdit).text;
  writeln(f3,temp)
end;