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
This commit is contained in:
wp_xxyyzz
2019-05-28 10:28:14 +00:00
parent 5e62c4ce10
commit f05bc54e79
2 changed files with 7 additions and 1 deletions

View File

@ -16,7 +16,6 @@ begin
{$IF LCL_FULLVERSION >= 1080000}
Application.Scaled := True;
{$ENDIF}
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.Run;

View File

@ -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;