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