SetVisualPage

Nastaví viditelnou grafickou stránku.

Deklarace

procedure SetVisualPage(Page: Word);

Režim

Reálný, Chráněný

Poznámky

Učiní Page viditelnou grafickou stránkou.

Více grafických stránek podporují pouze adaptéry EGA (256K), VGA a Hercules. Tyto adaptéry umožňují programu směrovat grafický výstup do stránky, která právě není zobrazovaná (pomocí procedury SetActivePage), a pak ji rychle zobrazit pomocí této procedury. To je vhodné zejména pro animaci.

Omezení

Je nutno být v grafickém režimu.

Viz také

SetActivePage

Vzorový příklad

{Setactpg.PAS}
{Vzorový příklad pro proceduru SetActivePage.}
uses Graph;
var Gd, Gm: Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, ' ');
  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('Stránkování není podporováno.');
  Readln;
  CloseGraph;
end.