FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour DISABLE ALT+ F4
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
DISABLE ALT+ F4
Posted: Sun Jun 07, 2020 11:08 AM

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 ?

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: DISABLE ALT+ F4
Posted: Sun Jun 07, 2020 11:35 AM
Code (fw): Select all Collapse
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
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces

Continue the discussion