LED-Signale TComPortLib

[Jens Hartmann]

Hallo zusammen,

ich versuche zur Zeit von der Komponente TComPort die ComLed´s mit den verschiedenen Signalen zu belegen. Allerdings leider ohne Erfolg.

Ich habe der Led zwar die richtige Comport Komponente zugewiesen, es wird allerdings keine Veränderung sichtbar.

Hat da vieleicht schon mal jemand Erfahrung mit gemacht.

Danke schon mal

Gruß Jens

[Jens Hartmann]

Haben den Fehler gefunden. Die Lösung war ein Repaint im OnChange Ereignis der LED

Delphi-Quellcode:

procedure TForm1.ComLed1Change(Sender: TObject; AState: TLedState);
begin
  ComLed1.Repaint;
end;

Gruß Jens