Listenindex out of Maximum .. Window-Handles

[mcinternet]

Hallo die Gemeinde,

auf der Windows 10 Entwicklungsumgebung gibt es keinerlei Probleme. Ich pfusche in meiner Applikation auch nicht an diversen Handles rum

Meine Applikation erzeugt dynamisch Formulare:

fc := TDFormClass(FindClass(fFormKlasse));
f := fc.Create(self);
f.Parent := fPanDock; -> Der Handle (TPanel) auf dem die Form plaziert wird
f.FormName := fFormName;
f.WindowState := wsNormal;
f.Visible := true;
f.Init; // diverse Einstellungen wie z.B.queries starten
f.ReadPages; => Zugriff auf Datenbank diverse Einstellungen laden.
f.Show;


--------------

das onCreate auf der Form sieht so aus:

inherited;
self.Visible := false;
self.Tag := 1;
self.Left := 0;
self.Top := 0;
self.Width := 800;
self.Height := 600;
self.ClientWidth := 800;
self.ClientHeight := 600;
self.Position := poDefault;
self.WindowState := wsNormal;
self.FormStyle := fsNormal;
self.BorderStyle := bsNone;
self.WindowState := wsMinimized;
self.Align := alClient;
self.Font.Size := 10;

-----------------------------


Jetzt das eigentliche Problem.
Bisher gab es nie Probleme, beim Kunden lief das Ding bisher auf nem 2008er Terminalserver. Seit der Umstellung auf 2016 gibt es immer wieder Probleme:

Listenindex out of maximum(8) - oder (10) mal so, mal so. Nach mehrfachem Neustart der Maschine war es weg. Dann ein WindowsUpdate und das Problem ist wieder da. - Dann wieder ein paar Neustarts und es geht wieder. Das kann aber auf Dauer nicht die Lösung sein.

Auf ner Windows 10 Büchse oder meinem 2019er Server gibt es keine Probleme.


Ist da irgendwas bekannt, was da die Probleme verursachen könnte?

beste Grüße

Jörg

[p80286]

Ah ja.
Den Hinweis auf den "Helm" (=Delphi Source-Cde) verkneif ich mir mal.
Wenn in dem gezeigten Sourcecode keine Liste auftaucht, wo kommt dann der Fehler her?

Nach Deiner Beschreibung könnten das nicht oder falsch initialisierte Variablen sein, oder Du arbeitest mit falschen Datentypen oder......

Gruß
K-H

[hoika]

Hallo,
benutze MadExcept, um den Fehler einzugrenzen.