Skip to content

Commit

Permalink
important bugfix: missing brackets
Browse files Browse the repository at this point in the history
  • Loading branch information
dliw committed Aug 28, 2014
1 parent 5392eb4 commit 7855622
Show file tree
Hide file tree
Showing 2 changed files with 25 additions and 25 deletions.
4 changes: 2 additions & 2 deletions cef3own.pas
Original file line number Diff line number Diff line change
Expand Up @@ -2986,7 +2986,7 @@ procedure TCefStringMapOwn.Clear;

constructor TCefStringMapOwn.Create;
begin
FStringMap := cef_string_map_alloc;
FStringMap := cef_string_map_alloc();
end;

destructor TCefStringMapOwn.Destroy;
Expand Down Expand Up @@ -3059,7 +3059,7 @@ procedure TCefStringMultimapOwn.Clear;

constructor TCefStringMultimapOwn.Create;
begin
FStringMap := cef_string_multimap_alloc;
FStringMap := cef_string_multimap_alloc();
end;

destructor TCefStringMultimapOwn.Destroy;
Expand Down
46 changes: 23 additions & 23 deletions cef3ref.pas
Original file line number Diff line number Diff line change
Expand Up @@ -1058,7 +1058,7 @@ procedure TCefBrowserRef.GetFrameNames(names : TStrings);
i : Integer;
str : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
PCefBrowser(FData)^.get_frame_names(FData, list);

