diff --git a/src/u_widget.lfm b/src/u_widget.lfm index 9220c13c..ee92818c 100644 --- a/src/u_widget.lfm +++ b/src/u_widget.lfm @@ -9,6 +9,7 @@ object DexedWidget: TDexedWidget ClientWidth = 332 ShowHint = True ShowInTaskBar = stNever + LCLVersion = '2.0.0.4' object Back: TPanel Left = 0 Height = 121 diff --git a/src/u_widget.pas b/src/u_widget.pas index e3ad7571..df014638 100644 --- a/src/u_widget.pas +++ b/src/u_widget.pas @@ -298,12 +298,12 @@ begin if fTimerUpdateKind = tukDelay then begin fUpdateTimer.Enabled := false; - fUpdateTimer.OnTimer := @updaterAutoProc; fUpdateTimer.Interval:= fDelayDur; end else begin fUpdateTimer.Enabled := true; fUpdateTimer.Interval:= fLoopInter; + fUpdateTimer.OnTimer := @updaterAutoProc; end; end; end;