After searching for a long time, I thought it was a signature issue. No. Control signature and code security are two concepts.
After searching for CB for a long time, I found that I could use IObjectSafety. So I wanted to find the relevant Delphi code, but I didn't find it. I checked the help documentation and didn't even explain the node. The brute-force command also inherits IObjectSafety from com, prompting that the two methods are not implemented. Thank you! Check the original code and write down the implementation. Compile. If no result is returned, return result: = s_ OK;
Compiled, passed! Open the HTML of the test and the result passes! Function tditchestree. getinterfacesafetyoptions (const IID: tiid;
Pdwsupportedoptions, pdwenabledoptions: pdword): hresult;
Begin
Result: = s_ OK;
End;
Function tditchestree. setinterfacesafetyoptions (const IID: tiid;
Dwoptionsetmask, dwenabledoptions: DWORD): hresult;
Begin
Result: = s_ OK;
End;