🚀 go-pugleaf

In article <60qc1s$7qd@news.aif.or.jp>, niimura@geocities.co.jp says...
>>PlaySound "\Resources\ABC.WAV", 0, SND_FILENAME
>API$B$N!"Dj5AJ}K!$r65$($FD:$1$?$i9,$$$G$9!#(B
>$B!J(BDeclare$B%9%F!<%H%a%s%H$r;H$&$O$:!K(B

Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" _
  (ByVal lpszName As String, ByVal hModule As Long, _
  ByVal fdwSound As Long) As Long

$B$H$J$k$H;W$$$^$9!#(B

>$B<ALd$N$7$+$?$,0-$+$C$?$+$b$7$l$^$;$s!#(B
>bitblt$B$r;H$C$F!"3($rF0$+$9J}K!$r65$($FD:$1$?$i9,$$$G$9!#(B

 $B$b$7(B Visual Basic $B$N%5%s%W%k$K(B CALLDLLS $B$H$$$&%W%m%0%i%`$,IUB0$7$F$$$k(B
$B$J$i$P!"$3$A$i$K(B BitBlt $B4X?t$rMQ$$$F3($rF0$+$9%5%s%W%k$,5-=R$5$l$F$$$?$H(B
$B5-21$7$F$$$^$9$N$G!";29M$K$5$l$F$O$$$+$,$G$7$g$&$+!#(B

 $B$J$*!"(BBitBlt $B4X?t$N;HMQNc$O!"0J2<$NDL$j$G$9!#(B

$BNc(B: $B%T%/%A%c%\%C%/%9%3%s%H%m!<%k$KI=<($5$l$F$$$k3($r%U%)!<%`$KI=<($9$k(B
'$BCm(B: Picture1 $B$N(B AutoRedraw $B%W%m%Q%F%#$O(B True $B$K$9$k$3$H!#(B

'$BE>Aw@h:BI8(B
Const DestLeft As Long = 0
Const DestTop As Long = 0
Const DestWidth As Long = 200
Const DestHeight As Long = 200

'$BE>Aw85:BI8(B
Const SrcX As Long = 0
Const SrcY As Long = 0

Const SRCCOPY = &HCC0020 '$B$=$N$^$^IA2h(B
Const SRCPAINT = &HEE0086 '$B%S%C%H$4$H$N(BOR
Const SRCAND = &H8800C6 '$B%S%C%H$4$H$N(BAND

BitBlt Form1.hDC, DestLeft, DestTop, DestWidth, DestHeight, _
    Picture1.hDC, SrcX, SrcY, SRCCOPY


Form1.hDC $B$H(B Picture1.hDC $B$N$+$o$j$K!"(BPicture2.hDC $B$H(B Form1.hDC $B$r(B
$BMQ$$$F!"IA2h@h$N%$%a!<%8$rJ]B8$9$k$3$HEy$b2DG=$G$9!#(B

-- 
$B:4F#@59((B <masahiro@cij.co.jp>