First commit 14/02/1999
This commit is contained in:
28
TpvBlcD_Print.cpp
Normal file
28
TpvBlcD_Print.cpp
Normal file
@ -0,0 +1,28 @@
|
||||
//----------------------------------------------------------------------------
|
||||
#include <vcl\vcl.h>
|
||||
#pragma hdrstop
|
||||
|
||||
#include "TpvBlcD_Print.h"
|
||||
#include "TpvBlcDVnt.h"
|
||||
//----------------------------------------------------------------------------
|
||||
#pragma resource "*.dfm"
|
||||
TQRBlcD_Print *QRBlcD_Print;
|
||||
//----------------------------------------------------------------------------
|
||||
__fastcall TQRBlcD_Print::TQRBlcD_Print(TComponent* Owner)
|
||||
: TQuickRep(Owner)
|
||||
{
|
||||
TCant->Caption = ((TTpvBlDVnt *)Owner)->Label15->Caption;
|
||||
TDinero->Caption = ((TTpvBlDVnt *)Owner)->Label16->Caption;
|
||||
DiaAnterior->Caption = ((TTpvBlDVnt *)Owner)->Label27->Caption;
|
||||
|
||||
LVentasT->Caption = ((TTpvBlDVnt *)Owner)->LVentasT->Caption;
|
||||
LVentasE->Caption = ((TTpvBlDVnt *)Owner)->LVentasE->Caption;
|
||||
LGastos->Caption = ((TTpvBlDVnt *)Owner)->LGastos->Caption;
|
||||
LGastosE->Caption = ((TTpvBlDVnt *)Owner)->LGastosE->Caption;
|
||||
LBeneficio->Caption = ((TTpvBlDVnt *)Owner)->LBeneficio->Caption;
|
||||
LBeneficio->Font->Color = ((TTpvBlDVnt *)Owner)->LBeneficio->Font->Color;
|
||||
LBeneficioE->Caption = ((TTpvBlDVnt *)Owner)->LBeneficioE->Caption;
|
||||
LBeneficioE->Font->Color = ((TTpvBlDVnt *)Owner)->LBeneficioE->Font->Color;
|
||||
EnCaja->Caption = ((TTpvBlDVnt *)Owner)->EnCaja->Caption;
|
||||
}
|
||||
//----------------------------------------------------------------------------
|
Reference in New Issue
Block a user