acepset.hpp

suite component ace report

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

// (DO NOT EDIT: machine generated header) 'AcePSet.pas' rev: 3.00

#ifndef AcePSetHPP
#define AcePSetHPP
#include <Graphics.hpp>
#include <Dialogs.hpp>
#include <CommDlg.hpp>
#include <Classes.hpp>
#include <Windows.hpp>
#include <WinSpool.hpp>
#include <SysInit.hpp>
#include <System.hpp>

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

namespace Acepset
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TAceBinInfo;
class PASCALIMPLEMENTATION TAceBinInfo : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	System::AnsiString binName;
	Word binNumber;
public:
	/* TObject.Create */ __fastcall TAceBinInfo(void) : System::TObject() { }
	/* TObject.Destroy */ __fastcall virtual ~TAceBinInfo(void) { }
	
};

class DELPHICLASS TAceResolution;
class PASCALIMPLEMENTATION TAceResolution : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	int HorzRes;
	int VertRes;
public:
	/* TObject.Create */ __fastcall TAceResolution(void) : System::TObject() { }
	/* TObject.Destroy */ __fastcall virtual ~TAceResolution(void) { }
	
};

class DELPHICLASS TAcePaper;
class PASCALIMPLEMENTATION TAcePaper : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	System::AnsiString PaperName;
	Word PaperNum;
	tagPOINT PaperSize;
public:
	/* TObject.Create */ __fastcall TAcePaper(void) : System::TObject() { }
	/* TObject.Destroy */ __fastcall virtual ~TAcePaper(void) { }
	
};

class DELPHICLASS TAcePrinterInfo;
class DELPHICLASS TAcePrinterSettings;
class PASCALIMPLEMENTATION TAcePrinterSettings : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	int FPSProperties[13];
	System::AnsiString FFormName;
	bool FPrintSet[14];
	int FPropCount;
	bool FCustomPaperSize;
	
protected:
	int __fastcall GetPSProperty(int Index);
	void __fastcall SetPSProperty(int Index, int Value);
	void __fastcall SetFormName(System::AnsiString Value);
	
public:
	__fastcall virtual TAcePrinterSettings(void);
	__fastcall virtual ~TAcePrinterSettings(void);
	virtual void __fastcall Assign(System::TObject* Source);
	void __fastcall GetValues(void);
	void __fastcall SetValues(void);
	__property int Orientation = {read=GetPSProperty, write=SetPSProperty, index=0, nodefault};
	__property int PaperSize = {read=GetPSProperty, write=SetPSProperty, index=1, nodefault};
	__property int PaperLength = {read=GetPSProperty, write=SetPSProperty, index=2, nodefault};
	__property int PaperWidth = {read=GetPSProperty, write=SetPSProperty, index=3, nodefault};
	__property int Scale = {read=GetPSProperty, write=SetPSProperty, index=4, nodefault};
	__property int Copies = {read=GetPSProperty, write=SetPSProperty, index=5, nodefault};
	__property int DefaultSource = {read=GetPSProperty, write=SetPSProperty, index=6, nodefault};
	__property int PrintQuality = {read=GetPSProperty, write=SetPSProperty, index=7, nodefault};
	__property int Color = {read=GetPSProperty, write=SetPSProperty, index=8, nodefault};
	__property int Duplex = {read=GetPSProperty, write=SetPSProperty, index=9, nodefault};
	__property int YResolution = {read=GetPSProperty, write=SetPSProperty, index=10, nodefault};
	__property int TTOption = {read=GetPSProperty, write=SetPSProperty, index=11, nodefault};
	__property int Collate = {read=GetPSProperty, write=SetPSProperty, index=12, nodefault};
	__property System::AnsiString FormName = {read=FFormName, write=SetFormName};
	__property bool CustomPaperSize = {read=FCustomPaperSize, write=FCustomPaperSize, nodefault};
};

