pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2024-11-24 08:02:15 +02:00
Code Issues Actions Releases Activity

Merge pull request #237 from ahausladen/FixParseProcessType

Browse Source 
Fix ProcessType parameter parsing
This commit is contained in:
Salvador Díaz Fau 2019-11-09 09:24:04 +01:00 committed by GitHub
commit 6b36c40664
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
source/uCEFApplication.pas
View File

@ -1379,10 +1379,10 @@ var
TempName, TempValue : string; TempName, TempValue : string;
begin begin
Result := ptBrowser; Result := ptBrowser;
i := pred(paramCount); i := paramCount;
TempLen := length(TYPE_PARAMETER_NAME); TempLen := length(TYPE_PARAMETER_NAME);
while (i >= 0) and (Result = ptBrowser) do while (i >= 1) and (Result = ptBrowser) do
begin begin
TempName := copy(paramstr(i), 1, TempLen); TempName := copy(paramstr(i), 1, TempLen);