pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-22 22:17:48 +02:00
Code Issues Actions Releases Activity

Enable DPI aware setting in Lazarus demos for Windows

Browse Source 
Cleanup some useless code in Lazarus demos for Windows
This commit is contained in:
Salvador Díaz Fau
2025-05-20 19:35:57 +02:00
parent 13ce632b49
commit f3ee45910e
228 changed files with 418 additions and 785 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
demos/Lazarus_Windows/JavaScript/JSEval/JSEval.lpr
View File

@ -5,16 +5,15 @@ program JSEval;
{$I ..\..\..\..\source\cef.inc}
uses
Forms, Windows,
LCLIntf, LCLType, LMessages, Interfaces,
Forms,
Windows,
Interfaces,
uCEFApplication,
uJSEval in 'uJSEval.pas' {JSEvalFrm},
uSimpleTextViewer in 'uSimpleTextViewer.pas' {SimpleTextViewerFrm};
{.$R *.res}
// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes to use up to 3GB of RAM.
{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}
// CEF needs to set the LARGEADDRESSAWARE ($20) flag which allows 32-bit processes to use up to 3GB of RAM.
{$IFDEF WIN32}{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}{$ENDIF}
{$R *.res}
@ -26,9 +25,6 @@ begin
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
{$IFDEF DELPHI11_UP}
Application.MainFormOnTaskbar := True;
{$ENDIF}
Application.CreateForm(TJSEvalFrm, JSEvalFrm);
Application.CreateForm(TSimpleTextViewerFrm, SimpleTextViewerFrm);
Application.Run;