class PASCALIMPLEMENTATION TAcePrinterInfo : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	Classes::TList* FBinList;
	int FCopies;
	bool FDuplex;
	Classes::TList* FResolutions;
	tagPOINT FMaxExtent;
	tagPOINT FMinExtent;
	Classes::TList* FPaperList;
	System::AnsiString FPrinterName;
	int FTrueType;
	char Device[80];
	char Driver[80];
	char Port[80];
	int Handle;
	int DevHandle;
	_devicemodeA *DeviceMode;
	TAcePrinterSettings* FPrinterSettings;
	void __fastcall GetPrinter(bool Reset);
	void __fastcall FillBinList(void);
	void __fastcall SetCopies(void);
	void __fastcall SetDuplex(void);
	void __fastcall SetResolutions(void);
	void __fastcall SetPapers(void);
	System::AnsiString __fastcall GetBinName(int Source);
	bool __fastcall CompareStrings(System::AnsiString source, System::AnsiString dest);
	TAceBinInfo* __fastcall GetBinByNum(int BinNum);
	
protected:
	bool __fastcall PrinterChanged(void);
	void __fastcall GetDeviceMode(bool Reset);
	void __fastcall ReleaseDeviceMode(void);
	
public:
	__fastcall virtual TAcePrinterInfo(void);
	__fastcall virtual ~TAcePrinterInfo(void);
	virtual void __fastcall Assign(System::TObject* Source);
	void __fastcall Update(void);
	__property TAcePrinterSettings* PrinterSettings = {read=FPrinterSettings, write=FPrinterSettings};
	__property Classes::TList* BinList = {read=FBinList, write=FBinList};
	__property int Copies = {read=FCopies, write=FCopies, nodefault};
	__property bool Duplex = {read=FDuplex, write=FDuplex, nodefault};
	__property Classes::TList* Resolutions = {read=FResolutions, write=FResolutions};
	__property Classes::TList* PaperList = {read=FPaperList, write=FPaperList};
	__property int TrueType = {read=FTrueType, write=FTrueType, nodefault};
	TAcePaper* __fastcall GetPaperByNum(int Value);
	TAcePaper* __fastcall GetPaperByName(System::AnsiString FormName);
	TAcePaper* __fastcall FindPaperByName(System::AnsiString FormName);
	System::AnsiString __fastcall GetPaperName(int Value);
	TAceResolution* __fastcall GetResolution(int HorzRes, int VertRes);
	TAceBinInfo* __fastcall FindBinByNum(int BinNum);
	TAceBinInfo* __fastcall FindBinByName(System::AnsiString BinName);
};

enum TAcePrintSettings { apsOrientation, apsPaperSize, apsPaperLength, apsPaperWidth, apsScale, apsCopies, 
	apsDefaultSource, apsPrintQuality, apsColor, apsDuplex, apsYResolution, apsTTOption, apsCollate, apsFormName 
	};

enum TAceWinVersion { awvWin31, awvWin95, awvWinNT };

//-- var, const, procedure ---------------------------------------------------
extern "C" int __stdcall DeviceCapabilitiesA(char * pDevice, char * pPort, Word fwCapability, char * 
	pOutput, Windows::PDeviceModeA DevMode);
extern "C" int __stdcall DeviceCapabilitiesW(wchar_t * pDevice, wchar_t * pPort, Word fwCapability, 
	wchar_t * pOutput, Windows::PDeviceModeW DevMode);
extern "C" int __stdcall DeviceCapabilities(char * pDevice, char * pPort, Word fwCapability, char * 
	pOutput, Windows::PDeviceModeA DevMode);
extern PACKAGE void __fastcall AceResetPrinter(void);
extern PACKAGE TAceWinVersion __fastcall AceWinVersion(void);
extern PACKAGE int __fastcall AceGetPrinterCount(void);

#if defined(UNICODE)
inline int __stdcall DeviceCapabilities(char * pDevice, char * pPort, Word fwCapability, char * pOutput
	, Windows::PDeviceModeA DevMode)
{
	return DeviceCapabilitiesW(pDevice, pPort, fwCapability, pOutput, DevMode);
}
#else
inline int __stdcall DeviceCapabilities(char * pDevice, char * pPort, Word fwCapability, char * pOutput
	, Windows::PDeviceModeA DevMode)
{
	return DeviceCapabilitiesA(pDevice, pPort, fwCapability, pOutput, DevMode);
}
#endif


}	/* namespace Acepset */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Acepset;
#endif
//-- end unit ----------------------------------------------------------------
#endif	// AcePSet