Выключение графического режима, отображение программы в окне |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
Выключение графического режима, отображение программы в окне |
rekrut |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 23 Пол: Мужской Реальное имя: vovadj Репутация: 0 |
Проблема заключается в том что после запуска программы вылетает заставка , во весь екран, после ее показа програма так и остается работать в полноекранном режиме, мне же надо сделать так что бы после показа заставки программа переходила обратно в оконный режим, подскажите пожалуйста какие существуют методы для решения етого вопроса .
|
klem4 |
Сообщение
#2
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
CloseGraph или RestoreCRTMode -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
rekrut |
Сообщение
#3
|
Новичок Группа: Пользователи Сообщений: 23 Пол: Мужской Реальное имя: vovadj Репутация: 0 |
не пашет все равно, вот даю код и куда я впихиваю ети строчки, может просто в другое место их вписать надо?
Procedure zastavka; |
klem4 |
Сообщение
#4
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Во первыйх это ни укого даже откомпилировать неполучится ... Во вторых проверь это:
uses crt, graph; отработало замечательно. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
rekrut |
Сообщение
#5
|
Новичок Группа: Пользователи Сообщений: 23 Пол: Мужской Реальное имя: vovadj Репутация: 0 |
блииин, может у тебя какието параметры доса стоят не такие как у меня.
Когда я запускаю твою прогу появляется строчка в графическом режиме, после нажатия пробела окно не меняя размера переключается в текстовый режим и все, надеюсь ты понял что я хочу сделать. повторюсь: что бы после выключения заставки програма переходила в оконный режим и была не на весь екран, а обычное окошко. |
klem4 |
Сообщение
#6
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата а обычное окошко. Что ты понимаешь под обычным окошком ? не забывай, TurboPascal - программирование под DOS никаких окошек(в понимание виндовых) там и в помине нет + управлять размерами окна в котором появляется консольное приложение он тебе тоже не позволит (типа сымитировать нажание alt + enter из винды). -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 22.05.2024 0:45 |