Hola:
En el método donde capturas ese mensaje, sólo tienes que añadir (en este caso da igual antes que después de la línea FItemsChanged := TRUE), la sentencia inherited;, así, tal cual. Cuando se está en un método que intercepta mensajes, Delphi llama al anterior manejador de dicho mensaje que encuentre en la jerarquía de clases, de forma que ese manejador ya se encargará de insertar ese nuevo Item, sin más código por tu parte.
Pensando en este tema, hará falta ver cómo capturar los cambios cuando se asignen los Items "de golpe", mediante Assign. Es otra cuestión a solucionar.
|