Screen.FormCount und Screen.Forms[] funktioniert aber beim schließen bleibt immer ein Fenster offen
wenn ich folgendes asuprobiere:
for j:=0 to Screen.FormCount - 1 do If Screen.Forms[j] <> Application.MainForm then Screen.Forms[j].Close;
oder es kommt eine Fehlermeldung, "Listenindex überschreitet das Maximum (125)", wenn ich
Delphi-Quellcode:
for j:=1 to Screen.FormCount do ...
benutze.
Ich hatte erst gedacht Screen.FormCount zählt alle Fenster, dann habe ich aber mehrere Fenster wie Explorer geöffnet aber es blieb bei 125. Ich weiss nicht warum er 125 zählt, es gibt 1 HauptForm und 123 weitere Fenster, sind 124, warum dann FormCount = 125?
Gruß
Mazel