GetModeName

Z Delphi & Pascal (česká wiki)
Verze z 4. 10. 2012, 17:01, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Unit Graph)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaci Skočit na vyhledávání

Vrací řetězec, obsahující jméno určeného grafického režimu.

Deklarace
function GetModeName(ModeNumber: Integer): string;
Režim
Reálný, Chráněný
Poznámky
Vrací řetězec, který obsahuje jméno daného grafického režimu.
Viz také
GetMaxMode
GetModeRange


Vzorový příklad

{Getmxmd.PAS}
{Vzorový příklad pro funkci GetMaxMode.}
uses Graph;
var
  Driver, Mode: Integer;
  I: Integer;
begin
  Driver := Detect;{ Přepnutí do grafického režimu }
  InitGraph(Driver, Mode, ' ');
  if GraphResult < 0 then
    Halt(1);
  for I := 0 to GetMaxMode do { Zobrazení jmen všech režimů }
    OutTextXY(10, 10 * Succ(I), GetModeName(I));
  Readln;
  CloseGraph;
end.