Hola, Angel. Se que sueles usar versiones antiguar de Builder. Hace un tiempo escribí un componente partiendo del que aportaba Builder 5 que denominé TSysTrayIcon. Ese componente usaba un TImageList para guardar una animación a mostrar como icono, pero si no se asignaba esa propiedad, usaba el icono por defecto de la aplicación. No se si eso es lo que estás buscando. El componente en cuestión está aquí:
TSysTrayIcon
Saludos.