From f05bc54e7979f531fc94a1f454aebc3cdbeaaa53 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 28 May 2019 10:28:14 +0000
Subject: [PATCH] jvcllaz: Fix JvSimScope being inactive in Linux-qt.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6965 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/jvcllaz/examples/JvYearGrid/YearGrid_Demo.lpr | 1 -
 components/jvcllaz/run/JvJans/jvsimscope.pas             | 7 +++++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/components/jvcllaz/examples/JvYearGrid/YearGrid_Demo.lpr b/components/jvcllaz/examples/JvYearGrid/YearGrid_Demo.lpr
index 8ea77e4cf..26607d07d 100644
--- a/components/jvcllaz/examples/JvYearGrid/YearGrid_Demo.lpr
+++ b/components/jvcllaz/examples/JvYearGrid/YearGrid_Demo.lpr
@@ -16,7 +16,6 @@ begin
   {$IF LCL_FULLVERSION >= 1080000}
   Application.Scaled := True;
   {$ENDIF}
-  Application.Scaled:=True;
   Application.Initialize;
   Application.CreateForm(TMainForm, MainForm);
   Application.Run;
diff --git a/components/jvcllaz/run/JvJans/jvsimscope.pas b/components/jvcllaz/run/JvJans/jvsimscope.pas
index d99737bd3..40478bd41 100644
--- a/components/jvcllaz/run/JvJans/jvsimscope.pas
+++ b/components/jvcllaz/run/JvJans/jvsimscope.pas
@@ -228,6 +228,8 @@ type
 
 implementation
 
+uses
+  InterfaceBase;
 
 //=== { TJvScopeLineValues } =================================================
 
@@ -730,7 +732,12 @@ begin
         FLines[I].FValues.Add(FLines[I].Position);
     end;
   end;
+  {$IFDEF LCLQt}
+  Invalidate;
+  Application.ProcessMessages;
+  {$ELSE}
   Repaint;
+  {$IFEND}
   if Assigned(FOnUpdate) then
     FOnUpdate(Self);
 end;