Page 1 of 1
Deshabiliatar la X en un formulario
Posted: Thu Aug 07, 2025 10:01 am
by jorge.posadas
Grupo HMG
¿Como puedo deshabilitar la X para evitar que lo usen para cerrar un formuario? o si fuera posible mejor que enviara un mensaje al usuario avisandole que NO puede usar la X para cerrar e formulario
De antemano gracias por su ayuda
Re: Deshabiliatar la X en un formulario
Posted: Thu Aug 07, 2025 12:09 pm
by serge_girard
NOSYSMENU in define window
Re: Deshabiliatar la X en un formulario
Posted: Thu Aug 07, 2025 1:36 pm
by mustafa
Hola amigo : Jorge Posadas
otra opción ===> ON INTERACTIVECLOSE {||.F. } // <=== con .T. cierras Window y con .F. "No"
Code: Select all
#include <hmg.ch>
Function Main()
SET CENTURY ON
SET DATE FRENCH
SET ESCAPE ON
SET NAVIGATION EXTENDED
SET CODEPAGE TO UNICODE
SET LANGUAGE TO SPANISH
SET DELETED ON
SET BROWSESYNC ON
DEFINE WINDOW Main ;
AT 265 , 551 ;
WIDTH 620 HEIGHT 487 ;
BACKCOLOR {017,009,131} ;
TITLE"Hola Mundo" + SPACE(65) + "Exit = [Esc]" ;
ICON '' ;
MAIN NOSIZE NOMAXIMIZE NOMINIMIZE ;
ON INTERACTIVECLOSE {||.F. } // <=== con .T. cierras Window y con .F. "No"
ON KEY ESCAPE ACTION Main.Release
END WINDOW
Center Window Main
Activate Window Main
Return Nil
Saludos, Regards,Salam
Mustafa
Re: Deshabiliatar la X en un formulario
Posted: Thu Aug 07, 2025 3:40 pm
by jorge.posadas
Gracias Serge_Girad y Mustafa, ya lo puse y ya quedó