Changeset 335 for trunk/Include/com/vbobject.ab

Timestamp:

Sep 18, 2007, 12:10:41 AM (17 years ago)

Author:

イグトランス (egtra)

Message:

SPrintF関連の追加。関数FloatToChars, FormatFloatE, FormatIntegerUと列挙体FormatFlags。

File:

• trunk/Include/com/vbobject.ab (modified) (3 diffs)

trunk/Include/com/vbobject.ab

@@ -165 +165 @@
     End Function
 
-    Sub Prop(ByRef arg As Variant)
+    Sub Prop(arg As Variant)
         Prop(ByVal arg.PtrToVariant)
     End Sub
@@ -173 +173 @@
     End Sub
 
-    Sub PropRef(ByRef arg As Variant)
-        PropRef(arg.PtrToVariant)
+    Sub PropRef(arg As Variant)
+        PropRef(ByVal arg.PtrToVariant)
     End Sub
 
@@ -297 +297 @@
 
 Function CreateObject(className As PCWSTR) As VBObject
-    Return New VBObject(className)
+    Return New VBObject(className, 0, CLSCTX_ALL)
 End Function
 
 Function CreateObject(className As String) As VBObject
-    Return New VBObject(ToWCStr(className))
+    Return New VBObject(ToWCStr(className), 0, CLSCTX_ALL)
 End Function
 /*