Mock call to TProc

[Anders Gustavsson]

I want to mock an interface like this:

IMyInterface = interface
  procedure DoSomething(AProc: TProc);
end;

Trying something like this I get lost:

var mock: Mock<IMyInterface>;
mock.Setup.Execute(
  function(const ACallInfo: TCallInfo): TValue
  begin
    <???>
  end).When.DoSomething(<someFunction>);

Is there a way to set this up by replacing the angle enclosed items with something working?

[Stefan Glienke]

ACallInfo[0].AsType<TProc> 

[Anders Gustavsson]

I guess you mean inside the anonymous method? And at the end:

...When(TArgs.Any).DoSomething(nil);

?

--
You received this message because you are subscribed to the Google Groups "Spring4D" group.
To unsubscribe from this group and stop receiving emails from it, send an email to spring4d+u...@googlegroups.com.
To view this discussion visit https://groups.google.com/d/msgid/spring4d/7e235d0a-53e8-4d03-a117-c3979fa0adb3n%40googlegroups.com.

[Stefan Glienke]

I assume that you want to mock the behavior of calling any passed TProc:

  mock.Setup.Executes(
    function (const ACallInfo: TCallInfo): TValue
    begin
      ACallInfo[0].AsType<TProc>()();
    end).When.DoSomething(Arg.IsAny<TProc>());

Yes, all the parentheses are necessary because of the way the compiler deals with functions returning callable types.

[Anders Gustavsson]

That was great! Thank you!