Ich sehe in deinem Code kein
ActiveX.
Ausserdem gibt es 3 globale Variablen (List : TList; Thread : CamThread; TWin : TLTB ).
Das ist sehr unschön!!!
Durch die Verwendung globaler Variablen, kann das Control nur einmal benützt werden.
Zumindest die Variable TWin kann leicht eliminiert werden, wenn man sie lokal in CamThread speichert.
Delphi-Quellcode:
CamThread = class(TThread)
private
FTWin : TLTB; // <==