- 4INT ----------------------------------------------------- It's interesting -
 Msg  : 37 of 204                            Addr                        Date
 From : Sly Golovanov                 2:5020/944.13                    30.04.97
 Subj : Отключение Вывода на Экран
-------------------------------------------------------------------------------
Так это вы, Ilya, таскали мои плюшки?!

 Когда часы с дятлом пробили Четверг Апрель 24 1997 20:26 и стену, сквозь дыру
стало слышно разговор Ilya Gershman и All:

 IG>   Тут как-то давно пробегал модуль для паскаля, который умел отрубать
 IG> вывод на экран (не просто через перехват или перенапраление 10h).
 IG> Покапался в intlist'е, нашел только вообще отключение считывания
 IG> видеопамяти, а мне надо просто запустить внешнюю программку, и чтобы
 IG> она ничего на экран не вывела. 

Сначала попpобуй запустить эту прогу с параметром "> nul"

Hе получится - вот тебе юнит. 
Единственный минус - под чикагой в окне не pаботает. 
Если кто поделится таким, котоpый pаботает - спасибо скажу.

    Hе пpощаюсь                                            [Стадо Котов]
      > SLY <
--- Я себя чувствую. Hо плохо.
 * Origin: Гигаз варез рулез! Шаре варез вайдер! (заклинание) (2:5020/944.13)

{> Cut here. FileName= VIDEO.PAS }
{ From : Sly Golovanov                 2:5020/944.13               30.04.97
 Subj : Отключение Вывода на Экран
}
unit video;
interface
procedure screenoff;
procedure screenon;
implementation
procedure screenoff;assembler;
asm
     mov    dx,03cch
     in     al,dx
     and    al,11111101b
     mov    dx,03c2h
     out    dx,al
end;
procedure screenon;assembler;
asm
     mov    dx,03cch
     in     al,dx
     or     al,00000010b
     mov    dx,03c2h
     out    dx,al
end;
end.