Me alegro que lo hayas solucionado
Luk2009, los cuadritos de colores que puso eliseo no es más que unos TPanels
Los 'cuadritos' son los componentes llamados
TApdStatusLight que vienen en la carpeta de los APro y estos están ligados al componente
TApdSLController, en mi caso solo usé 4 que representan las señalizaciones seriales de
RX (recepción), CTS (Clear to Send), DCD (Data Carrier Detect) y DSR (Data Set Ready), hay otras señalizaciones más que son
BRAKELight, ERRORLight, RINGLight y TDXLight (éste último lo utilizo para comunicaciones bidireccionales, en este caso solo es de recepción por eso no lo he incluido) de tal suerte que puedes utilizar hasta 8 señalizaciones para monitorear los puertos.
Lo que hice fue 'meter' en un
TPanel todos estos componentes y sus etiquetas para no incrustar uno por uno de los componentes al StatusBar ahorrandome mucho código......
Una vez que están asignados los 'leds' al
TApdSLController solo hay que activarlo con la línea que escribí mas arriba...
ApdSLController1.Monitoring := true; // Activo el monitoreo de señales
Salud OS