TPVwin/ListInit.cpp
2021-09-12 22:19:30 +02:00

27 lines
758 B
C++

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "ListInit.h"
#include "TpvVentas.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TAcercaDe *AcercaDe;
//---------------------------------------------------------------------------
__fastcall TAcercaDe::TAcercaDe(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TAcercaDe::Timer1Timer(TObject *Sender)
{
Timer1->Enabled = false;
Hide();
Ventas->ShowModal();
Close();
}
//---------------------------------------------------------------------------