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

Fixed compiler warnings in Delphi 7 with string type conversions

Browse Source 
- Added TCefFastDomVisitor3
This commit is contained in:
Salvador Díaz Fau
2020-06-20 16:10:29 +02:00
parent 32ea814c9c
commit ef2277fe6c
5 changed files with 52 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
source/uCEFApplicationCore.pas
View File

@@ -317,7 +317,7 @@ type
function CheckCEFLibrary : boolean;
procedure RegisterWidevineCDM;
{$IFDEF MSWINDOWS}
function FindFlashDLL(var aFileName : string) : boolean;
function FindFlashDLL(var aFileName : ustring) : boolean;
{$ENDIF}
procedure ShowErrorMessageDlg(const aError : string); virtual;
procedure UpdateSupportedSchemes(aIncludeDefaults : boolean = True); virtual;
@@ -1355,10 +1355,10 @@ begin
end;
{$IFDEF MSWINDOWS}
function TCefApplicationCore.FindFlashDLL(var aFileName : string) : boolean;
function TCefApplicationCore.FindFlashDLL(var aFileName : ustring) : boolean;
var
TempSearchRec : TSearchRec;
TempProductName, TempPath : string;
TempProductName, TempPath : ustring;
begin
Result := False;
aFileName := '';
@@ -1593,7 +1593,7 @@ var
i : integer;
{$IFDEF MSWINDOWS}
TempVersionInfo : TFileVersionInfo;
TempFileName : string;
TempFileName : ustring;
{$ENDIF}
begin
if (commandLine <> nil) and (FProcessType = ptBrowser) and (processType = '') then