Сохранение экрана, Я делаю так.... Опции

[ZeroLink]

Долго я мучился сохранять содержимое экрана, а потом его востановливать.
И вот получилось:

Это типа 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:

[GoodWind]

я делал однажды ООП меню - каждая менюшка представляла собой объект, содержащий в себе масив по размеру, занимаемому на екране*2 (для аттрибутов) и конструктор записывал в него всё, что под ней было,
а деструктор это все обратно выводил. это к вопросу о многоуровневом меню