Deshabilitar botón

Deshabilitar botón

Postby MarioG » Wed Oct 20, 2010 2:57 pm

Gente;
Defino una vetana:

DEFINE WINDOW soWnd TITLE "..." MDI ICON soIco STYLE nOR( WS_SYSMENU )

Puedo deshabilitar dicho botón?, como?
Si esta la respuesta en el foro, no la pude encontrar

Saludos
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Deshabilitar botón

Postby JmGarcia » Wed Oct 20, 2010 3:07 pm

MarioG wrote:Puedo deshabilitar dicho botón?

¿ Que botón ? :cry:
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: Deshabilitar botón

Postby MarioG » Wed Oct 20, 2010 3:15 pm

:oops: ... sorry

Definiendo así: DEFINE WINDOW soWnd TITLE "..." MDI ICON soIco STYLE nOR( WS_SYSMENU )

solo se muestra el boton [X]
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Deshabilitar botón

Postby JmGarcia » Wed Oct 20, 2010 3:37 pm

El botón HELP (?) se que se quita así: oDlg:lHelpIcon:=.F.

La clase DIALOG tiene ademas estas otras datas: lResize16, lCentered, lModal, lModify

Aunque he probado esto y funciona: DEFINE WINDOW soWnd TITLE "..." MDI ICON soIco STYLE 255 quita el botón [X].
Last edited by JmGarcia on Wed Oct 20, 2010 3:49 pm, edited 1 time in total.
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: Deshabilitar botón

Postby MarioG » Wed Oct 20, 2010 3:42 pm

:D ...nooooo
El botón Cerrar [X] de una ventana
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Deshabilitar botón

Postby JmGarcia » Wed Oct 20, 2010 3:52 pm

JmGarcia wrote:Aunque he probado esto y funciona: DEFINE WINDOW soWnd TITLE "..." MDI ICON soIco STYLE 255 quita el botón [X].
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: Deshabilitar botón

Postby FranciscoA » Wed Oct 20, 2010 9:18 pm

Hola, si utilizas PellesC, puedes hacerlo así:
En las propiedades, Windows Styles, asegúrate que System Menu quede en "no".
Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
FranciscoA
 
Posts: 2159
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Deshabilitar botón

Postby MarioG » Wed Oct 20, 2010 10:10 pm

JM
gracias, funciona (aunque me gustaría saber como se inhibe, porque lo he visto en algunas aplicaicones)

Freancisco, gracias, no uso PellesC (esta pendiente :wink: )
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Deshabilitar botón

Postby Antonio Linares » Thu Oct 21, 2010 8:00 am

Puedes usar un VALID basado en una condición lógica:

lSalir := .F.

ACTIVATE WINDOW oWnd VALID lSalir
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42118
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Deshabilitar botón

Postby MarioG » Thu Oct 21, 2010 10:07 am

Claro!
A veces estamos queriendo buscar opciones complicadas y no olvidamos de lo sencillo :)

gracias
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 70 guests