Expand Down Expand Up @@ -1264,7 +1264,7 @@ procedure TCefBrowserHostRef.RunFileDialog(mode : TCefFileDialogMode;
begin
t := CefString(title);
f := CefString(defaultFileName);
list := cef_string_list_alloc;
list := cef_string_list_alloc();

try
For i := 0 to acceptTypes.Count - 1 do
Expand Down Expand Up @@ -1350,7 +1350,7 @@ procedure TCefCommandLineRef.GetArgv(argv : TStrings);
i : Integer;
str : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
PCefCommandLine(FData)^.get_argv(FData, list);
FillChar(str, SizeOf(str), 0);
Expand Down Expand Up @@ -1436,7 +1436,7 @@ procedure TCefCommandLineRef.GetArguments(arguments : TStrings);
i : Integer;
str : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
PCefCommandLine(FData)^.get_arguments(FData, list);
FillChar(str, SizeOf(str), 0);
Expand Down Expand Up @@ -1474,12 +1474,12 @@ class function TCefCommandLineRef.UnWrap(data : Pointer) : ICefCommandLine;

class function TCefCommandLineRef.New : ICefCommandLine;
begin
Result := UnWrap(cef_command_line_create);
Result := UnWrap(cef_command_line_create());
end;

class function TCefCommandLineRef.Global : ICefCommandLine;
begin
Result := UnWrap(cef_command_line_get_global);
Result := UnWrap(cef_command_line_get_global());
end;

{ TCefContextMenuParamsRef }
Expand Down Expand Up @@ -1578,7 +1578,7 @@ procedure TCefCookieManagerRef.SetSupportedSchemes(schemes : TStrings);
i : Integer;
item : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
If (schemes <> nil) then
For i := 0 to schemes.Count - 1 do
Expand Down Expand Up @@ -1673,7 +1673,7 @@ class function TCefCookieManagerRef.UnWrap(data : Pointer) : ICefCookieManager;

class function TCefCookieManagerRef.Global : ICefCookieManager;
begin
Result := UnWrap(cef_cookie_manager_get_global_manager);
Result := UnWrap(cef_cookie_manager_get_global_manager());
end;

class function TCefCookieManagerRef.New(const path : ustring; persistSessionCookies : Boolean) : ICefCookieManager;
Expand All @@ -1692,7 +1692,7 @@ procedure TCefFileDialogCallbackRef.Cont(filePaths : TStrings);
i : Integer;
item : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
For i := 0 to filePaths.Count - 1 do
begin
Expand Down Expand Up @@ -2194,7 +2194,7 @@ function TCefDragDataRef.GetFileNames(names: TStrings): Boolean;
i : Integer;
str : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
Result := PCefDragData(FData)^.get_file_names(FData, list) <> 0;
FillChar(str, SizeOf(str), 0);
Expand Down Expand Up @@ -2850,7 +2850,7 @@ class function TCefRequestRef.UnWrap(data : Pointer) : ICefRequest;

class function TCefRequestRef.New : ICefRequest;
begin
Result := UnWrap(cef_request_create);
Result := UnWrap(cef_request_create());
end;

{ TCefPostDataRef }
Expand Down Expand Up @@ -2906,7 +2906,7 @@ class function TCefPostDataRef.UnWrap(data : Pointer) : ICefPostData;

class function TCefPostDataRef.New : ICefPostData;
begin
Result := UnWrap(cef_post_data_create);
Result := UnWrap(cef_post_data_create());
end;

{ TCefPostDataElementRef }
Expand Down Expand Up @@ -2962,7 +2962,7 @@ class function TCefPostDataElementRef.UnWrap(data : Pointer) : ICefPostDataEleme

class function TCefPostDataElementRef.New : ICefPostDataElement;
begin
Result := UnWrap(cef_post_data_element_create);
Result := UnWrap(cef_post_data_element_create());
end;

{ TCefRequestContextRef }
Expand Down Expand Up @@ -3110,7 +3110,7 @@ class function TCefResponseRef.UnWrap(data : Pointer) : ICefResponse;

class function TCefResponseRef.New : ICefResponse;
begin
Result := UnWrap(cef_response_create);
Result := UnWrap(cef_response_create());
end;

{ TCefSchemeRegistrarRef }
Expand Down Expand Up @@ -3241,7 +3241,7 @@ class function TCefTaskRunnerRef.GetForThread(const ThreadID : TCefThreadID) : I

class function TCefTaskRunnerRef.GetForCurrentThread : ICefTaskRunner;
begin
Result := UnWrap(cef_task_runner_get_for_current_thread);
Result := UnWrap(cef_task_runner_get_for_current_thread());
end;

{ TCefUrlRequestRef }
Expand Down Expand Up @@ -3396,12 +3396,12 @@ class function TCefv8ContextRef.UnWrap(data : Pointer) : ICefv8Context;

class function TCefv8ContextRef.Current : ICefv8Context;
begin
Result := UnWrap(cef_v8context_get_current_context);
Result := UnWrap(cef_v8context_get_current_context());
end;

class function TCefv8ContextRef.Entered : ICefv8Context;
begin
Result := UnWrap(cef_v8context_get_entered_context);
Result := UnWrap(cef_v8context_get_entered_context());
end;

{ TCefv8HandlerRef }
Expand Down Expand Up @@ -3701,7 +3701,7 @@ function TCefv8ValueRef.GetKeys(const keys : TStrings) : Integer;
i : Integer;
item : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
Result := PCefV8Value(FData)^.get_keys(FData, list);
FillChar(item, SizeOf(item), 0);
Expand Down Expand Up @@ -3794,12 +3794,12 @@ class function TCefv8ValueRef.UnWrap(data : Pointer) : ICefv8Value;

class function TCefv8ValueRef.NewUndefined : ICefv8Value;
begin
Result := UnWrap(cef_v8value_create_undefined);
Result := UnWrap(cef_v8value_create_undefined());
end;

class function TCefv8ValueRef.NewNull : ICefv8Value;
begin
Result := UnWrap(cef_v8value_create_null);
Result := UnWrap(cef_v8value_create_null());
end;

class function TCefv8ValueRef.NewBool(value : Boolean) : ICefv8Value;
Expand Down Expand Up @@ -4023,7 +4023,7 @@ function TCefDictionaryValueRef.GetKeys(const keys : TStrings) : Boolean;
i : Integer;
item : TCefString;
begin
list := cef_string_list_alloc;
list := cef_string_list_alloc();
try
Result := PCefDictionaryValue(FData)^.get_keys(FData, list) <> 0;
FillChar(item, SizeOf(item), 0);
Expand Down Expand Up @@ -4186,7 +4186,7 @@ class function TCefDictionaryValueRef.UnWrap(data : Pointer) : ICefDictionaryVal

class function TCefDictionaryValueRef.New : ICefDictionaryValue;
begin
Result := UnWrap(cef_dictionary_value_create);
Result := UnWrap(cef_dictionary_value_create());
end;

{ TCefListValueRef }
Expand Down Expand Up @@ -4322,7 +4322,7 @@ class function TCefListValueRef.UnWrap(data : Pointer) : ICefListValue;

class function TCefListValueRef.New : ICefListValue;
begin
Result := UnWrap(cef_list_value_create);
Result := UnWrap(cef_list_value_create());
end;

{ TCefWebPluginInfoRef }
Expand Down

0 comments on commit 7855622

Please sign in to comment.