// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'SGExport.pas' rev: 6.00

#ifndef SGExportHPP
#define SGExportHPP

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

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

namespace Sgexport
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TsgExportFormat { xpBitmap, xpJPEG, xpMetafile };
#pragma option pop

class DELPHICLASS TsgExport;
class PASCALIMPLEMENTATION TsgExport : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	Graphics::TCanvas* FCanvas;
	int FWidth;
	int FHeight;
	Classes::TNotifyEvent FOnPaint;
	bool FActive;
	Graphics::TBitmap* __fastcall ExportToBitmap(Graphics::TGraphic* G);
	Jpeg::TJPEGImage* __fastcall ExportToJPEG(Graphics::TGraphic* G);
	Graphics::TMetafile* __fastcall ExportToMetafile(Graphics::TGraphic* G);
	void __fastcall Paint(Graphics::TGraphic* G);
	
public:
	void __fastcall ExportTo(Graphics::TGraphic* G, const AnsiString FName, TsgExportFormat Fmt, int W, int H);
	__property Graphics::TCanvas* Canvas = {read=FCanvas};
	__property int Width = {read=FWidth, nodefault};
	__property int Height = {read=FHeight, nodefault};
	__property bool Active = {read=FActive, nodefault};
	__property Classes::TNotifyEvent OnPaint = {read=FOnPaint, write=FOnPaint};
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TsgExport(void) : System::TObject() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TsgExport(void) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Sgexport */
using namespace Sgexport;
#pragma option pop	// -w-
#pragma option pop	// -Vx

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