怎么判断自身的程序时候聚焦？(30分)

L

liuyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #1

怎么判断自身的程序时候聚焦？就是程序一聚焦，我按组合键alt+s 就可以让当前程序的窗口<br>最大化

 

W

windbell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #2

聚焦?是不是获得输入焦点?

 

V

vc3000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #3

在Form的OnActive事件里加代码就可以了！<br>Use OnActivate to perform special processing when<br>&nbsp;the form receives focus. A form becomes active when <br>focus is transferred to it (when the user clicks on<br>&nbsp;the form, for example).

 

L

liuyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #4

to &nbsp;all<br>就是在不同程序中切换的时候,当我做的程序获得焦点的时候,按ALT+S能使程序最大化

 

人

人在昆明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-26

• #5

hook 窗体的active 时间，如果是你的程序就赶你的事情去吧！

 

W

windbell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-27

• #6

在主form上增加一个popmenu组件，在其中加入一个子菜单并在它的事件中加入以下代码：<br>&nbsp;if form1.WindowState&lt;&gt;wsMaximized then showwindow(handle,SW_MAXIMIZE)<br>&nbsp;else showwindow(handle,SW_NORMAL)<br>此代码是实现当窗口最大化时转为正常，不最大化时最大化。<br>然后在该子菜单项的shortcut属性中加入Alt-S(可以手工输入),最后将form的popmenu属性<br>高为该组件的名称就可以了。

 

L

ljy_17

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-27

• #7

樓主你問的問題我有點不明白…<br>如果判斷一個窗口是否聚焦可以試著用if form1.Focused then來判斷…<br>如果判斷整個程序是否聚焦可以用API：GetActiveWindow來判斷…<br>

 

L

liuyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-29

• #8

多人接受答案了。