Indy Server Stoppen

[inherited]

Zitat von thetrue:

Delphi-Quellcode:

        i:=main.MDIChildCount;
        while main.MDIChildCount > 0 do
        begin
          main.MDIChildren[i].Free;
          i := i-1;
        end;

warum nicht

Delphi-Quellcode:

  for i:= main.MDIChildCount downto 1 do
    main.MDIChildren[i].Free;

Zitat:

functioniert einbahnfrei

DU meinst nicht zufällig einWANDfrei?
oder gibt es den ausdruck und ich weis nichts davon?