ListBox auf lbVirtual - merkwürdiges Verhalten

[moelski]

Moin !

Ich habe da eine ListBox in 2009 die ich mit dem Style lbVirtual betreiben möchte.
Das klappt eigentlich auch ganz gut, aber wenn ich aus einer anderen Unit Daten in der ListBox einfügen möchte und dann die Daten in der ListBox anklicke, dann passieren merkwürdige Dinge. Es werden Einträge gelöscht

Habe mal ne Demo Anwendung angehängt inkl. EXE. Startet die mal und klickt in Form1 auf ADD. Daten werden eingetragen und man kann die auch in der ListBox anklicken. Dann auf Button2 klicken und in Form2 dann auf den Button. Auch jetzt werden Daten in der ListBox eingetragen.
Klickt man nun aber ein Item der Listbox an, dann löschen sich Elemente.

Bin ratlos

[moelski]

Moin !

Ich blicks nicht
Bin nun seit 4 Stunden am Suchen, aber kann den Fehler nicht finden
Warum auch immer, aber hier:

Delphi-Quellcode:

  If (index >= 0) and ( index < DebugLoggingItems.Count ) Then
    Data := DebugLoggingItems[index]
  Else

wird aus mir unerklärlichen Gründen der Count Wert falsch zurück gegeben.

Ich bin echt am verzweifeln langsam.

[moelski]

Moin !

Ich denk das war zuviel Huhn über die Feiertage ...

Ich habe in FormActivate die Stringliste eingerichtet ... Blöd nur das FormActivate des öfteren mal aufgerufen wird ...

Nachdem ich nun alles in FormCreate gelegt habe gehts ...

Peinlich ...