uintercol.hpp

中式财务栏 表格式录入 运行时设置可显示列、列名、列宽

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

// (DO NOT EDIT: machine generated header) 'Uintercol.pas' rev: 10.00

#ifndef UintercolHPP
#define UintercolHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Db.hpp>	// Pascal unit
#include <Dbgrideh.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Printers.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Prndbgeh.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Adodb.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Dbctrls.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit

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

namespace Uintercol
{
//-- type declarations -------------------------------------------------------
//-- var, const, procedure ---------------------------------------------------
extern PACKAGE Menus::TPopupMenu* __fastcall GetPopupMenuA(Forms::TForm* AOwner, Classes::TNotifyEvent n);
extern PACKAGE void __fastcall MenuItemClickA(Menus::TMenuItem* AMenuItem, Dbgrideh::TDBGridEh* ADBGridEH, Forms::TForm* AOwner);
extern PACKAGE void __fastcall ShowFilterFormA(Dbgrideh::TDBGridEh* AGrid);
extern PACKAGE void __fastcall ShowChartA(Dbgrideh::TDBGridEh* AGrid, AnsiString ATitle = "");
extern PACKAGE void __fastcall CHNDBNavigatorA(Dbctrls::TDBNavigator* ADBNavigator);
extern PACKAGE void __fastcall SetDbGridEHPropertyA(Dbgrideh::TDBGridEh* AGrid, bool AFilter = false);
extern PACKAGE void __fastcall RestoreGridLayOutA(Dbgrideh::TDBGridEh* AGrid);
extern PACKAGE void __fastcall SetDlgAutoCloseA(int nTime = 0x3e8, bool ADoHint = false, bool AReturn = false);
extern PACKAGE void __fastcall ShowWaitA(AnsiString Text = "");
extern PACKAGE void __fastcall PrntA(Dbgrideh::TDBGridEh* AGrid, Forms::TForm* AOwner, AnsiString APageHeader = "", Prndbgeh::TPageColontitleLineType ALineType = (Prndbgeh::TPageColontitleLineType)(0x0));
extern PACKAGE void __fastcall ShowDisplayA(Adodb::TADOQuery* AQuery);
extern PACKAGE void __fastcall SetDisplayFormatA(Db::TDataSet* ADataset);
extern PACKAGE void __fastcall ShowGroupA(Dbgrideh::TDBGridEh* AGrid);
extern PACKAGE void __fastcall SetDbGridEhFootA(Dbgrideh::TDBGridEh* pDbGrid, AnsiString pcFields, int AFlag = 0x3, Dbgrideh::TFooterValueType AValueType = (Dbgrideh::TFooterValueType)(0x1));
extern PACKAGE void __fastcall ExpDbgridEhA(Dbgrideh::TDBGridEh* grid, bool OpenExcel = true);
extern PACKAGE void __fastcall ImpDbgridEhA(Dbgrideh::TDBGridEh* grid);
extern PACKAGE void __fastcall FindPublicShowA(Dbgrideh::TDBGridEh* AGrid);
extern PACKAGE void __fastcall ShowGridColEditorA(Dbgrideh::TDBGridEh* Grid);

}	/* namespace Uintercol */
using namespace Uintercol;
#pragma pack(pop)
#pragma option pop

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