Fixed ViewFMX

This commit is contained in:
Mikhail Grigorev 2014-09-29 14:36:06 +06:00
parent 7f7532166a
commit 896c466ab4

View File

@ -134,10 +134,10 @@ constructor TocvViewFMX.Create(AOwner: TComponent);
begin
inherited;
{$IFDEF DELPHIXE7_UP} // Delphi XE7 and above
BackBuffer := TBitmap.Create;
{$ELSE ~DELPHIXE6} // Delphi XE6
{$IFDEF DELPHIXE6_UP} // Delphi XE6 and above
BackBuffer := TBitmap.Create;
{$ENDIF}
{$IFDEF DELPHIXE6} // Delphi XE6
BackBuffer.PixelFormat := TPixelFormat.RGB;
{$ELSE} // Delphi XE5 and below
BackBuffer := TBitmap.Create(0, 0);