home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #20 / NN_1992_20.iso / spool / comp / lang / pascal / 5295 < prev    next >
Encoding:
Internet Message Format  |  1992-09-10  |  1.2 KB
  1. Path: sparky!uunet!sun-barr!news2me.ebay.sun.com!cronkite.Central.Sun.COM!texsun!exucom.exu.ericsson.se!news
  2. From: exuptr@exu.ericsson.se (exuptr@exu.ericsson.se)
  3. Newsgroups: comp.lang.pascal
  4. Subject: Re: Ctrl-Break in TP 6.0 programs
  5. Message-ID: <exuptr.475.716143552@exu.ericsson.se>
  6. Date: 10 Sep 92 16:45:52 GMT
  7. References: <5341@tuegate.tue.nl>
  8. Sender: news@exu.ericsson.se
  9. Organization: Ericsson Network Systems, Inc.
  10. Lines: 21
  11. Nntp-Posting-Host: pc254167.exu.ericsson.se
  12.  
  13. In article <5341@tuegate.tue.nl> erik@blade (Erik Manders) writes:
  14.  
  15. >Hello,
  16.  
  17. >When I write a program in Turbo Pascal 6.0, it is always possible to
  18. >interrupt it by pressing Ctrl-Break. I don't want this to be possible,
  19. >so is there anybody who knows what I have to do to prevent this.
  20.  
  21. *Sigh*
  22. uses crt;
  23. ....
  24. begin
  25. ...
  26. Checkbreak := false;
  27.  ----------------------------------------------------------------------------
  28.     "This must be Thursday.  I never could get the hang of Thursdays"
  29.                                                        - Douglas Adams
  30.   - Patrick Taylor                                       (Arthur Dent)
  31.     Ericsson Network Systems
  32.     exuptr@exu.ericsson.se                       "Don't let the .se fool you"
  33.     or exuptr@ZGNews.Lonestar.Org, exu.exuptr@memo.ericsson.se
  34.