Правила форума
Прочтите прежде чем задавать вопрос!
вопрос:
когда делаю вывод с помощью 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;
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;
то изображение получается искаженным (вытянутым по вертикали).
почему? должно ли так быть?
