How to get Windows / running program handle from Process ID or Title Name
Regards, Greetings
Try FWH. You will enjoy it's simplicity and power.!
Try FWH. You will enjoy it's simplicity and power.!
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour How to Get hWnd from Process ID
Try this (and thank Enrico if it works for you):
James
James
// Purpose: Find handle of window of running application
// Else returns nil
// Author : Enrico Maria Giordano
// Date : 1/10/2005
#include "Fivewin.ch"
#define GW_HWNDNEXT 2
FUNCTION MAIN()
? FINDWND( "Carrot" )
RETURN NIL
FUNCTION FINDWND( cTitle )
LOCAL hWnd := GETFOREGROUNDWINDOW()
WHILE hWnd != 0
IF GETWINDOWTEXT( hWnd ) = cTitle
RETURN hWnd
ENDIF
hWnd = GETWINDOW( hWnd, GW_HWNDNEXT )
ENDDO
RETURN NIL
DLL32 FUNCTION GETFOREGROUNDWINDOW() AS LONG;
PASCAL FROM "GetForegroundWindow" LIB "user32.dll"FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
James Bott wrote:Try this (and thank Enrico if it works for you):
James
Excellent
Thank you, Sir
I am searching hWnd from PID, How to use Linked code can be in fwh
http://stackoverflow.com/questions/11711417/get-hwnd-by-process-id-c
Regards
Regards, Greetings
Try FWH. You will enjoy it's simplicity and power.!
Try FWH. You will enjoy it's simplicity and power.!
Dave,
You can use:
FindWindow( 0, cApplication_Main_Window_Title ) --> hWnd
http://wiki.fivetechsoft.com/doku.php?id=fivewin_function_findwindow
You can use:
FindWindow( 0, cApplication_Main_Window_Title ) --> hWnd
http://wiki.fivetechsoft.com/doku.php?id=fivewin_function_findwindow
Sir,
I have to trap all the running program hWnd,
Regards, Greetings
Try FWH. You will enjoy it's simplicity and power.!
Try FWH. You will enjoy it's simplicity and power.!
Dave,
From FWH errorsys we create this way the list of the running apps, not sure if this is what you need:
From FWH errorsys we create this way the list of the running apps, not sure if this is what you need:
aTasks = GetTasks()
cErrorLog += " Windows total applications running: " + ;
AllTrim( Str( Len( aTasks ) ) ) + CRLF
for n = 1 to Len( aTasks )
cErrorLog += " " + Str( n, 3 ) + " " + aTasks[ n ] + CRLF
next