mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-01 21:40:25 +02:00
TAChart: remove DoubleBuffered hack because LCL fully supports it now
git-svn-id: trunk@58101 -
This commit is contained in:
parent
79aba78f15
commit
5854ef0c77
@ -22,7 +22,7 @@ unit TAGraph;
|
||||
interface
|
||||
|
||||
uses
|
||||
Graphics, Classes, Controls, LCLIntf, LCLType, SysUtils,
|
||||
Graphics, Classes, Controls, LCLType, SysUtils,
|
||||
TAChartAxis, TAChartAxisUtils, TAChartUtils, TADrawUtils, TAGUIConnector,
|
||||
TALegend, TATextElements, TATypes;
|
||||
|
||||
@ -312,7 +312,6 @@ type
|
||||
{$IFDEF LCLGtk2}
|
||||
procedure DoOnResize; override;
|
||||
{$ENDIF}
|
||||
procedure Loaded; override;
|
||||
procedure Notification(
|
||||
AComponent: TComponent; AOperation: TOperation); override;
|
||||
procedure PrepareAxis(ADrawer: IChartDrawer);
|
||||
@ -1311,13 +1310,6 @@ begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
procedure TChart.Loaded;
|
||||
begin
|
||||
inherited;
|
||||
if not (csDesigning in ComponentState) then
|
||||
DoubleBuffered := DoubleBuffered or (GetSystemMetrics(SM_REMOTESESSION)=0); // force DoubleBuffered if not used in remote session
|
||||
end;
|
||||
|
||||
procedure TChart.LockClipRect;
|
||||
begin
|
||||
FSavedClipRect := FClipRect;
|
||||
|
Loading…
Reference in New Issue
Block a user