unit1.h

来自「与Action相结合,可以解决中文件显示乱码」· C头文件 代码 · 共 64 行

//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include <vcl\ComCtrls.hpp>
#include "RichView.hpp"
#include "RVScroll.hpp"
#include "RVPP.hpp"
#include "CRVPP.hpp"
#include "CtrlImg.hpp"
#include <vcl\ExtCtrls.hpp>
#include "RVStyle.hpp"
#include "PtblRV.hpp"
#include <vcl\Dialogs.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
    TPageControl *PageControl1;
    TTabSheet *TabSheet1;
    TRichView *RichView1;
    TTabSheet *TabSheet2;
    TRVPrintPreview *RVPrintPreview1;
    TPanel *Panel3;
    TScrollBar *ScrollBar1;
    TPanel *Panel1;
    TImage *Image1;
    TImage *Image2;
    TPanel *Panel2;
    TLabel *Label1;
    TButton *Button1;
    TEdit *Edit1;
    TButton *btnPrint;
    TRVStyle *RVStyle1;
    TRVPrint *RVPrint1;
    TPrintDialog *PrintDialog1;
    TStatusBar *StatusBar1;
    void __fastcall PageControl1Change(TObject *Sender);
    void __fastcall ScrollBar1Change(TObject *Sender);
    void __fastcall btnPrintClick(TObject *Sender);
    void __fastcall RVPrint1Formatting(TCustomRichView *Sender,
    int PageCompleted, TRVPrintingStep Step);
    void __fastcall RVPrint1SendingToPrinter(TCustomRichView *Sender,
    int PageCompleted, TRVPrintingStep Step);
    void __fastcall RVPrint1PagePrepaint(TRVPrint *Sender, int PageNo,
    TCanvas *Canvas, bool Preview, TRect &PageRect, TRect &PrintAreaRect);
    void __fastcall Panel3Resize(TObject *Sender);
private:	// User declarations
    void __fastcall RVPrint1PrintComponent(TCustomRVPrint *Sender, TControl *PrintMe,
    Graphics::TBitmap *&ComponentImage);
    bool PreviewCreated;
    void UpdatePreview();
public:		// User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TForm1 *Form1;
//---------------------------------------------------------------------------
#endif