Page 1 of 1
DISABLE ALT+ F4
Posted: Sun Jun 07, 2020 11:08 am
by Silvio.Falconi
I have a dialog for add an Invoice
I disabled Esc
I disable button X
but the user is able also to close the dialog with alt+f4
how I can reolve ?
Re: DISABLE ALT+ F4
Posted: Sun Jun 07, 2020 11:35 am
by cnavarro
Code: Select all
Function TestInvoice()
Local oDlg,oFont
local nOffx := 20 //-250
local nOffy := 30 //-300
local lSw := .F.
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-14
DEFINE DIALOG oDlg SIZE 878, 570 PIXEL TRUEPIXEL RESIZABLE FONT oFont ;
TITLE "Services"
@ 10, 100 button "Exit" SIZE 50, 24 PIXEL ACTION ( lSw := .T., oDlg:End() )
ACTIVATE DIALOG oDlg CENTERED VALID lSw
RELEASE FONT oFont
return nil