Changeset 355 for trunk/Include/basic/function.sbp

Timestamp:

Oct 13, 2007, 2:11:22 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

FormatIntegerDを実装。
UnitTestの失敗時の表示を目立つようにした。
ArrayListを名前空間System.Collectionsに入れた。

File:

• trunk/Include/basic/function.sbp (modified) (1 diff)

trunk/Include/basic/function.sbp

@@ -1019 +1019 @@
 End Function
 
+/*!
+@brief  ABオブジェクトを指すポインタをObject型へ変換。
+@author Egtra
+@date   2007/08/24
+@param[in]  p   COMインタフェースを指すポインタ
+@return Object参照型
+*/
 Function _System_PtrObj(p As VoidPtr) As Object
     SetPointer(VarPtr(_System_PtrObj), p)
+End Function
+
+/*!
+@brief  IUnknownその他COMインタフェースを指すポインタをIUnknown参照型へ変換。
+@author Egtra
+@date   2007/09/24
+@param[in]  p   COMインタフェースを指すポインタ
+@return IUnknown参照型
+*/
+Function _System_PtrUnknown(p As VoidPtr) As IUnknown
+    SetPointer(VarPtr(_System_PtrUnknown), p)
 End Function