FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ¿Se puede desactivar el botón "X" de cerrar una ve
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 04:13 PM

Quisiera desactivar y que aparezca desactivado botón de cerrar ("X") de una ventana pero manteniendo activos el de minimizar y maximizar.

Gracias,

Rafael

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 05:19 PM
SHOWTASKBAR() //habilita
HIDETASKBAR() //desabilita
TIRA_X() // DESABILITA O X da janela
PISCA_EXE() // VAI PISCAR O SEU EXE NA BARRA

#pragma BEGINDUMP

#include "windows.h"
#include "shlobj.h"
#include "hbapi.h"
#include "math.h"
#include "hbvm.h"
#include "hbstack.h"
#include "hbapiitm.h"
#include "hbapigt.h"

HB_FUNC ( SHOWTASKBAR ) //Habilita o botao INICIAR
{
HWND hWnd = FindWindow("Shell_TrayWnd", "");

ShowWindow( hWnd, 1 );
}

HB_FUNC ( HIDETASKBAR ) //Desabilita o botao Iniciar
{
HWND hWnd = FindWindow("Shell_TrayWnd", "");

ShowWindow( hWnd, 0 );
}

HB_FUNC ( PISCA_EXE ) // VAI PISCAR O SEU EXE NA BARRA
{
HWND Handle = GetForegroundWindow();

FlashWindow(Handle,TRUE); // VAI PISCAR O SEU EXE NA BARRA

Sleep(300); // TEMPO DE ESPERA
}


HB_FUNC ( TIRA_X ) // DESABILITA O X da janela

{
HMENU MenuH = GetSystemMenu(GetForegroundWindow(),FALSE);

EnableMenuItem(MenuH,SC_CLOSE,MF_GRAYED);
}

#pragma ENDDUMP
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 05:22 PM
    ACTIVATE WINDOW oWnd MAXIMIZED                                           ;
             ON INIT( TIRA_X() )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 05:33 PM

Funciona perfectamente. Muchas gracias, João!!!

Rafael

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 06:54 PM

Rafael,

Tambien podrías usar un VALID en la ventana ó en el diálogo, que impidan que puedan cerrarse

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 07:04 PM

Antonio:
Sí; ya lo había probado pero es que la solución de Joao tiene la ventaja de que deja "Disabled" el botón "X", que es lo que yo quería.
Gracias
Rafael

Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 08:07 PM

Si usas Pelles C lo puedes hacer desde el diseño del recurso.

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Wed Apr 09, 2008 08:29 PM
joseluisysturiz wrote:Si usas Pelles C lo puedes hacer desde el diseño del recurso.


NO EN LA WINDOW PRINCIPAL.

EN DIALOGOS, SI ÉS POSIBLE INCLUSIVE EN WORKSHOP.

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 729
Joined: Tue Oct 18, 2005 06:49 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Thu Apr 10, 2008 06:09 PM

Karinha,

Perfecto!

En el caso mio me interesa el hacer lo contrario de Rafael Clemente. Quisiera dejar activo el boton de cerrar [X]; pero quiero desactivar los botones de Minimizar y Maximizar el Window.

Me podrias indicar como hacerlo?

Saludos,

George

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Thu Apr 10, 2008 06:29 PM
George wrote:Karinha,

Perfecto!

En el caso mio me interesa el hacer lo contrario de Rafael Clemente. Quisiera dejar activo el boton de cerrar [X]; pero quiero desactivar los botones de Minimizar y Maximizar el Window.

Me podrias indicar como hacerlo?

Saludos,

George


ESTO, FIVEWIN HACE POR DEFECTO, MIRA LA CLASSE WINDOW.PRG

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Thu Apr 10, 2008 06:36 PM
Desculpa mi respuesta, por ejemplo:

debes controlar via STYLE de la window principal
      nStyle = nOr( WS_CLIPCHILDREN,;
                    If( cBorder == "NONE",   WS_POPUP, 0 ),;
                    If( cBorder == "SINGLE", WS_THICKFRAME, 0 ),;
                    If( lCaption, WS_CAPTION, 0 ),;
                    If( lSysMenu .and. lCaption, WS_SYSMENU, 0 ),;
                    If( lMin .and. lCaption, WS_MINIMIZEBOX, 0 ),;
                    If( lMax .and. lCaption, WS_MAXIMIZEBOX, 0 ),;
                    If( lVScroll, WS_VSCROLL, 0 ),;
                    If( lHScroll, WS_HSCROLL, 0 ) )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 729
Joined: Tue Oct 18, 2005 06:49 PM
¿Se puede desactivar el botón "X" de cerrar una ve
Posted: Thu Apr 10, 2008 07:49 PM

Gracias karinha!

Continue the discussion