first commit (2002-04-24)
This commit is contained in:
27
cap_gestion/Portada.cpp
Normal file
27
cap_gestion/Portada.cpp
Normal file
@ -0,0 +1,27 @@
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
#include <vcl.h>
|
||||
#pragma hdrstop
|
||||
|
||||
#include "Portada.h"
|
||||
#include "capg_menu.h"
|
||||
//---------------------------------------------------------------------------
|
||||
#pragma package(smart_init)
|
||||
#pragma resource "*.dfm"
|
||||
TAcercaDe *AcercaDe;
|
||||
//---------------------------------------------------------------------------
|
||||
__fastcall TAcercaDe::TAcercaDe(TComponent* Owner)
|
||||
: TForm(Owner)
|
||||
{
|
||||
Image4->Picture->LoadFromFile( "portada.jpg" );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
void __fastcall TAcercaDe::Timer1Timer(TObject *Sender)
|
||||
{
|
||||
Timer1->Enabled = false;
|
||||
this->Visible = false;
|
||||
MainForm->ShowModal();
|
||||
Close();
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
Reference in New Issue
Block a user