Рейтинг@Mail.ru
TMT Logo

МОДУЛЬ GRAPH
Графическая Библиотека для TMT Pascal v3.50SP2
Часть 5

Copyright (c) 1997,98 TMT Development Corp.
All Rights Reserved

Если вы заметили в документе
опечатки или неточности перевода,
просьба сообщить о них!
Перевод на русский язык и оформление:
Валерий Вотинцев

К Содержанию


Процедуры и Функции



GetActivePage (функция)

Возвращает номер текущей активной страницы.

Объявление:
 function GetActivePage: DWord;

К СодержаниюНаверх

GetAspectRatio (процедура)

Возвращает коэффициент пропорциональности для установленного графического режима.

Объявление:
 procedure GetAspectRatio (var AspectRatio: Real);
Пояснения:
Более подробная информация приведена в описании процедуры SetAspectRatio.

К СодержаниюНаверх

GetBitsPerPixel (функция)

Возвращает размер (в битах), необходимый для задания цвета точки в установленном графическом режиме.

Объявление:
 function GetBitsPerPixel: DWord;

К СодержаниюНаверх

GetBkColor (функция)

Возвращает текущий цвет фона.

Объявление:
 function GetBkColor: DWord;
Пояснения:
Цвет фона может принимать значение от нуля до GetMaxColor, в зависимости от использующегося графического драйвера и установленного графического режима.

К СодержаниюНаверх

GetBytesPerScanLine (функция)

Функция возвращает длину линии сканирования в байтах.

Объявление:
 function GetBytesPerScanLine: DWord;
Пояснения:
Длина логической линии сканирования - это ширина логического экрана. Размеры логического окна могут быть не только равны физическому разрешению установленного графического режима, но и превышать его. Данная функция возвращает длину линии сканирования именно дл логического экрана.

К СодержаниюНаверх

GetColor (функция)

Возвращает текущий цвет для рисования.

Объявление:
 function GetColor: Word;

К СодержаниюНаверх

GetDefaultPalette (функция)

Возвращает структуру описания палитры по умолчанию.

Объявление:
 function GetDefaultPalette(var Palette: PaletteType);
Пояснения:
GetDefaultPalette возвращает запись типа PaletteType, содержащую палитру, устанавливаемую автоматически при инициализации нового графического режима.

К СодержаниюНаверх

GetGraphBufSize (функция)

Возвращает размер внутреннего графического буфера в байтах.

Объявление:
 function GetGraphBufSize: DWord;
Пояснения:
Более подробную информацию см. в описании процедуры SetGraphBufSize.

К СодержаниюНаверх

GetGraphMode (функция)

Возвращает VESA-совместимый номер режима для установленного графического режима.

Объявление:
 function GetGraphMode: Word;
Пояснения:
Номер режима, возвращаемый функцией GetGraphMode, может быть использован для установки режима с помощью процедуры SetGraphMode. Ниже приводится пример установки графического режима.

