庖丁坊

南来北往间 冬去春来时

如何获取Windows应用程序列表

来自:唐细刚的专栏

http://blog.csdn.net/tanaya/archive/2004/08/11/71041.aspx

Windows任务管理器的应用程序栏包含任务窗口的列表。要获取此列表,窗口必须满足以下几个条件:

(1) 必须可见
(2)
包含一个标题
(3) 不能被其他窗口包含

下面我给出源程序和调用示例:

VC++源代码(使用VC6):

//获取任务列表且添加到列表框中.
BOOL GetAppList(CListBox &LstBox)
{
  CString strCaption;
  LstBox.ResetContent();
  ASSERT_VALID(AfxGetMainWnd());
  CWnd *pWnd=AfxGetMainWnd()->GetWindow(GW_HWNDFIRST);
  if(pWnd==NULL) return FALSE;
  while(pWnd)
  {
   if(pWnd->IsWindowVisible() && pWnd->GetWindowTextLength() && !pWnd->GetOwner())
     {
       pWnd->GetWindowText(strCaption);
       LstBox.AddString(strCaption);
     }
   pWnd=pWnd->GetWindow(GW_HWNDNEXT);
  }
  return TRUE;
}

//调用示例:
void CGetAppListDlg::OnGetAppList()
{
   GetAppList(m_ListBox1);
}


VB源代码(使用VB6,具体调用很简单,我就不写了)

Option Explicit
Private Declare Function GetWindowLongPtr Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long

Private Const GW_OWNER = 4
Private Const GWL_EXSTYLE = (-20)

Private Const WS_EX_TOOLWINDOW = &H80
Private Const WS_EX_APPWINDOW = &H40000

//判断窗口是否为任务应用函数,参数为窗口句柄
Public Function IsTaskbarApp(ByVal hwnd As Long) As Boolean
  Dim ExtendStyle As Long
  Dim hParent As Long
  Dim BoolIsTaskBarApp As Boolean
  ExtendStyle = GetWindowLongPtr(hwnd, GWL_EXSTYLE)
  hParent = GetParent(hwnd)
  BoolIsTaskBarApp = CBool((IsWindowVisible(hwnd) <> 0) And _
                    (GetWindow(hwnd, GW_OWNER) = 0) And _
                    (hParent = 0 Or hParent = GetDesktopWindow())) 
  If (ExtendStyle And WS_EX_TOOLWINDOW) Then BoolIsTaskBarApp = False 
  If (ExtendStyle And WS_EX_APPWINDOW) Then BoolIsTaskBarApp = True
  IsTaskbarApp = BoolIsTaskBarApp
End Function


 *-------------------------------------------*
 *     转载请注明出处
 *     作者:唐细刚
 *     邮箱:
tanaya@163.com
 *-------------------------------------------*

阅读更多
个人分类: 技术
想对作者说点什么? 我来说一句

android获取应用程序的权限列表

2014年12月04日 1.6MB 下载

Android中获取应用程序列表信息

2014年02月27日 163KB 下载

应用列表以及权限列表

2015年04月28日 2.39MB 下载

没有更多推荐了,返回首页

不良信息举报

如何获取Windows应用程序列表

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