Hi Everybody,
Is there a way from within FWH to close Ms-Excel (EXCEL.EXE) if it is running in the background?
Thanks,
Jeff
Thanks,
Jeff Barnes
(FWH 16.11, xHarbour 1.2.3, Bcc730)
Jeff Barnes
(FWH 16.11, xHarbour 1.2.3, Bcc730)
Board index FiveWin for Harbour/xHarbour close EXCEL.EXE
This is a working sample:
EMG
#include "Fivewin.ch"
FUNCTION MAIN()
IF CLOSEEXCEL()
? "Excel closed"
ENDIF
RETURN NIL
#define GW_HWNDNEXT 2
#define GW_CHILD 5
STATIC FUNCTION CLOSEEXCEL()
LOCAL hWnd := GETWINDOW( GETDESKTOPWINDOW(), GW_CHILD )
WHILE hWnd != 0
IF GETWINDOWTEXT( hWnd ) = "Microsoft Excel"
POSTMESSAGE( hWnd, WM_CLOSE )
RETURN .T.
ENDIF
hWnd = GETWINDOW( hWnd, GW_HWNDNEXT )
ENDDO
RETURN .F.EMG
Hi Enrico,
Once again I thank you.
It is people like you that make me glad I picked FWH as my programming language. Your knowledgeable and quick replies not only help solve our issues but also help expand our understanding of FWH.
I wish we had 10 of you ... but the one we do have is pretty dam good.
Thanks again for all you help.
Jeff
Thanks,
Jeff Barnes
(FWH 16.11, xHarbour 1.2.3, Bcc730)
Jeff Barnes
(FWH 16.11, xHarbour 1.2.3, Bcc730)
Jeff Barnes wrote:[...]FWH as my programming language.
FWH is not a programming language but "merely" a library.
EMG
EnricoMaria wrote:Jeff Barnes wrote:[...]FWH as my programming language.
FWH is not a programming language but "merely" a library.
EMG
Enrico, what is correct.
When I worked with Clipper I use to say I was a Clipper Programmer, and that Clipper was my "language".
Now If somebody ask me which language I use ¿Which is the right answer? c++? [x]Harbour FWH or .......?
Thanks for your help and support
Saludos/Regards,
José Murugosa
"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
José Murugosa
"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
jose_murugosa wrote:Enrico, what is correct.
When I worked with Clipper I use to say I was a Clipper Programmer, and that Clipper was my "language".
Now If somebody ask me which language I use ¿Which is the right answer? c++? [x]Harbour FWH or .......?
xHarbour is better than FWH but xHarbour is a compiler not a language. Clipper is also a compiler. dBase III is an interpreter. I don't know if our beloved programming language has really a name. What do you think about "xBase language"?
EMG
EnricoMaria wrote:jose_murugosa wrote:Enrico, what is correct.
When I worked with Clipper I use to say I was a Clipper Programmer, and that Clipper was my "language".
Now If somebody ask me which language I use ¿Which is the right answer? c++? [x]Harbour FWH or .......?
xHarbour is better than FWH but xHarbour is a compiler not a language. Clipper is also a compiler. dBase III is an interpreter. I don't know if our beloved programming language has really a name. What do you think about "xBase language"?
EMG
Ok, I like it, thanks, Have a nice weekend.
Saludos/Regards,
José Murugosa
"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
José Murugosa
"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
Hi ! Enrico.
Clipper is my language when I was Born
Thank's Enrico for some help for me.
You are the good guy in the world
How to focus my window application
Best Regard
Areang
Clipper is my language when I was Born
Thank's Enrico for some help for me.
You are the good guy in the world
How to focus my window application
IF GETWINDOWTEXT( hWnd ) = "My Application"
//POSTMESSAGE( hWnd, WM_CLOSE )
POSTMESSAGE(hWnd,????????) <---
RETURN .T.
ENDIFBest Regard
Areang
Me too.
try this:
[code]
SetActiveWindow(hWnd)
[code]
try this:
[code]
SetActiveWindow(hWnd)
[code]
areang wrote:Hi ! Enrico.
Clipper is my language when I was Born
Thank's Enrico for some help for me.
You are the good guy in the world
How to focus my window application
[code]
IF GETWINDOWTEXT( hWnd ) = "My Application"
//POSTMESSAGE( hWnd, WM_CLOSE )
POSTMESSAGE(hWnd,????????) <---
RETURN .T.
ENDIF
[/code]
Best Regard
Areang
Hi All !
This is work sample :
for setfocus and maximize windows to the top
Please reply !
regards
areang
This is work sample :
for setfocus and maximize windows to the top
#include "Fivewin.ch"
#define SW_NORMAL 1
#define SW_MAXIMIZE 3
#define SW_MINIMIZE 6
#define SW_RESTORE 9
FUNCTION MAIN()
IF CLOSEEXCEL()
? "My Application ready for you"
ENDIF
RETURN NIL
#define GW_HWNDNEXT 2
#define GW_CHILD 5
STATIC FUNCTION CLOSEEXCEL()
LOCAL hWnd := GETWINDOW( GETDESKTOPWINDOW(), GW_CHILD )
WHILE hWnd != 0
IF GETWINDOWTEXT( hWnd ) = "My Applicationl"
// POSTMESSAGE( hWnd, WM_CLOSE ) <-- work for close windows
// BringWindowToTop( hWnd ) <-- not work
SetActiveWindow( hWnd )
ShowWindow( hWnd, SW_MAXIMIZE )
RETURN .T.
ENDIF
hWnd = GETWINDOW( hWnd, GW_HWNDNEXT )
ENDDO
RETURN .F.Please reply !
regards
areang