aceview.hpp

suite component ace report

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

// (DO NOT EDIT: machine generated header) 'AceView.pas' rev: 4.00

#ifndef AceViewHPP
#define AceViewHPP

#pragma delphiheader begin
#pragma option push -w-
#include <AceSetup.hpp>	// Pascal unit
#include <AceMeter.hpp>	// Pascal unit
#include <AceFile.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <AcePrev.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Aceview
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum AceView__1 { vmGenerating, vmPrinting };
#pragma option pop

typedef Set<AceView__1, vmGenerating, vmPrinting>  TAceViewerMode;

class DELPHICLASS TAceViewer;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TAceViewer : public Forms::TForm 
{
	typedef Forms::TForm inherited;
	
__published:
	Aceprev::TAcePreview* LeftPreview;
	Dialogs::TPrinterSetupDialog* PrinterSetup;
	Menus::TMainMenu* MainMenu1;
	Menus::TMenuItem* File1;
	Menus::TMenuItem* Open1;
	Menus::TMenuItem* Close1;
	Menus::TMenuItem* N1;
	Menus::TMenuItem* Save1;
	Menus::TMenuItem* N2;
	Menus::TMenuItem* PrintSetup1;
	Menus::TMenuItem* Print1;
	Menus::TMenuItem* N3;
	Menus::TMenuItem* mitemExit;
	Dialogs::TOpenDialog* OpenFileDialog;
	Dialogs::TSaveDialog* SaveFileDialog;
	Extctrls::TPanel* ToolBar;
	Buttons::TSpeedButton* sendprinter;
	Buttons::TSpeedButton* btnClose;
	Stdctrls::TComboBox* ZoomValues;
	Menus::TMenuItem* ViewToolbar;
	Menus::TMenuItem* TwoPages;
	Aceprev::TAcePreview* RightPreview;
	Extctrls::TPanel* Divider;
	Extctrls::TPanel* CursorPosition;
	Buttons::TSpeedButton* firstpage;
	Buttons::TSpeedButton* PreviousPage;
	Buttons::TSpeedButton* NextPage;
	Buttons::TSpeedButton* LastPage;
	Stdctrls::TLabel* PageNum;
	Menus::TMenuItem* Options1;
	Menus::TMenuItem* Synchronized;
	Acemeter::TAceMeter* LoadMeter;
	Buttons::TSpeedButton* Stop;
	Menus::TMenuItem* Navigate1;
	Menus::TMenuItem* Next1;
	Menus::TMenuItem* Back1;
	Menus::TMenuItem* FirstPage1;
	Menus::TMenuItem* LastPage1;
	Menus::TMenuItem* GotoPage1;
	void __fastcall Open1Click(System::TObject* Sender);
	void __fastcall Save1Click(System::TObject* Sender);
	void __fastcall PrintSetup1Click(System::TObject* Sender);
	void __fastcall btnCloseClick(System::TObject* Sender);
	void __fastcall ViewToolbarClick(System::TObject* Sender);
	void __fastcall TwoPagesClick(System::TObject* Sender);
	void __fastcall LeftPreviewClick(System::TObject* Sender);
	void __fastcall FormCreate(System::TObject* Sender);
	void __fastcall RightPreviewClick(System::TObject* Sender);
	void __fastcall firstpageClick(System::TObject* Sender);
	void __fastcall PreviousPageClick(System::TObject* Sender);
	void __fastcall NextPageClick(System::TObject* Sender);
	void __fastcall LastPageClick(System::TObject* Sender);
	void __fastcall DividerMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall DividerMouseMove(System::TObject* Sender, Classes::TShiftState Shift, int X, int Y)
		;
	void __fastcall DividerMouseUp(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall Close1Click(System::TObject* Sender);
	void __fastcall ZoomValuesChange(System::TObject* Sender);
	void __fastcall SynchronizedClick(System::TObject* Sender);
	void __fastcall LeftPreviewVertScroll(System::TObject* Sender);
	void __fastcall LeftPreviewHorzScroll(System::TObject* Sender);
	void __fastcall RightPreviewVertScroll(System::TObject* Sender);
	void __fastcall RightPreviewHorzScroll(System::TObject* Sender);
	void __fastcall sendprinterClick(System::TObject* Sender);
	void __fastcall FormClose(System::TObject* Sender, Forms::TCloseAction &Action);
	void __fastcall StopClick(System::TObject* Sender);
	void __fastcall FormDestroy(System::TObject* Sender);
	void __fastcall GotoPage1Click(System::TObject* Sender);
	void __fastcall ToolBarMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall sendprinterMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
		Shift, int X, int Y);
	void __fastcall ToolBarDblClick(System::TObject* Sender);
	
private:
	bool MouseIsDown;
	bool ShowFirst;
	Classes::TNotifyEvent FOnAbort;
	bool FGenerating;
	TAceViewerMode FViewerMode;
	void __fastcall SetGenerating(bool Value);
	
public:
	Aceprev::TAcePreview* CurrentPreview;
	float __fastcall GetLoadPercent(void);
	void __fastcall SelectPreview(Aceprev::TAcePreview* p);
	void __fastcall UpdatePage(void);
	void __fastcall SetAceFile(Acefile::TAceFile* AF);
	void __fastcall UpdateStatus(System::TObject* Sender);
	__property Classes::TNotifyEvent OnAbort = {read=FOnAbort, write=FOnAbort};
	__property bool Generating = {read=FGenerating, write=SetGenerating, nodefault};
	__property TAceViewerMode ViewerMode = {read=FViewerMode, write=FViewerMode, nodefault};
	void __fastcall UpdateControls(void);
	void __fastcall SetZoom(Aceprev::TAceZoom Zoom);
public:
	#pragma option push -w-inl
	/* TCustomForm.Create */ inline __fastcall virtual TAceViewer(Classes::TComponent* AOwner) : Forms::TForm(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.CreateNew */ inline __fastcall virtual TAceViewer(Classes::TComponent* AOwner, int Dummy
		) : Forms::TForm(AOwner, Dummy) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.Destroy */ inline __fastcall virtual ~TAceViewer(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAceViewer(HWND ParentWindow) : Forms::TForm(ParentWindow
		) { }
	#pragma option pop
	
};

#pragma pack(pop)

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE TAceViewer* AceViewer;
extern PACKAGE AnsiString AceViewerDir;

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

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