Registriert seit: 11. Jan 2009
Ort: Wilnsdorf
1.439 Beiträge
Delphi XE2 Professional
|
Re: LED-Signale TComPortLib
8. Nov 2009, 17:14
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
Jens Hartmann Das Leben selber ist zu kurz, also nutze jeden Tag wie er kommt.
|