Tserial abschiessen

[robinWie]

mit FOR-Schleifen hat man immer das Problem, dass das Prog erst geschlossen wird wenn die FOR-Schleife abgearbeitet ist. Darum mach ich das immer so:

Delphi-Quellcode:

for i := 0 to..
 begin
  if Application.Terminated then Exit //<=======
  //...
 end;