Примечание переводчика:
Пример для этой функции неудачен, поскольку в нем нет использовани ни GetGraphMode, ни SetGraphMode :-(.
 uses Graph,Crt;

 var ErrorCode,i: LongInt:=0;
     SX,SY: DWord:=0;
 begin
  { Установить SVGA режим 640x480x256 }
  SetSVGAMode(640,480,8,LfbOrBanked);
  ClearDevice;
  { Режим установлен успешно? }
  if GraphResult<>0 then begin
   ErrorCode:=GraphResult;
   CloseGraph;
   Writeln(GraphErrorMsg(ErrorCode));
  end;
  SetLogicalSize(1280,600);
  GetLogicalSize(SX,SY);
  if (SX=640) and (SY=480) then begin
   CloseGraph;
   Writeln(' Логические страницы не поддерживаются...');
  end;
  SetLineStyle(SolidLn,0,ThickWidth);
  SetColor(clRed);
  Line(0,0,GetMaxX,GetMaxY);
  Line(GetMaxX,0,0,GetMaxY);
  SetColor(clWhite);
  Rectangle(0,0,GetMaxX,GetMaxY);
  for i:=0 to (SX-640) div 4 do SetScreenStart(i*4,0,True);
  for i:=0 to (SY-480) div 4 do SetScreenStart(SX-640,i*4,True);
  for i:=(SX-640) div 4 downto 0 do SetScreenStart(i*4,SY-480,True);
  for i:=(SY-480) div 4 downto 0 do SetScreenStart(0,i*4,True);
  ReadKey;
  CloseGraph;
 end.

К СодержаниюНаверх

GetImage (процедура)

Сохраняет в буфер заданную прямоугольную область изображения.

Объявление:
 procedure GetImage(x1, y1, x2, y2: Integer; var BitMap);
Пояснения:
X1, Y1, X2, Y2 - координаты двух диагонально противоположных точек прямоугольной области на экране. Размер безтипового параметра BitMap должен быть больше, по крайней мере, на 4 байта, чем размер памяти, занимаемой данной областью изображения, поскольку в двух первых словах BitMap сохраняется ширина и высота сохраняемой области.
Оставшаяся часть BitMap используется для сохранения собственно изображения. Для определения размера буфера BitMap можно воспользоваться функцией ImageSize.

К СодержаниюНаверх

GetLfbAddress (функция)

Возвращает физический адрес буфера LFB (linear flat frame buffer).

Объявление:
 function GetLfbAddress: DWord;
Пояснения:
Если режим LFB не поддерживается, то функция возвращает ноль.

К СодержаниюНаверх

GetLineSettings (процедура)

Возвращает текущие параметры линии: стиль, образец и толщину, установленные процедурой SetLineStyle.

Объявление:
 procedure GetLineSettings(var LineInfo: LineSettingsType);

К СодержаниюНаверх

GetLogicalPage (процедура)

Возвращает текущий размер логической страницы.

Объявление:
 procedure GetLogicalPage(var SX,SY: Word);
Пояснения:
Подробная информация приведена в описании процедуры SetLogicalPage.

К СодержаниюНаверх

GetMaxColor (функция)

Возвращает максимальный номер цвета, который может быть указан в процедуре SetColor.

Объявление:
 function GetMaxColor: DWord;
Пояснения:
Если установлен 256-цветный VGA/SVGA режим, то GetMaxColor вернет значение 255. Это значит, что при обращении к SetColor можно задавать цвета только в диапазоне 0..255. Если установлен один из многоцветных SVGA режимов, то GetMaxColor вернет, соответственно, значение 32767 или 65535.

К СодержаниюНаверх

GetMaxPage (функция)

Возвращает номер последней доступной графической страницы.

Объявление:
 function GetMaxPage: DWord;

К СодержаниюНаверх

GetMaxX (функция)

Возвращает максимальное разрешение по X.

Объявление:
 function GetMaxX: DWord;
Пояснения:
Возвращает номер крайнего правого столбца точек (разрешение по X) логической видео-страницы для установленного графического режима.

К СодержаниюНаверх

GetMaxY (функция)

Возвращает максимальное разрешение по Y.

Объявление:
 function GetMaxY: DWord;
Пояснения:
Возвращает номер самой нижней строки точек (разрешение по Y) логической видео-страницы для установленного графического режима.

К СодержаниюНаверх

GetOemProductName (функция)

Возвращает строку, содержащую название установленной видео-карты.

Объявление:
 function GetOemProductName: String;
Пояснения:
Если видео-карта не поддерживает VESA VBE 2.0+, то функция вернет пустую строку.

К СодержаниюНаверх

GetOemProductRev (функция)

Возвращает строку, содержащую версию или номер установленной видео-карты.

Объявление:
 function GetOemProductRev: String;
Пояснения:
Если видео-карта не поддерживает VESA VBE 2.0+, то функция вернет пустую строку.

К СодержаниюНаверх

GetOemString (функция)

Возвращает OEM-идентификатор графического контроллера.

Объявление:
 function GetOemString: String;
Пояснения:
Возвращаемая строка может быть использована для идентификации типа графического контроллера или семейства OEM-продуктов для конкретного видео-драйвера.
Если видео-карта не поддерживает VESA VBE 1.2+, то функция вернет пустую строку.

К СодержаниюНаверх

GetOemVendorName (функция)

Возвращает строку, содержащую наименование изготовителя видео-карты.

Объявление:
 function GetOemVendorName: String;
Пояснения:
Если видео-карта не поддерживает VESA VBE 1.2+, то функция вернет пустую строку.

К СодержаниюНаверх

GetPageSize (функция)

Возвращает размер логической видео-страницы для установленного графического режима (в байтах).

Объявление:
 function GetPageSize: DWord;
Размер графической страницы зависит как от установленного графического режима, так и размеров логической страницы, установленных процедурой SetLogicalPage.

К СодержаниюНаверх

GetPalette (процедура)

Возвращает в переменной типа PaletteType текущую палитру и ее размер.

Объявление:
 procedure GetPalette(var Palette: PaletteType);

К СодержаниюНаверх

GetPixel (функция)

Возвращает цвет точки (пиксела) с координатами (X,Y).

Объявление:
 function GetPixel(X,Y: LongInt): DWord;

К СодержаниюНаверх

GetScreenHeight (функция)

Возвращает высоту физического экрана в пикселах.

Объявление:
 function GetScreenHeight: DWord;

К СодержаниюНаверх

GetScreenWidth (функция)

Возвращает ширину физического экрана в пикселах.

Объявление:
 function GetScreenWidth: DWord;

К СодержаниюНаверх

GetTextSettings (процедура)

Возвращает параметры вывода текста в графическом режиме.

Объявление:
 procedure GetTextSettings(var TextInfo: TextSettingsType);
Пояснения:
Функция возвращает параметры текста: установленный фонт (шрифт), направление, размер и метод выравнивания, установленные процедурами SetTextStyle или SetCustomFont и SetTextJustify.

К СодержаниюНаверх

GetTranspSettings (процедура)

Возвращает текущие установки для режима прозрачности.

Объявление:
 procedure GetTranspSettings (var Mode: Boolean; Color: DWord);
Пояснения:
Более подробная информация приведена в описании процедуры SetTransparentMode.

К СодержаниюНаверх

Автор русского проекта:
Valery Votintsev

при поддержке
TMT Development Corporation.
All rights reserved.


[Новости]   [Продукты]   [Продажи]   [Скачать]   [Апдейты]   [Поддержка]
[Документация]   [FAQ]   [Contributions]   [Ссылки]   [Связь с TMT]   [Главная]