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.
*
******
constructor Create(iInternalFrameWidth, iInternalFrameHeight: Integer);
- Public constructor.
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.
m_fLogicalToPhysicalX : Real;
Conversion factors for translating logical coordinates to physical ones.
m_fLogicalToPhysicalY : Real;
m_iInternalFrameHeight : Integer;
m_iInternalFrameWidth : Integer;
Internal frame dimensions.
constructor Create(iInternalFrameWidth, iInternalFrameHeight: Integer);
Public constructor.
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.
m_fLogicalToPhysicalX : Real;
Conversion factors for translating logical coordinates to physical ones.
m_fLogicalToPhysicalY : Real;
m_iInternalFrameHeight : Integer;
m_iInternalFrameWidth : Integer;
Internal frame dimensions.