bcutilities.hpp

Virtual CD Sample driver

// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'BcUtilities.pas' rev: 5.00

#ifndef BcUtilitiesHPP
#define BcUtilitiesHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Graphics.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Bcutilities
{
//-- type declarations -------------------------------------------------------
#pragma pack(push, 1)
struct TColorQuad
{
	Byte Red;
	Byte Green;
	Byte Blue;
	Byte Alpha;
} ;
#pragma pack(pop)

#pragma pack(push, 1)
struct TSmallColorQuad
{
	Byte Red;
	Byte Green;
	Byte Blue;
} ;
#pragma pack(pop)

struct TLargeColorQuad
{
	int Red;
	int Green;
	int Blue;
	int Alpha;
} ;

#pragma pack(push, 1)
struct T24bitScanLineElement
{
	Byte Blue;
	Byte Green;
	Byte Red;
} ;
#pragma pack(pop)

#pragma pack(push, 1)
struct T32bitScanLineElement
{
	Byte Blue;
	Byte Green;
	Byte Red;
	Byte Alpha;
} ;
#pragma pack(pop)

typedef T24bitScanLineElement T24bitQuadScanLine[21846];

typedef T24bitScanLineElement *P24bitQuadScanLine;

typedef T32bitScanLineElement T32bitQuadScanLine[21846];

typedef T32bitScanLineElement *P32bitQuadScanLine;

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall Error(System::PResStringRec ResStr);
extern PACKAGE T24bitScanLineElement __fastcall ColorTo24bitScanLineElement(Graphics::TColor Color);
	
extern PACKAGE T32bitScanLineElement __fastcall ColorTo32bitScanLineElement(Graphics::TColor Color);
	
extern PACKAGE Graphics::TColor __fastcall RGB(Byte Red, Byte Green, Byte Blue, Byte Alpha);
extern PACKAGE int __fastcall Min(int Value1, int Value2);
extern PACKAGE int __fastcall Max(int Value1, int Value2);

}	/* namespace Bcutilities */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Bcutilities;
#endif
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// BcUtilities