uinto.cpp

来自「超市配货中心进销存源码 超市配货中心进销存源码」· C++ 代码 · 共 30 行

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "UInto.h"
#include "udata.h"
#include "uas.h"
#include "UPreview.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TqrfInto *qrfInto;
//--------------------------------------------------------------------- 
__fastcall TqrfInto::TqrfInto(TComponent* AOwner)
	: TQuickRep(AOwner)
{
}
//---------------------------------------------------------------------


void __fastcall TqrfInto::qrIntoPreview(TObject *Sender)
{
        MyPreview= new TMyPreview(this);
     	MyPreview->QRPreview1->QRPrinter=(TQRPrinter*)Sender;
        FMain->qrTemp=(TQuickRep *)Sender;
        MyPreview->Show();
        
}
//---------------------------------------------------------------------------