Merge pull request #108 from rpottsoh/patch-1

Not enough Params being passed

Author: vincentparrett

Tests/Delphi.Mocks.Tests.ObjectProxy.pas

@@ -79,7 +79,10 @@ procedure TTestObjectProxy.ProxyObject_Calls_The_Create_Of_The_Object_Type;
 var
   objectProxy: IProxy<TSimpleObject>;
 begin
-  objectProxy := TObjectProxy<TSimpleObject>.Create;
+  objectProxy := TObjectProxy<TSimpleObject>.Create(function: TSimpleObject
+                                                    begin 
+                                                      result := TSimpleObject.Create; 
+                                                    end);
 
   Assert.AreEqual(objectProxy.Proxy.CreateCalled, G_CREATE_CALLED_UNIQUE_ID);
 end;
@@ -88,7 +91,10 @@ procedure TTestObjectProxy.ProxyObject_MultipleConstructor;
 var
   objectProxy: IProxy<TMultipleConstructor>;
 begin
-  objectProxy := TObjectProxy<TMultipleConstructor>.Create;
+  objectProxy := TObjectProxy<TMultipleConstructor>.Create(function: TMultipleConstructor
+                                                           begin 
+                                                             result := TMultipleConstructor.Create; 
+                                                           end);
 
   Assert.AreEqual(objectProxy.Proxy.CreateCalled, G_CREATE_CALLED_UNIQUE_ID);
 end;