Graph, метод вывода Опции

[sheka]

я хочу сделать мультипликацию с помощью видеостраниц.
вопрос:
когда делаю вывод с помощью setactivepage,setvisualpage - после вывода второй страицы содержимое первой смещается куда-то вниз, а не исчезает.
а если делаю как прочитал в одной книге:

Код

procedure init;
var gd,gm:integer;
begin
gd:=detect;
initgraph(gd,gm,'');
if gd in [HercMono,EGA,EGA64,MCGA,VGA] then  / разница в наличии
  if gd<>HercMono then  SetGraphMode(gm-1);   \ этих строчек
end;

то изображение получается искаженным (вытянутым по вертикали).

почему? должно ли так быть?

[volvo]

Вообще-то надо инициализировать режим, в котором больше одной видеостраницы. В режиме VgaHi страница всего одна, он не пойдет. Инициализируй графику так:

g_driver := VGA; g_mode := VGAMed;
InitGraph(g_driver, g_mode, '');

и учти, что разрешение = 640*350 при двух видеостраницах

[sheka]

а три страницы нельзя?

[Lapp]

а три страницы нельзя?

Нет)).
Наличие двух страниц дает принципиальную возможность подготовки данных для визуализации без мелькания. Это как бы необходимость. Две страницы позволяют обработать любую ситуацию. Три (четыре, пять..) - это уже типа для удобства. Это лишнее.