ポインタとByRef引数
Posted: 2005年12月27日(火) 15:32
コード: 全て選択
Sub test(ByRef l As LONG_PTR)
l=&H12345678
End Sub
Dim a As *LONG_PTR
a=calloc(SizeOf(LONG_PTR))
test(a[0])
free(a)
確認お願いします。[Ver 4.13.00]
※DWord型などではOK、VoidPtrなどはNG。
コード: 全て選択
Dim a As *LONG_PTR,b As LONG_PTR
a=calloc(SizeOf(LONG_PTR))
b=a[0]
free(a)