Resumen Anular el Ctrl Alt Supr

Hola,

Talvez esto sea lo que buscas: para VB-32 bits.

---xxx---
Microsoft Knowledge Base
HOWTO: Block CTRL+ALT+DEL and ALT+TAB in Windows 95
Article ID: Q161133
Creation Date: 17-DEC-1996
Revision Date: 21-MAR-1997
The information in this article applies to:

Learning, Professional, and Enterprise Editions of Microsoft Visual
Basic for Windows, version 5.0 WARNING: ANY USE OF THE CODE PROVIDED
IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this code "as
is" without warranty of any kind, either express or implied, including
but not limited to the implied warranties of merchantability and/or
fitness for a particular purpose.


SUMMARY


You can prevent the CTRL+ALT+DEL and ALT+TAB key combinations from
bringing up a task list in Windows 95 by calling the
SystemParametersInfo function in the Win32 API. A step-by-step example
of this appears below.

NOTE: This is possible only in Windows 95.


MORE INFORMATION


Sometimes it is necessary for a program to prevent the use of the
CTRL+ALT+DEL key combination to bring up the Close Program task list
to end a task or shut down Windows 95 and to prevent the use of the
ALT+TAB key combination to switch tasks. The following technique uses
the SystemParametersInfo API to trick Windows 95 into thinking that a
screen saver is running. As a side effect, CTRL+ALT+DEL and ALT+TAB
are disabled.

The Win32 SDK states:


   "SPI_SCREENSAVERRUNNING Windows 95: Used internally; applications
   should not use this flag. Windows NT: Not supported."
Note that disabling CTRL+ALT+DEL is not recommended because the Close
Program dialog box was created to enable users to terminate
misbehaving applications. If a program "hangs" while CTRL+ALT+DEL is
disabled, it may not be possible to terminate it by any method other
than rebooting the machine, which could result in the loss of data.
Also, this technique may not work in future versions of Windows.

Step-by-Step Example



Start a new Standard EXE project. Form1 is created by default.

Add two CommandButton controls (Command1 and Command2) to Form1.

Add the following code to Form1's General Declarations section:


      Private Const SPI_SCREENSAVERRUNNING = 97&
      Private Declare Function SystemParametersInfo Lib "User32" _


          Alias "SystemParametersInfoA" _
         (ByVal uAction As Long, _
          ByVal uParam As Long, _
          lpvParam As Any, _
          ByVal fuWinIni As Long) As Long

      Private Sub Form_Load()
         Command1.Caption = "Disabled"
         Command2.Caption = "Enabled"
      End Sub

      Private Sub Form_Unload(Cancel As Integer)
         'Re-enable CTRL+ALT+DEL and ALT+TAB before the program
         terminates. Command2_Click
      End Sub

      Private Sub Command1_Click()
         Dim lngRet As Long
         Dim blnOld As Boolean
         lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, _
         blnOld, _
            0&)
      End Sub

      Private Sub Command2_Click()
        Dim lngRet As Long
        Dim blnOld As Boolean
        lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, _
        blnOld, _
           0&)
      End Sub

Press the F5 key to run the program, and click the "Disabled"
CommandButton. CTRL+ALT+DEL and ALT+TAB are disabled. Click the
"Enabled" CommandButton to enable CTRL+ALT+DEL and ALT+TAB again.
---xxx---

Nos vemos.
Guillermo


-----
> Date: Tue, 23 Sep 1997 18:11:33 -0600
> From: UNISYS de Nicaragua <unisys@tmx.com.ni>
> Organization: UNISYS DE CENTRO AMERICA, S.A.
> To: vb-esp@ccc.uba.ar
> Subject: Re: (VB-ESP) URGENTE: Anular el Ctrl Alt Supr
> Reply-to: vb-esp@ccc.uba.ar

> En una ocasion encontre algo para ello, lo estuve buscando y no
> lo encontre. No lo guarde porque no funcionaba en Win95.
>
> De momento encontre un articulo (ingles) que explica como determinar
> desde Visual Basic si alguna aplicacion Windows esta corriendo.
>
> Si encuentro algo del CTRL-ALT-DEL te lo envio.
>
> Suerte
>
> Manuel Montesino
>
>
> Rodrigo Silveira wrote:
> >
> > Amigos de la lista:
> > Debo solucionara para mañana esto!!
> >
> > Necesito anular el control alt suprimir desde Visual 3 (Windows 3.1) y no
> > se como hacerlo...
> > además del alt - tab
> >
> > Otra cosa.. Cómo sé si un EXE está siendo ejecutado?
> >
> > Gracias
> > Rodrigo Silviera
>
>
============================================
Te invito a que veas mis páginas sobre
Visual Basic, HTML (VBScript, JavaScript...)
http://www.wcostasol.es/guille/indice.htm
--------------------------------------------
Visual Basic Online en español (castellano)
http://wcostasol.es/vbonline/indice.htm
============================================



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com