🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.visualbasic
Article #1441

Re: コントロールの削除

#1441
From: Sato Masahiro
Date: Thu, 18 Sep 1997 00:00
26 lines
1299 bytes

In article <01bcc3eb$5cf7b600$4cc3e6ca@ikebu.sanmedia.or.jp>, ikebu@sanmedia.or.jp says...
>$B<ALd$J$s$G$9$,!"%"%W%j%1!<%7%g%s<B9TESCf$G!"%3%s%H%m!<%k$r:o=|$9$k$3$H$O(B
>$B2DG=$J$N$G$7$g$&$+!)(B

$B2DG=$G$9!#!V%3%s%H%m!<%kG[Ns!W$rMQ$$$^$9!#(B

>$B$b$&0l$D<ALd$G$9!#(B
>$B0JA0!"(BBeginPath$B$H(BEndPath$B$H(BPathToRegion$B$H$$$&(BAPI$B4X?t$r;H$C$F!"Nc$($P!"!V$"!W(B
>$B$H$$$&7A$N(BForm$B$,:n$l$k$H$$$&$N$r8+$?$s$G$9$,!"$I$&$9$k$N$G$7$g$&$+!)(B

Win32 API $B$N(B SetWindowRgn $B4X?t$r;HMQ$7$F$$$k$N$@$H;W$$$^$9!#(B

$BNc(B: $B4]$$%U%)!<%`$rI=<((B
Private Sub Form_Load()
    Long hRgn

    hRgn = CreateEllipticRgn(0, 0, 100, 100) '$B%j!<%8%g%s$N:n@.(B
    SetWindowRgn hWnd, hRgn, False '$B%&%#%s%I%&%j!<%8%g%s$N@_Dj(B
End Sub

$B>\$7$/$O;29M=q$GD4$Y$F$_$F$/$@$5$$!#(B

-- 
$B:4F#@59((B <masahiro@cij.co.jp>
Technical Details
Message-ID: <5vqp8r$i66@cij-gw.ykhm.cij.co.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <01bcc3eb$5cf7b600$4cc3e6ca@ikebu.sanmedia.or.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 105c2e,484afb7ab286900d
X-Google-Attributes: gid105c2e,public
From: masahiro@cij.co.jp (Sato Masahiro)
Subject: Re: コントロールの削除
Date: 1997/09/18
Message-ID: <5vqp8r$i66@cij-gw.ykhm.cij.co.jp>
X-Deja-AN: 273506716
References: <01bcc3eb$5cf7b600$4cc3e6ca@ikebu.sanmedia.or.jp>
Organization: CIJ
Newsgroups: fj.lang.visualbasic