Skip to content

Commit

Permalink
Added FMXExternalPumpBrowser demo for MacOS
Browse files Browse the repository at this point in the history
Added TinyBrowser demo for Linux.
Added AppHelperRenamer tool for MacOS.
Disabled 3 event in TCefViewDelegateRef in 32 bits as a workaround for the issue #278
  • Loading branch information
salvadordf committed May 16, 2021
1 parent 15e6332 commit 28ed9e7
Show file tree
Hide file tree
Showing 44 changed files with 10,431 additions and 135 deletions.
23 changes: 23 additions & 0 deletions demos/Delphi_FMX_Mac/FMXExternalPumpBrowser/00-DeleteDCUs.bat
Original file line number Diff line number Diff line change
@@ -0,0 +1,23 @@
del /s /q *.dcu
del /s /q *.exe
del /s /q *.res
del /s /q *.rsm
del /s /q *.log
del /s /q *.dsk
del /s /q *.identcache
del /s /q *.stat
del /s /q *.local
del /s /q *.~*
del /q OSX\Debug\*.*
del /q OSX64\Release\*.*
rmdir Win32\Debug
rmdir Win32\Release
rmdir Win32
rmdir Win64\Debug
rmdir Win64\Release
rmdir Win64
rmdir OSX64\Debug
rmdir OSX64\Release
rmdir OSX64
rmdir __history
rmdir __recovery
Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<%appSandboxKeys%>
</dict>
</plist>
Original file line number Diff line number Diff line change
@@ -0,0 +1,77 @@
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Condition="Exists('$(BDS)\bin\CodeGear.Deployment.targets')" Project="$(BDS)\bin\CodeGear.Deployment.targets"/>
<ProjectExtensions>
<ProjectFileVersion>12</ProjectFileVersion>
</ProjectExtensions>
<PropertyGroup/>
<ItemGroup Condition="'$(Platform)'=='Win32'">
<DeployFile Include="..\..\bin\FMXExternalPumpBrowser.exe" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser\</RemoteDir>
<RemoteName>FMXExternalPumpBrowser.exe</RemoteName>
<DeployClass>ProjectOutput</DeployClass>
<Operation>0</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
<Required>True</Required>
</DeployFile>
</ItemGroup>
<ItemGroup Condition="'$(Platform)'=='Win64'"/>
<ItemGroup Condition="'$(Platform)'=='OSX64'">
<DeployFile Include="..\..\..\bin\FMXExternalPumpBrowser.entitlements" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser.app\..\</RemoteDir>
<RemoteName>FMXExternalPumpBrowser.entitlements</RemoteName>
<DeployClass>ProjectOSXEntitlements</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
</DeployFile>
<DeployFile Include="$(BDS)\bin\delphi_PROJECTICNS.icns" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser.app\Contents\Resources\</RemoteDir>
<RemoteName>FMXExternalPumpBrowser.icns</RemoteName>
<DeployClass>ProjectOSXResource</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
</DeployFile>
<DeployFile Include="..\..\..\bin\FMXExternalPumpBrowser.info.plist" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser.app\Contents\</RemoteDir>
<RemoteName>Info.plist</RemoteName>
<DeployClass>ProjectOSXInfoPList</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
</DeployFile>
<DeployFile Include="$(BDS)\Redist\osx64\libcgsqlite3.dylib">
<RemoteDir>FMXExternalPumpBrowser.app\Contents\MacOS\</RemoteDir>
<RemoteName>libcgsqlite3.dylib</RemoteName>
<DeployClass>DependencyModule</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
</DeployFile>
<DeployFile Include="..\..\..\bin\FMXExternalPumpBrowser" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser.app\Contents\MacOS\</RemoteDir>
<RemoteName>FMXExternalPumpBrowser</RemoteName>
<DeployClass>ProjectOutput</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
<Required>True</Required>
</DeployFile>
<DeployFile Include="..\..\..\bin\FMXExternalPumpBrowser.dSYM" Condition="'$(Config)'=='Debug'">
<RemoteDir>FMXExternalPumpBrowser.app\..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF\</RemoteDir>
<RemoteName>FMXExternalPumpBrowser</RemoteName>
<DeployClass>ProjectOSXDebug</DeployClass>
<Operation>1</Operation>
<LocalCommand/>
<RemoteCommand/>
<Overwrite>True</Overwrite>
</DeployFile>
</ItemGroup>
</Project>
Original file line number Diff line number Diff line change
@@ -0,0 +1,71 @@
// ************************************************************************
// ***************************** CEF4Delphi *******************************
// ************************************************************************
//
// CEF4Delphi is based on DCEF3 which uses CEF3 to embed a chromium-based
// browser in Delphi applications.
//
// The original license of DCEF3 still applies to CEF4Delphi.
//
// For more information about CEF4Delphi visit :
// https://www.briskbard.com/index.php?lang=en&pageid=cef
//
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
//
// ************************************************************************
// ************ vvvv Original license and comments below vvvv *************
// ************************************************************************
(*
* Delphi Chromium Embedded 3
*
* Usage allowed under the restrictions of the Lesser GNU General Public License
* or alternatively the restrictions of the Mozilla Public License 1.1
*
* Software distributed under the License is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for
* the specific language governing rights and limitations under the License.
*
* Unit owner : Henri Gourvest <hgourvest@gmail.com>
* Web site : http://www.progdigy.com
* Repository : http://code.google.com/p/delphichromiumembedded/
* Group : http://groups.google.com/group/delphichromiumembedded
*
* Embarcadero Technologies, Inc is not permitted to use or redistribute
* this source code without explicit permission.
*
*)

program FMXExternalPumpBrowser;

{$I cef.inc}

uses
{$IFDEF DELPHI17_UP}
System.StartUpCopy,
{$ENDIF}
FMX.Forms,
uCEFApplication,
uCEFFMXWorkScheduler,
uFMXExternalPumpBrowser in 'uFMXExternalPumpBrowser.pas' {FMXExternalPumpBrowserFrm},
uFMXApplicationService in 'uFMXApplicationService.pas';

{$R *.res}

begin
CreateGlobalCEFApp;

if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
Application.CreateForm(TFMXExternalPumpBrowserFrm, FMXExternalPumpBrowserFrm);
Application.Run;

// The form needs to be destroyed *BEFORE* stopping the scheduler.
FMXExternalPumpBrowserFrm.Free;

GlobalFMXWorkScheduler.StopScheduler;
end;

DestroyGlobalCEFApp;
DestroyGlobalFMXWorkScheduler;
end.
Loading

0 comments on commit 28ed9e7

Please sign in to comment.