First commit 14/02/1999
This commit is contained in:
26
ListInit.cpp
Normal file
26
ListInit.cpp
Normal file
@ -0,0 +1,26 @@
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
#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();
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
Reference in New Issue
Block a user