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

Added IsCEFSubprocess

Browse Source 
Added more XML documentation.
This commit is contained in:
salvadordf
2024-01-15 17:11:40 +01:00
parent 805be3e780
commit a3b19dd290
4 changed files with 16 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
source/uCEFMiscFunctions.pas
View File

@ -796,7 +796,14 @@ function CefGetDataURI(aData : pointer; aSize : integer; const aMimeType : ustri
function ValidCefWindowHandle(aHandle : TCefWindowHandle) : boolean;
procedure InitializeWindowHandle(var aHandle : TCefWindowHandle);
/// <summary>
/// Returns a command line switch value if it exists.
/// </summary>
function GetCommandLineSwitchValue(const aKey : string; var aValue : ustring) : boolean;
/// <summary>
/// Returns true if the command line switch has a "type" value.
/// </summary>
function IsCEFSubprocess : boolean;
implementation
@ -3359,4 +3366,11 @@ begin
dec(i);
end;
function IsCEFSubprocess : boolean;
var
TempValue : ustring;
begin
Result := GetCommandLineSwitchValue('type', TempValue) and (length(TempValue) > 0);
end;
end.