You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-22 22:17:48 +02:00
Added support for Lazarus/FPC (windows 32bit)
This commit is contained in:
@ -10,7 +10,7 @@
|
||||
// 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.
|
||||
// Copyright � 2018 Salvador Diaz Fau. All rights reserved.
|
||||
//
|
||||
// ************************************************************************
|
||||
// ************ vvvv Original license and comments below vvvv *************
|
||||
@ -37,6 +37,10 @@
|
||||
|
||||
unit uCEFTypes;
|
||||
|
||||
{$IFDEF FPC}
|
||||
{$MODE OBJFPC}{$H+}
|
||||
{$ENDIF}
|
||||
|
||||
{$IFNDEF CPUX64}
|
||||
{$ALIGN ON}
|
||||
{$MINENUMSIZE 4}
|
||||
@ -235,11 +239,15 @@ type
|
||||
PNativeUInt = ^NativeUInt;
|
||||
NativeInt = Integer;
|
||||
uint16 = Word;
|
||||
{$IFDEF FPC}
|
||||
ustring = type UnicodeString;
|
||||
{$ELSE}
|
||||
ustring = type WideString;
|
||||
{$ENDIF}
|
||||
rbstring = type AnsiString;
|
||||
{$ELSE}
|
||||
ustring = type string;
|
||||
rbstring = type RawByteString;
|
||||
ustring = type string;
|
||||
rbstring = type RawByteString;
|
||||
{$IFNDEF DELPHI15_UP}
|
||||
NativeUInt = Cardinal;
|
||||
PNativeUInt = ^NativeUInt;
|
||||
@ -1289,7 +1297,6 @@ type
|
||||
// /include/capi/cef_extension_handler_capi.h (cef_extension_handler_t)
|
||||
TCefExtensionHandler = record
|
||||
base : TCefBaseRefCounted;
|
||||
|
||||
on_extension_load_failed : procedure(self: PCefExtensionHandler; result: TCefErrorcode); stdcall;
|
||||
on_extension_loaded : procedure(self: PCefExtensionHandler; extension: PCefExtension); stdcall;
|
||||
on_extension_unloaded : procedure(self: PCefExtensionHandler; extension: PCefExtension); stdcall;
|
||||
|
Reference in New Issue
Block a user