forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix upstram reg, messages of the message widget not auto scrolled back anymore

This commit is contained in:
Basile Burg 2019-02-10 03:37:28 +01:00
parent e11293c70c
commit bc42dc300c
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/u_widget.lfm
View File

@ -9,6 +9,7 @@ object DexedWidget: TDexedWidget
ClientWidth = 332 ClientWidth = 332
ShowHint = True ShowHint = True
ShowInTaskBar = stNever ShowInTaskBar = stNever
LCLVersion = '2.0.0.4'
object Back: TPanel object Back: TPanel
Left = 0 Left = 0
Height = 121 Height = 121

2
src/u_widget.pas
View File

@ -298,12 +298,12 @@ begin
if fTimerUpdateKind = tukDelay then if fTimerUpdateKind = tukDelay then
begin begin
fUpdateTimer.Enabled := false; fUpdateTimer.Enabled := false;
fUpdateTimer.OnTimer := @updaterAutoProc;
fUpdateTimer.Interval:= fDelayDur; fUpdateTimer.Interval:= fDelayDur;
end end
else begin else begin
fUpdateTimer.Enabled := true; fUpdateTimer.Enabled := true;
fUpdateTimer.Interval:= fLoopInter; fUpdateTimer.Interval:= fLoopInter;
fUpdateTimer.OnTimer := @updaterAutoProc;
end; end;
end; end;
end; end;