![]() |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
![]() ![]() |
![]() |
ZeroLink |
![]()
Сообщение
#1
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 41 Пол: Мужской Репутация: ![]() ![]() ![]() |
Долго я мучился сохранять содержимое экрана, а потом его востановливать.
И вот получилось: Это типа VAR Код var SaveScr: array[1..4000] of Byte; {сохранение экрана} Screen: array[1..25,1..80,(CChar, Attr)] of Byte absolute $B800:$0000;{экран} Ну а вот сохранение: Код Move(Screen, SaveScr, SizeOf(SaveScr)); А вот и востановление: Код Move(SaveScr, Screen, SizeOf(SaveScr)); Если у Вас есть другие варианты, то выкладывайте :yes: -------------------- Я могу изменить мир, но Бог не даёт исходник:(
|
APAL |
![]()
Сообщение
#2
|
![]() Смотрю... ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: ![]() ![]() ![]() |
Так это только на одно сохранение.
А если будет, скажем, меню многоуровневое? Я реализовал стековое хранение не всего экрана, а нужных (заданных) участков в динамической памяти. Очень удобно - прямо как в АСМе - PushWin(x1,y1,x2,y2); и PopWin; -------------------- |
BlackShadow |
![]()
Сообщение
#3
|
Гость ![]() |
Цитата А если будет, скажем, меню многоуровневое? Это ты про VGA? Метод вылетит сразу и со свистом. |
APAL |
![]()
Сообщение
#4
|
![]() Смотрю... ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: ![]() ![]() ![]() |
BlackShadow
Я про текстовый режим... судя по адресу B800:0000 И при чем тут VGA? -------------------- |
Altair |
![]()
Сообщение
#5
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
А в файл BMP не проще сохранять экран ? (ну скажем в граф. режиме.)
а в текстовомрежиме проще в тектсовый файл ![]() -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
APAL |
![]()
Сообщение
#6
|
![]() Смотрю... ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: ![]() ![]() ![]() |
Господа! Про графический режим вопрос не стоял!
Oleg_Z "Сохранять в файл" - и каков выигрыш? -------------------- |
GoodWind |
![]()
Сообщение
#7
|
![]() Автооответчик ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
я делал однажды ООП меню - каждая менюшка представляла собой объект, содержащий в себе масив по размеру, занимаемому на екране*2 (для аттрибутов) и конструктор записывал в него всё, что под ней было,
а деструктор это все обратно выводил. это к вопросу о многоуровневом меню -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
Altair |
![]()
Сообщение
#8
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата Сохранять в файл" - и каков выигрыш? В простоте кода. Исключительно в этом. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
APAL |
![]()
Сообщение
#9
|
![]() Смотрю... ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: ![]() ![]() ![]() |
Цитата(Oleg_Z @ 20.10.04 7:28) В простоте кода. Исключительно в этом. А вот и нет. ;) Попробуй реализовать менюшку со своим методом... P.S.: В теме о словах в строках я выложил архив STATIC.RAR - в нем есть модуль MYSERVIS - там должен быть описан мой метод - процедуры PushW и PopW (если не ошибаюсь) - возьми их для сравнения. -------------------- |
![]() ![]() |
![]() |
Текстовая версия | 25.07.2025 23:37 |