Class TVideoDevice (unit VideoDev)

Inherits from

TObject

****** * * Module: VideoDev * Author: Joe Kessler * IntegrationWare - A New Generation of Extraordinary PC Solutions * www.integrationware.com * * Purpose: * * This module defines the base class for all video output objects. * To allow Rocks to operate with a new type of video driver, a developer * can simply derive a new class from this one, and implement all of the * abstracted methods. * ******

Constructors


constructor Create(iInternalFrameWidth, iInternalFrameHeight: Integer);

Public constructor.


Functions

procedure BeginNewFrame;

Method to initialize prior to drawing a new frame.

procedure ClearFrame;


function fToPhysicalX(iCoordX: Real): Real;

Methods to convert from logical to physical screen coordinates.

function fToPhysicalY(iCoordY: Real): Real;


function iGetLogicalScreenHeight: Integer;

Functions to return the logical screen dimensions.

function iGetLogicalScreenWidth: Integer;


function iGetPhysicalScreenHeight: Integer;

functions to return the current physical screen dimensions.

function iGetPhysicalScreenWidth: Integer;


procedure LineTo(iX, iY: Integer);


procedure MoveTo(iX, iY: Integer);

Methods to move the pen position and draw lines.

procedure SetPenColor(clrNew: TColor);

Method to set the current pen color.

procedure SetPixel(iX, iY: Integer; clrPixel: TColor);

Method to set a single pixel.

Properties

Events

Variables

m_fLogicalToPhysicalX : Real;

Conversion factors for translating logical coordinates to physical ones.

m_fLogicalToPhysicalY : Real;


m_iInternalFrameHeight : Integer;


m_iInternalFrameWidth : Integer;

Internal frame dimensions.


Constructors


constructor Create(iInternalFrameWidth, iInternalFrameHeight: Integer);

Public constructor.


Functions


procedure BeginNewFrame;

Method to initialize prior to drawing a new frame.


procedure ClearFrame;


function fToPhysicalX(iCoordX: Real): Real;

Methods to convert from logical to physical screen coordinates.


function fToPhysicalY(iCoordY: Real): Real;


function iGetLogicalScreenHeight: Integer;

Functions to return the logical screen dimensions. Notice that these always stay the same in Rocks, providing an internal reference point. During drawing, images are scaled appropriately on the fly.

Stash our logical screen dimensions. These will not change.


function iGetLogicalScreenWidth: Integer;


function iGetPhysicalScreenHeight: Integer;

functions to return the current physical screen dimensions. Notice that these can change dynamically at run time.


function iGetPhysicalScreenWidth: Integer;


procedure LineTo(iX, iY: Integer);


procedure MoveTo(iX, iY: Integer);

Methods to move the pen position and draw lines.


procedure SetPenColor(clrNew: TColor);

Method to set the current pen color.


procedure SetPixel(iX, iY: Integer; clrPixel: TColor);

Method to set a single pixel.


Properties


Events


Variables


m_fLogicalToPhysicalX : Real;

Conversion factors for translating logical coordinates to physical ones.


m_fLogicalToPhysicalY : Real;


m_iInternalFrameHeight : Integer;


m_iInternalFrameWidth : Integer;

Internal frame dimensions.