FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Minimizar aplicacion
colthop
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Minimizar aplicacion
Posted: Mon Apr 20, 2015 06:26 AM

Hola a todos:

Desear铆a saber si se pude Minimizar una Aplicaci贸n desde c贸digo. Me explico, tengo una aplicaci贸n que llama a otra y cuando lo hace quiero que se minimice a la barra de tareas y despu茅s cuando la segunda aplicaci贸n se cierre volver a maximizarla.

驴Se puede hacer?, 驴como?.

Un saludo

Carlos

Colt Hop ED, S.L.
Carlos Blas Fern谩ndez Dom铆nguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Minimizar aplicacion
Posted: Mon Apr 20, 2015 07:31 AM

Carlos,

Si te refieres a la aplicaci贸n que llama a la otra:

oWndMain:Iconize()

En donde oWndMain es la ventana principal

para luego restaurarla:

oWndMain:Restore()

regards, saludos

Antonio Linares
www.fivetechsoft.com
colthop
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Re: Minimizar aplicacion
Posted: Mon Apr 20, 2015 08:21 AM
Hola Antonio:

Gracias por tu respuesta, el Minimizar si me funciona ya que lo hago en la misma aplicaci贸n. Pero lo de maximizar no, porque o tengo que hacer desde otra aplicaci贸n.

Lo que tendr铆a que hacer seria:

Code (fw): Select all Collapse
if IsExeRunning("colhop.exe")
聽 "Maximizar"("colthop.exe")
endif


Donde "Maximizar" ser铆a la instrucci贸n que busco para maximizar la aplicaci贸n "colthop.exe" que es distinta a la que estoy.

Un saludo

Carlos
Colt Hop ED, S.L.
Carlos Blas Fern谩ndez Dom铆nguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Minimizar aplicacion
Posted: Mon Apr 20, 2015 08:24 AM

Carlos,

Una vez consigas su hWnd (usando FindWindow()) podr铆as hacer:

ShowWindow( hWnd, SW_MAXIMIZE )

regards, saludos

Antonio Linares
www.fivetechsoft.com
colthop
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Re: Minimizar aplicacion
Posted: Mon Apr 20, 2015 09:49 AM
hola a todos:

Gracias Antonio ya me funciona al final lo he conseguido con esto:
Code (fw): Select all Collapse
 聽if isexerunning("colthop.exe")
聽 聽 hWnd := FindWindow(,"Multiaplicaci贸n Asociada e Integrada - Colt Hop ED, S.L.")
聽 聽 if hWnd <> 0
聽 聽 聽 ShowWindow(hWnd,3)
聽 聽 endif
聽 endif


En donde "Multiaplicaci贸n Asociada e Integrada - Colt Hop ED, S.L." es el TITLE de la ventana principal de la aplicaci贸n

Un saludo

Carlos
Colt Hop ED, S.L.
Carlos Blas Fern谩ndez Dom铆nguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions