FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for CA-Clipper Retrieving all the open windows' titles
Posts: 21
Joined: Wed Nov 23, 2005 12:24 AM
Retrieving all the open windows' titles
Posted: Wed Dec 20, 2006 08:37 PM

Good day

I remember seeing somewhere a sample of code that retrieves all the open windows' title text. I just don't remember how to do it or where it was. If anyone has code I would appreciate it.

TIA

MD'Andrea

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Retrieving all the open windows' titles
Posted: Wed Dec 20, 2006 09:08 PM
Here it is:

#include "Fivewin.ch"


#define GW_HWNDFIRST 0
#define GW_HWNDLAST  1
#define GW_HWNDNEXT  2
#define GW_HWNDPREV  3
#define GW_OWNER     4
#define GW_CHILD     5


FUNCTION MAIN()

    LOCAL hWnd := GETFOREGROUNDWINDOW()

    WHILE hWnd != 0
        IF GETWINDOW( hWnd, GW_OWNER ) = 0 .AND. ISWINDOWVISIBLE( hWnd ) .AND. !EMPTY( GETWINDOWTEXT( hWnd ) )
            ? GETWINDOWTEXT( hWnd )
        ENDIF

        hWnd = GETWINDOW( hWnd, GW_HWNDNEXT )
    ENDDO

    RETURN NIL


DLL32 STATIC FUNCTION GETFOREGROUNDWINDOW() AS LONG;
      PASCAL FROM "GetForegroundWindow" LIB "user32.dll"


EMG
Posts: 21
Joined: Wed Nov 23, 2005 12:24 AM
Retrieving all the open windows' titles
Posted: Fri Dec 22, 2006 02:42 AM

Thank you !

Continue the discussion