visual basic, Trapping CTRL+BREAK and CTRL+ALT+DEL

Jesse Dorla
#1 / 3

Trapping CTRL+BREAK and CTRL+ALT+DEL

Hello,
I need help desperately.
I have been trying for some time to trap Ctrl+Break and Ctrl+Alt+Del.
If anyone can give me a little piece of source code that demonstrates how to
trap these key combinations, I would be grateful.
BTW, I have tried the samples on the BASIC Archives page, and they don't
work.

If you can help, please RESPOND TO ME DIRECTLY at:

Thanks,
Jesse Dorland

Sat, 29 Aug 1998 03:00:00 GMT

Roy A Wes
#2 / 3

Trapping CTRL+BREAK and CTRL+ALT+DEL

Quote:

Dorland) writes:

> Hello,
> I need help desperately.
> I have been trying for some time to trap Ctrl+Break and
Ctrl+Alt+Del.
> If anyone can give me a little piece of source code that

demonstrates how to

Quote:

>trap these key combinations, I would be grateful.
> BTW, I have tried the samples on the BASIC Archives page, and they
don't
>work.

> If you can help, please RESPOND TO ME DIRECTLY at:

> Thanks,
> Jesse Dorland

Here's how to disable CTRL+BREAK:

KEY KeyNum, CHR$(4 + 128) + CHR$(70) 'KeyNum can be numbers 15 to 25
ON KEY(KeyNum), GOSUB CtrlBreak 'Branch to Routine
KEY(KeyNum)OFF : KEY(KeyNum)ON 'Sometimes these KEY things
'don't work unless you turn
'them off first

CtrlBreak:
RETURN

I have CTRL+ALT+DEL Somewhere.
If you really want it let me know, I'll look it up.

roy

Tue, 01 Sep 1998 03:00:00 GMT

Stuart McLachl
#3 / 3

Trapping CTRL+BREAK and CTRL+ALT+DEL

Hello,

Quote:

>> I need help desperately.
>> I have been trying for some time to trap Ctrl+Break and
>Ctrl+Alt+Del.
>Here's how to disable CTRL+BREAK:
>KEY KeyNum, CHR$(4 + 128) + CHR$(70) 'KeyNum can be numbers 15 to 25
>ON KEY(KeyNum), GOSUB CtrlBreak 'Branch to Routine
>KEY(KeyNum)OFF : KEY(KeyNum)ON 'Sometimes these KEY things
> 'don't work unless you turn
> 'them off first
>CtrlBreak:
>RETURN
>I have CTRL+ALT+DEL Somewhere.
>If you really want it let me know, I'll look it up.

Use the same concept with
KEY (Keynum), CHR$(12) + CHR$(83)

--
Disclaimer?? The opinions of the writer ARE the opinions of Lexacorp!!
----------------------------------------------------------------------
LEXACORP Pty Ltd, Brisbane, Qld Australia
Dataflex/MSAccess/Basic System Development

Wed, 02 Sep 1998 03:00:00 GMT