🚀 go-pugleaf

Takeshi Maruyama wrote:
> 
> $B$O$8$a$^$7$F4];3$H?=$7$^$9!#(B
> 
> $B#V#B$H#V#C$N=i?4<T$G$9!#(B
> VisualC$B$G:n$C$?#D#L#L$r(BVisualBasic$B$+$i8F$S=P$9$H$-$K!"(BVisualBasic$B$+$i0z(B
> $B?t$H$7$F(B
> $BG[Ns$NJQ?t$rEO$7$?$$$N$G$9$,$&$^$/$$$-$^$;$s!#(B
> 
> $B#V#B#5$N%W%m%0%i%`(B
> 
> Private Declare Function DllTestMsg Lib "Dllapp.DLL" (ByVal hWnd As
> Integer, ByRef no() As Integer) As Integer


> 
> $B#V#C#5$N%W%m%0%i%`(B
> #include <windows.h>
> #include <stdlib.h>
> 
> 
> BOOL WINAPI DllTestMsg(HWND hWnd, int *msg_no)
> {
> }
> 

ByRef no() As Integer

$B$O!"#C%W%m%0%i%`$G8@$&$H$3$m$N@0?tG[Ns$X$N%]%$%s%?$N$h$&$J(B
$B0UL#$K$J$j$^$9!#!JC"$7$3$N@0?t$O#1#6%S%C%H!K(B

$B$3$&$7$?>l9g#C%$%s%?%U%'!<%9$O(B 
BOOL WINAPI DllTestMsg(HWND hWnd, short **msg_no);

$B$H$J$k$3$H$,M=A[$5$l$^$9!#!JF0:n$OL$3NG'!K(B

$BDL>o$O#V#BB&$NDj5A$r(B

(ByVal hWnd As Long, ByRef no As Long)

$B#CB&$NDj5A$r(B

(HWND hWnd, LONG lpArray[])

#$B!!;d$OG[Ns$,EO$5$l$k>l9g$K$O(B *lpArray $B$h$j$b(B lpArray[] $B$N5-K!(B
#$B!!$r9%$s$G;H$$$^$9!#(B

$B$H$7!"#V#BB&$N8F$S=P$7$r(B

Dim no(10)

RetCode = DllTestMsg(hWnd, no(0))

$B$H$7$F!"G[Ns$NMWAG$N%"%I%l%9$rEO$7$^$9!#(B


$BO7GL?4$J$,$i!"#3#2%S%C%H4D6-$G$"$C$F$b#V#B$N(B Integer $B$O#1#6%S%C%H!"(B
$B#C$N(B int $B$O#3#2%S%C%H$H$J$j!"%5%$%:$,0[$J$j$^$9!#(B
$B#C$K$D$$$F$b=i?4<T$G$"$k$H$$$&;v$G$"$l$P%]%$%s%?$N%]%$%s%?$O$J$k$Y$/(B
$BHr$1$F!"#13,$N%]%$%s%?$G$G$-$k$h$&$K$7$?$[$&$,4V0c$$$,>/$J$$$G$7$g$&!#(B
$B$^$?!"#V#C#5B&$G$O#D#E#F%U%!%$%k$,I,?\$G$9!#(B