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

bug fix #68

Browse Source
This commit is contained in:
Salvador Díaz Fau
2017-11-25 19:04:15 +01:00
parent b54a2861c4
commit f5f1a767c9
47 changed files with 1114 additions and 851 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
source/uCEFBaseRefCounted.pas
View File

@ -55,7 +55,7 @@ type
FData: Pointer;
public
constructor CreateData(size: Cardinal; owned: Boolean = False); virtual;
constructor CreateData(size: Cardinal; owned : boolean = False); virtual;
destructor Destroy; override;
function Wrap: Pointer;
end;
@ -88,7 +88,7 @@ begin
TCefBaseRefCountedOwn(TempObject)._AddRef;
end;
function cef_base_release(self: PCefBaseRefCounted): Integer; stdcall;
function cef_base_release_ref(self: PCefBaseRefCounted): Integer; stdcall;
var
TempObject : TObject;
begin
@ -127,7 +127,7 @@ begin
Result := 1;
end;
constructor TCefBaseRefCountedOwn.CreateData(size: Cardinal; owned: Boolean);
constructor TCefBaseRefCountedOwn.CreateData(size: Cardinal; owned : boolean);
begin
GetMem(FData, size + SizeOf(Pointer));
PPointer(FData)^ := Self;
@ -144,7 +144,7 @@ begin
else
begin
PCefBaseRefCounted(FData)^.add_ref := cef_base_add_ref;
PCefBaseRefCounted(FData)^.release := cef_base_release;
PCefBaseRefCounted(FData)^.release := cef_base_release_ref;
PCefBaseRefCounted(FData)^.has_one_ref := cef_base_has_one_ref;
end;
end;