SetActivePage (процедура) (модуль Graph)

Язык:
Русский
English

 SetActivePage (процедура)   (модуль Graph)


Устанавливает активную страницу для графического вывода.

Объявление

 Procedure SetActivePage(Page : Word);

Режим

Real, Protected

Замечания

Делает страницу с номером Page активной, направляя на нее весь последующий графический вывод.

Многостраничный вывод возможен только на EGA (256Кб), (S)VGA и Hercules. Используя многостраничный режим, программа может осуществлять графические построения на неактивной странице, затем переключать страницы с помощью SetVisualPage, тем самым практически мгновенно отображать картинку на экране. Эта методика особенно полезна при создании анимационных программ.

Ограничения

Нужно быть в графическом режиме.

См. также

Пример

Язык:
Русский
English


 { Пример программы для процедур SetActivePage и SetVisualPage }

uses Graph;

var
  Gd, Gm : Integer;

begin
  Gd := Detect;
  InitGraph(Gd, Gm, 'X:\BP');
 if GraphResult <> grOk then
   Halt(1);
 if (Gd = HercMono) or (Gd = EGA) or (Gd = EGA64) or (Gd = VGA) then
 begin
    SetVisualPage(0);
    SetActivePage(1);
    Rectangle(10, 20, 30, 40);
    SetVisualPage(1);
 end
 else
    OutText('No paging supported.');
 ReadLn;
  CloseGraph;
end.

Более сложный пример: Пример: 3D–графика Pascal. Открывающаяся книга

Тэги: SetActivePage
| G+
Код для вставки: :: :: :: ::
Поделиться: // //