Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Pascal Форум Информер Страны мира
   Переадресация Ввода-Вывода    >>    video
   
 
 Отключение Вывода на Экран   Sly Golovanov 30.04.1997

Модуль для отключения вывода на экран



1k 
 

- 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.