pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00
Code Issues Actions Releases Activity

Update to CEF 117.1.4

Browse Source
This commit is contained in:
salvadordf
2023-09-24 11:21:05 +02:00
parent 1e5d96f16e
commit 8979dc8078
32 changed files with 1324 additions and 341 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
source/uCEFWorkSchedulerQueueThread.pas
View File

@@ -119,7 +119,7 @@ begin
Result := 0;
if Lock then
begin
try
TempLen := length(FValues);
if (TempLen > 0) then
@@ -137,7 +137,7 @@ begin
Finalize(TempNewValues);
end;
end;
finally
Unlock;
end;
end;
@@ -147,13 +147,13 @@ begin
Result := False;
if Lock then
begin
try
if not(Terminated) and not(FStop) then
begin
FWaiting := False;
Result := (Length(FValues) > 0);
end;
finally
Unlock;
end;
end;
@@ -161,7 +161,7 @@ end;
procedure TCEFWorkSchedulerQueueThread.StopThread;
begin
if Lock then
begin
try
FStop := True;
if FWaiting then
@@ -169,7 +169,7 @@ begin
FWaiting := False;
FEvent.SetEvent;
end;
finally
Unlock;
end;
end;