pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-08-04 21:32:54 +02:00
Code Issues Actions Releases Activity

fix compile. If IFDEF does not apply, an empty var block causes a compile error on fpc

Browse Source
This commit is contained in:
martin
2021-02-07 19:46:58 +03:00
committed by martin
parent 7c94142d25
commit bfff18e7b5
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/uCEFBufferPanel.pas
View File

@@ -871,14 +871,15 @@ begin
end; end;
function TBufferPanel.GetRealScreenScale(var aResultScale : single) : boolean; function TBufferPanel.GetRealScreenScale(var aResultScale : single) : boolean;
var
{$IFDEF MSWINDOWS} {$IFDEF MSWINDOWS}
var
TempHandle : TCefWindowHandle; TempHandle : TCefWindowHandle;
TempDC : HDC; TempDC : HDC;
TempDPI : UINT; TempDPI : UINT;
{$ELSE} {$ELSE}
{$IFDEF LINUX} {$IFDEF LINUX}
{$IFDEF FPC} {$IFDEF FPC}
var
TempForm : TCustomForm; TempForm : TCustomForm;
TempMonitor : TMonitor; TempMonitor : TMonitor;
{$ENDIF} {$ENDIF}