FiveTech Software tech support forums

Posted: **Sat Mar 10, 2007 2:34 am**

Hi Everybody,

Is there a way from within FWH to close Ms-Excel (EXCEL.EXE) if it is running in the background?

Thanks,
Jeff

Posted: **Sat Mar 10, 2007 9:58 am**

This is a working sample:

Code: Select all Expand view: #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

Posted: **Sat Mar 10, 2007 11:54 am**

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

Posted: **Sat Mar 10, 2007 1:26 pm**

Jeff Barnes wrote:[...]FWH as my programming language.

FWH is not a programming language but "merely" a library.

EMG

Posted: **Sat Mar 10, 2007 5:32 pm**

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

Posted: **Sat Mar 10, 2007 6:13 pm**

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

Posted: **Sat Mar 10, 2007 6:15 pm**

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.

Posted: **Sun Mar 11, 2007 10:51 pm**

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 :shock:

How to focus my window application

Code: Select all Expand view: IF GETWINDOWTEXT( hWnd ) = "My Application" //POSTMESSAGE( hWnd, WM_CLOSE ) POSTMESSAGE(hWnd,????????) <--- RETURN .T. ENDIF

Best Regard
Areang

Posted: **Mon Mar 12, 2007 8:08 am**

Me too.

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

Posted: **Mon Mar 12, 2007 8:20 am**

Or

Code: Select all Expand view: BringWindowToTop( hWnd )

EMG

Posted: **Wed Mar 14, 2007 1:12 pm**

Hi All !

This is work sample :
for setfocus and maximize windows to the top

Code: Select all Expand view: #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

FiveTech Software tech support forums

close EXCEL.EXE

close EXCEL.EXE

Re: close EXCEL.EXE