|
ｿｽｿｽVBｿｽｿｽｿｽSｿｽﾒ掲ｿｽｿｽｿｽｿｽ(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
|
SetForegroundWindowｿｽﾅアｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾈゑｿｽｿｽ鼾ｿｽﾉは？
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽｿｽｿｽUｿｽｿｽｿｽｿｽﾜゑｿｽ驍､ 2004/02/10(ｿｽｿｽ) 10:14:52
ｿｽｿｽｿｽｿｽｿｽﾆ…ｿｽｿｽｿｽ竄ｷｿｽ髑､ｿｽｿｽ(ｿｽｿｽ)
APIｿｽｿｽSetForegroundWindowｿｽｿｽｿｽﾇゑｿｽｿｽﾉゑｿｽLｿｽｿｽｿｽﾅなゑｿｽｿｽｿｽｿｽﾌ会ｿｽｿｽｿｽｿｽｿｽ@ｿｽｿｽ
ｿｽﾇなゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽmｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽHｿｽBｿｽﾇ状が再鯉ｿｽｿｽｿｽｿｽｿｽﾅ擾ｿｽｿｽﾌコｿｽ[ｿｽhｿｽc
ｿｽﾆゑｿｽｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾇ…ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌで再鯉ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽSｿｽｿｽｿｽｿｽｿｽiｿｽTｿｽCｿｽBｿｽ{ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽQｿｽｿｽﾚでアｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽcｿｽﾈんかボｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾈゑｿｽｿｽcｿｽｿｽｿｽﾄどゑｿｽｿｽｿｽｿｽ謔､ｿｽｿｽﾈゑｿｽｿｽｿｽｿｽc
ｿｽｿｽｿｽﾌコｿｽ[ｿｽhｿｽﾅはエｿｽNｿｽZｿｽｿｽｿｽgｿｽｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽFormｿｽ利用ｿｽｿｽｿｽｿｽ
ｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽShowｿｽｿｽｿｽﾄゑｿｽHideｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾏゑｿｽｿｽﾈゑｿｽｿｽﾆゑｿｽｿｽｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽB.NETｿｽﾈゑｿｽvｿｽｿｽｿｽpｿｽeｿｽBｿｽｿｽTopMostｿｽｿｽｿｽｿｽｿｽｿｽﾌでまゑｿｽｿｽﾈゑｿｽﾆゑｿｽ
ｿｽcｿｽｿｽAPIｿｽｿｽSetWindowPosｿｽｿｽTopMostｿｽﾝ抵ｿｽcｿｽOｿｽﾊには出ｿｽﾄゑｿｽｿｽｿｽｿｽ
ｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽﾏゑｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾈゑｿｽｿｽBｿｽｿｽｿｽｿｽﾌ搾ｿｽﾆゑｿｽｿｽｿｽ
PublicSubSetForegroundApp(ByValHandleXAsLong)
SetWindowPosHandleX,conHwndTopmost,0,0,0,0,conSwpNoSize+conSwpNoMove
SendKeys"%{TAB}",True
SetWindowPosHandleX,conHwndNoTopmost,0,0,0,0,conSwpNoSize+conSwpNoMove
EndSub
ｿｽcｿｽﾆゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾅゑｿｽｿｽｿｽｿｽcｿｽ謔｢ｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽ芫ｳｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
'/////////////////////////////////////////////////////////////////////////////////////////
[VB6.0(SP5)Win2000pro(SP4)]
OptionExplicit
PrivateDeclareFunctionSetForegroundWindowLib"user32.dll"(ByValhWndAsLong)AsLong
PrivatemXLAppAsExcel.Application
PrivateSubCommand1_Click()
'ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉ設抵ｿｽ
wResult=SetForegroundWindow(mXLApp.hWnd)
'DoEvents
wResult=SetForegroundWindow(Me.hWnd)
EndSub
PrivateSubForm_Load()
SetmXLApp=CreateObject("Excel.Application")
mXLApp.Workbooks.Add
mXLApp.Visible=True
Command1_Click
EndSub
PrivateSubForm_Unload(CancelAsInteger)
mXLApp.Quit
SetmXLApp=Nothing
EndSub
'/////////////////////////////////////////////////////////////////////////////////////////
'ｿｽQｿｽl
'PrivateDeclareFunctionSetWindowPosLib"user32"(ByValhWndAsLong,_
'ByValhWndInsertAfterAsLong,_
'ByValxAsLong,ByValyAsLong,_
'ByValcxAsLong,ByValcyAsLong,_
'ByValwFlagsAsLong_
')AsLong
'ConstconHwndTopmost=-1
'ConstconHwndNoTopmost=-2
'ConstconSwpNoSize=&H1
'ConstconSwpNoMove=&H2
ｿｽｿｽｿｽcｿｽVｿｽm 2004/02/10(ｿｽｿｽ) 10:47:09
ｿｽｿｽ閧ｽｿｽｿｽｿｽｿｽｿｽﾆと、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈのゑｿｽｿｽAｿｽｿｽｿｽLｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾈゑｿｽｿｽﾆ・ｿｽEｿｽE
ｿｽｿｽｿｽｿｽｿｽAｿｽRｿｽ[ｿｽhｿｽｿｽｿｽ逅ｿｽ@ｿｽｿｽｿｽｿｽﾉ、ｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉゑｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾌＶｿｽaｿｽｿｽ
ｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽAｿｽGｿｽNｿｽZｿｽｿｽｿｽﾌウｿｽBｿｽｿｽｿｽhｿｽEｿｽﾌ鯉ｿｽｿｽﾉ隠ｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽEｿｽEｿｽE
ｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽE
ｿｽｿｽｿｽ@ｿｽﾜゑｿｽｿｽｿｽｿｽｿｽWinXPｿｽﾅは、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽ@ｿｽ@ｿｽｿｽｿｽｿｽｿｽAｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽｿｽbｿｽZｿｽ[ｿｽWｿｽﾌ費ｿｽｿｽｿｽｿｽｿｽｿｽﾔと、ｿｽbｿｽoｿｽtｿｽｿｽｿｽｿｽ
ｿｽ@ｿｽ@ｿｽｿｽｿｽ¥ｿｽﾆにゑｿｽｿｽｿｽﾌではなゑｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽEｿｽEｿｽE
ｿｽｿｽｿｽｿｽｿｽﾉなるかｿｽﾇゑｿｽｿｽｿｽｿｽEｿｽEｿｽE
PrivateConstHWND_TOP=0
PrivateConstHWND_TOPMOST=-1
PrivateConstSWP_SHOWWINDOW=&H40
PrivateTypeRECT
LeftAsLong
TopAsLong
RightAsLong
BottomAsLong
EndType
PrivateDeclareFunctionSetWindowPosLib"user32"(ByValhwndAsLong,ByValhWndInsertAfterAsLong,ByValxAsLong,ByValyAsLong,ByValcxAsLong,ByValcyAsLong,ByValwFlagsAsLong)AsLong
PrivateDeclareFunctionGetWindowRectLib"user32"(ByValhwndAsLong,lpRectAsRECT)AsLong
PrivatemXLAppAsExcel.Application
PrivatertAsRECT
PrivateSubCommand1_Click()
DimwResultAsLong
wResult=GetWindowRect(mXLApp.hwnd,rt)
wResult=SetWindowPos(mXLApp.hwnd,HWND_TOPMOST,rt.Left,rt.Top,rt.Right,rt.Bottom,SWP_SHOWWINDOW)
'DoEvents
wResult=GetWindowRect(Me.hwnd,rt)
wResult=SetWindowPos(Me.hwnd,HWND_TOPMOST,rt.Left,rt.Top,(rt.Right-rt.Left),(rt.Bottom-rt.Top),SWP_SHOWWINDOW)
EndSub
ｿｽｿｽｿｽｿｽﾅはダｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽH
ｿｽﾈ擾ｿｽB
ｿｽｿｽｿｽcｿｽVｿｽm 2004/02/10(ｿｽｿｽ) 10:48:41
ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽEｿｽEｿｽEｿｽ^ｿｽCｿｽgｿｽｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽlｿｽI
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ轤ｸｿｽEｿｽEｿｽE
ｿｽﾈ擾ｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2004/02/10(ｿｽｿｽ) 10:58:21
ｿｽﾜゑｿｽｿｽASDKｿｽｿｽSetForegroundWindowｿｽﾉつゑｿｽｿｽﾄ抵ｿｽｿｽﾗてみてゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽtｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽﾝ抵ｿｽﾂ能ｿｽﾈ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
Win95/NT4ｿｽﾜでは、SetForegroundWindowｿｽｿｽｿｽｿｽｿｽﾅフｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽ
ｿｽﾘゑｿｽﾖゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽAWin98/2000ｿｽﾚ行ｿｽﾅは、ｿｽﾘゑｿｽﾖゑｿｽｿｽﾂ能ｿｽﾈプｿｽｿｽｿｽZｿｽXｿｽﾍ、
ｿｽVｿｽXｿｽeｿｽｿｽｿｽﾉゑｿｽ關ｧｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
#ｿｽｿｽｿｽjｿｽｿｽｿｽ[ｿｽIｿｽｿｽ笊ｶｿｽｿｽｿｽﾌ難ｿｽｿｽﾍ抵ｿｽｿｽﾉ、ｿｽｿｽｿｽｿｽﾉウｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽｿｽﾘゑｿｽﾖゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽA
#ｿｽｿｽﾆ抵ｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽfｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽﾆゑｿｽhｿｽｿｽｿｽｿｽｿｽﾟの仕ｿｽlｿｽﾏ更ｿｽﾅゑｿｽｿｽB
ｿｽﾅ。ｿｽｿｽｿｽｿｽｿｽﾌ暦ｿｽｿｽｿｽﾆゑｿｽｿｽﾄは、ｿｽｿｽｿｽｿｽｿｽ轤ｭｿｽｿｽｿｽｿｽﾈ奇ｿｽｿｽｿｽｿｽﾉなゑｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ闌ｳｿｽｿｽVB6ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽfｿｽoｿｽbｿｽOｿｽｿｽｿｽﾄゑｿｽｿｽ轤ｸｿｽAｿｽｿｽｿｽｿｽｿｽﾌイｿｽｿｽｿｽ[ｿｽWｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽが、ｿｽｿｽｿｽUｿｽｿｽｿｽｿｽﾜゑｿｽ驍､ｿｽｿｽｿｽｿｽﾈゑｿｽAｿｽｿｽｿｽｿｽｿｽﾍ掴めるかｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
'=========================
'ｿｽｿｽｿｽﾝｿｽｿｽ[ｿｽUｿｽ[ｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽ謫ｾ
h=GetForegroundWindow()
'ｿｽtｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽ成ｿｽｿｽｿｽｿｽｿｽXｿｽｿｽｿｽbｿｽhｿｽｿｽIDｿｽｿｽ謫ｾ
ThreadID1=GetWindowThreadProcessId(h,ByVal0&)
'ｿｽﾚ的ｿｽﾌウｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽ成ｿｽｿｽｿｽｿｽｿｽXｿｽｿｽｿｽbｿｽhｿｽｿｽIDｿｽｿｽ謫ｾ
ThreadID2=GetCurrentThreadId()
'ｿｽｿｽｿｽﾝの難ｿｽｿｽﾍ擾ｿｽﾔゑｿｽﾚ的ｿｽﾌスｿｽｿｽｿｽbｿｽhｿｽﾉアｿｽ^ｿｽbｿｽ`
AttachThreadInputThreadID2,ThreadID1,1
'ｿｽｿｽｿｽﾝゑｿｽ[ｿｽtｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽｿｽｿｽbｿｽNｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽg]ｿｽﾌ設抵ｿｽｿｽ謫ｾ
SystemParametersInfoSPI_GETFOREGROUNDLOCKTIMEOUT,0,VarPtr(buf),0
'ｿｽﾝ抵ｿｽｿｽ0msｿｽﾉ変更
SystemParametersInfoSPI_SETFOREGROUNDLOCKTIMEOUT,0,ByVal0&,0
'ｿｽ謔､ｿｽ竄ｭｿｽAｿｽ{ｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽﾌゑｿｽｿｽoｿｽﾜゑｿｽ
SetForegroundWindowhWnd
'ｿｽﾝ抵ｿｽｿｽｿｽｿｽﾉ戻ゑｿｽｿｽﾄ…
SystemParametersInfoSPI_SETFOREGROUNDLOCKTIMEOUT,0,VarPtr(buf),0
'ｿｽfｿｽ^ｿｽbｿｽ`ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽ
AttachThreadInputThreadID2,ThreadID1,0
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2004/02/10(ｿｽｿｽ) 11:06:09
GetCurrentThreadIdAPIｿｽﾌ包ｿｽｿｽｿｽｿｽﾍ、App.ThreadIDｿｽﾅ十ｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2004/2/10(ｿｽｿｽ) 11:45:06
ｿｽtｿｽｿｽｿｽUｿｽｿｽｿｽｿｽﾜゑｿｽ驍､ｿｽｿｽｿｽｿｽ
>>>>>ｿｽ{ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽQｿｽｿｽﾚでアｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽXPｿｽﾅは、ｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽB(^^;
ｿｽtｿｽｿｽｿｽｿｽ
>>ｿｽ闌ｳｿｽｿｽVB6ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽfｿｽoｿｽbｿｽOｿｽｿｽｿｽﾄゑｿｽｿｽ轤ｸ
VB6ｿｽﾅのソｿｽ[ｿｽXｿｽｿｽｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
http://www.ocv.ne.jp/‾oratorio/junk/Sample/30/SetForegroundWindow.txt
ｿｽtｿｽｿｽｿｽcｿｽVｿｽmｿｽｿｽｿｽｿｽ
>>>>ｿｽｿｽｿｽｿｽｿｽAｿｽRｿｽ[ｿｽhｿｽｿｽｿｽ逅ｿｽ@ｿｽｿｽｿｽｿｽﾉ、ｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉゑｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾌＶｿｽaｿｽｿｽ
>>>>ｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽAｿｽGｿｽNｿｽZｿｽｿｽｿｽﾌウｿｽBｿｽｿｽｿｽhｿｽEｿｽﾌ鯉ｿｽｿｽﾉ隠ｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽEｿｽEｿｽE
>>>>ｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽE
ｿｽｿｽｿｽｿｽｿｽcｿｽcｿｽﾈゑｿｽﾙど。
ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽbｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾌ回答は的ｿｽOｿｽ黷ｾｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽmｿｽｿｽﾜゑｿｽｿｽｿｽBm(__)m
ｿｽｿｽｿｽUｿｽｿｽｿｽｿｽﾜゑｿｽ驍､ 2004/02/17(ｿｽｿｽ) 14:46:21
ｿｽｿｽｿｽｿｽｿｽﾅ回答ゑｿｽｿｽﾄる時ｿｽﾍ『ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽｿｽﾈゑｿｽｿｽxｿｽcｿｽﾆゑｿｽｿｽvｿｽｿｽｿｽﾄるくｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽ竭､ｿｽﾉ会ｿｽｿｽﾆゑｿｽｿｽｿｽﾏゑｿｽﾓ図ｿｽｿｽ`ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽcｿｽ¥ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽwｿｽEｿｽﾌ通ゑｿｽ
>ｿｽｿｽｿｽｿｽｿｽAｿｽRｿｽ[ｿｽhｿｽｿｽｿｽ逅ｿｽ@ｿｽｿｽｿｽｿｽﾉ、ｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉゑｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾌＶｿｽaｿｽｿｽ
>ｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽAｿｽGｿｽNｿｽZｿｽｿｽｿｽﾌウｿｽBｿｽｿｽｿｽhｿｽEｿｽﾌ鯉ｿｽｿｽﾉ隠ｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽEｿｽEｿｽE
ｿｽｿｽｿｽﾛでゑｿｽｿｽｿｽｿｽBｿｽ{ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽPｿｽｿｽﾚは厄ｿｽｿｽﾈゑｿｽｿｽAｿｽQｿｽｿｽﾚでエｿｽNｿｽZｿｽｿｽｿｽｿｽ
ｿｽOｿｽﾊに暦ｿｽｿｽｿｽｿｽｿｽAｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽOｿｽﾊに出ｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽcｿｽ謔ｭｿｽｿｽｿｽｿｽｿｽ
ｿｽ^ｿｽXｿｽNｿｽoｿｽ[ｿｽﾅゑｿｽｿｽﾌアｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽ_ｿｽﾅゑｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽｿｽwｿｽEｿｽｿｽSetForegroundWindowｿｽﾌ仕ｿｽlｿｽﾅゑｿｽｿｽﾋ。
http://support.microsoft.com/default.aspx?scid=kb;ja;227043
ｿｽｿｽｿｽｿｽｿｽﾆは鯉ｿｽｿｽﾄゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽtｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽEｿｽBｿｽｿｽｿｽhｿｽE
ｿｽﾉなゑｿｽｿｽﾄゑｿｽﾎゑｿｽｿｽｿｽｿｽｿｽﾌと思ｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾄ詳ゑｿｽｿｽｿｽｿｽｿｽｿｽﾗてまゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽ]ｿｽkｿｽﾅゑｿｽｿｽｿｽｿｽACPUｿｽｿｽ.NETｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽ1.60GHzｿｽﾅゑｿｽｿｽB
ｿｽﾅ擾ｿｽｿｽﾌコｿｽ[ｿｽhｿｽﾅゑｿｽRｿｽ[ｿｽhｿｽｿｽｿｽCommand1_ClickｿｽｿｽJｿｽｿｽﾔゑｿｽｿｽﾄ呼んだ場合ｿｽｿｽ
ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽ閧ｵｿｽﾜゑｿｽ(ｿｽｿｽ)ｿｽBｿｽQｿｽｿｽﾚで趣ｿｽｿｽsｿｽｿｽｿｽﾄタｿｽXｿｽNｿｽoｿｽ[ｿｽﾅフｿｽHｿｽ[ｿｽｿｽｿｽｿｽ
ｿｽIｿｽｿｽｿｽｿｽOｿｽﾊに表ｿｽｿｽｿｽBｿｽcｿｽﾅ１(ｿｽR)ｿｽｿｽﾚは撰ｿｽｿｽｿｽｿｽQ(ｿｽS)ｿｽｿｽﾚで趣ｿｽｿｽs...(ｿｽ@ｿｽQ)ｿｽQ
ｿｽ{ｿｽ^ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽSetForegroundWindowｿｽﾌ１ｿｽｿｽﾚの呼び出ｿｽｿｽｿｽﾅ『ｿｽｿｽｿｽ[ｿｽUｿｽ[ｿｽｿｽ
ｿｽｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽｿｽxｿｽﾆ費ｿｽｿｽfｿｽｿｽｿｽｿｽﾄアｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽﾋ。
ｿｽｿｽｿｽcｿｽVｿｽmｿｽｿｽｿｽｿｽﾌウｿｽBｿｽｿｽｿｽhｿｽEｿｽﾌ撰ｿｽｿｽ@ｿｽｿｽ謫ｾｿｽｿｽｿｽｿｽSetWindowPosｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽB
ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽしｿｽﾜゑｿｽｿｽBｿｽﾅ擾ｿｽｿｽﾉエｿｽNｿｽZｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉエｿｽNｿｽZｿｽｿｽｿｽｿｽｿｽAｿｽNｿｽeｿｽBｿｽu
ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽtｿｽHｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽSetFocusｿｽｿｽｿｽｿｽﾎ厄ｿｽ閧ｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽtｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌゑｿｽ(ｿｽH)ｿｽｿｽｿｽｿｽﾆは擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽが会ｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽｿｽﾌフｿｽHｿｽAｿｽOｿｽｿｽｿｽEｿｽｿｽｿｽhｿｽｿｽｿｽbｿｽNｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽﾌ設抵ｿｽﾅゑｿｽ
ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽしｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
