BlinkLabel Komponente erstellen - Blink Problem

[Martin K]

Hi,

mit:
if csDesigning in ComponentState du kannst einfach überprüfen, ob sich dein Programm gerade in der Designzeit oder Laufzeit befindet.

Mein Vorschlag, einfach im Constructor:
FTimer.Enabled := not (csDesigning in ComponentState); Das müsste eigentlich funktionieren....


//Edit:
Sehe gerade, dass du den Timer in SetBlink aktivierst - dann müsstest du den Code so abändern:

Delphi-Quellcode:

procedure TMJBlinkLabel.SetBlink(Value: Boolean); 
begin 
If FBlink <> Value then 
  begin 
   FBlink:=Value; 
   FTimer.Enabled:=Value and not (csDesigning in ComponentState); 
  end; 
end;