From cbd182c93d96be5a1d662ea8fc39e0cd3564b8d8 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 16 Feb 2018 16:46:53 +0000
Subject: [PATCH] spktoolbar: Improved handling of DoubleBuffered.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6203 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/spktoolbar/SpkToolbar/SpkToolbar.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/spktoolbar/SpkToolbar/SpkToolbar.pas b/components/spktoolbar/SpkToolbar/SpkToolbar.pas
index a57f1b966..ccdba61ac 100644
--- a/components/spktoolbar/SpkToolbar/SpkToolbar.pas
+++ b/components/spktoolbar/SpkToolbar/SpkToolbar.pas
@@ -558,7 +558,6 @@ begin
 
   // Initialization of inherited property
   Align := alTop;
-  DoubleBuffered := true;  // required after Laz 1.9
 
   //todo: not found in lcl
   //inherited AlignWithMargins:=true;
@@ -706,6 +705,10 @@ procedure TSpkToolbar.Loaded;
 begin
   inherited;
 
+  if not (csDesigning in ComponentState) then
+    DoubleBuffered := DoubleBuffered or (GetSystemMetrics(SM_REMOTESESSION)=0);
+    // force DoubleBuffered if not used in remote session
+
   InternalBeginUpdate;
 
   if FTabs.ListState = lsNeedsProcessing then