home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pctchnqs / 1990 / number4 / printscr.pas < prev    next >
Pascal/Delphi Source File  |  1990-09-13  |  138b  |  9 lines
  1. PROCEDURE PrintScreen(TurnOn: Boolean);
  2.  
  3. BEGIN
  4.   IF TurnOn THEN
  5.     MEM[$0050:$0000] := 0
  6.   ELSE
  7.     MEM[$0050:$0000] := 1;
  8. END;
  9.