SLNKDWF.About Sleep method erbij

svn path=/Slnkdwf/trunk/; revision=20547

SlnkDWFCom/About.cpp

@@ -112,3 +112,11 @@ STDMETHODIMP CAbout::get_usTimer(DOUBLE* pVal)
 
 	return S_OK;
 }
+
+// Handig voor sommige load-tests
+STDMETHODIMP CAbout::Sleep(LONG pVal)
+{
+	::Sleep(pVal);
+
+	return S_OK;
+}

SlnkDWFCom/About.h

@@ -48,6 +48,7 @@ public:
 	STDMETHOD(get_VersionMinor)(LONG* pVal);
 	STDMETHOD(get_VersionString)(BSTR* pVal);
 	STDMETHOD(get_usTimer)(DOUBLE* pVal);
+	STDMETHOD(Sleep)(LONG pVal);
 };
 
 OBJECT_ENTRY_AUTO(__uuidof(About), CAbout)

SlnkDWFCom/SLNKDWF.idl

@@ -123,6 +123,7 @@ interface IAbout : IDispatch{
 	[propget, id(6), helpstring("property VersionMinor")] HRESULT VersionMinor([out, retval] LONG* pVal);
 	[propget, id(7), helpstring("property VersionString")] HRESULT VersionString([out, retval] BSTR* pVal);
 	[propget, id(8), helpstring("property usTimer")] HRESULT usTimer([out, retval] DOUBLE* pVal);
+	[id(9), helpstring("method Sleep")] HRESULT Sleep([in] LONG millisec);
 };
 [
 	object,