CPP_Builder/TPVwin
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

First commit 14/02/1999

Browse Source
This commit is contained in:
José David Guillén
2021-09-12 22:19:30 +02:00
commit d031fca570
464 changed files with 22399 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

84
Inicio1.h Normal file
View File

@ -0,0 +1,84 @@
//---------------------------------------------------------------------------
#ifndef Inicio1H
#define Inicio1H
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include <vcl\ExtCtrls.hpp>
#include <vcl\Buttons.hpp>
#include <vcl\ComCtrls.hpp>
#include <DBTables.hpp>
#include <Db.hpp>
//---------------------------------------------------------------------------
typedef struct {
AnsiString NombreApartado;
AnsiString ImagenApartado;
bool Disable[10];
AnsiString NBoton[10];
AnsiString IBoton[10];
} InfoMenu;
class TMenuInicio : public TForm
{
__published: // IDE-managed Components
TImage *Image1;
TBevel *Bevel1;
TBevel *Bevel2;
TBitBtn *BitBtn1;
TBevel *Bevel3;
TBitBtn *BitBtn2;
TBitBtn *BitBtn3;
TLabel *Label1;
TBevel *Bevel4;
TBitBtn *BitBtn4;
TBitBtn *BitBtn5;
TBitBtn *BitBtn6;
TBitBtn *BitBtn7;
TBitBtn *BitBtn8;
TBitBtn *BitBtn9;
TBitBtn *BitBtn10;
TBitBtn *BitBtn11;
TBitBtn *BitBtn12;
TBitBtn *BitBtn13;
TDatabase *Empresas;
TAnimate *Animate1;
void __fastcall BitBtn1Click(TObject *Sender);
void __fastcall FormCreate(TObject *Sender);
void __fastcall BitBtn3Click(TObject *Sender);
void __fastcall BitBtn2Click(TObject *Sender);
void __fastcall BitBtn4Click(TObject *Sender);
void __fastcall BitBtn5Click(TObject *Sender);
void __fastcall BitBtn6Click(TObject *Sender);
void __fastcall BitBtn7Click(TObject *Sender);
void __fastcall BitBtn8Click(TObject *Sender);
void __fastcall BitBtn9Click(TObject *Sender);
void __fastcall BitBtn10Click(TObject *Sender);
void __fastcall BitBtn11Click(TObject *Sender);
void __fastcall BitBtn12Click(TObject *Sender);
void __fastcall BitBtn13Click(TObject *Sender);
void __fastcall Image1Click(TObject *Sender);
private: // User declarations
short ApartadoActual;
InfoMenu ApartadoMenu[10];
void __fastcall MuestraApartado( short Apartado );
void __fastcall MuestraBotones( TBitBtn *Sender, short nBoton, short Apartado );
void __fastcall RellenaBotonApartado( short Apartado, short Boton, AnsiString nBoton, AnsiString iBoton );
public: // User declarations
__fastcall TMenuInicio(TComponent* Owner);
void __fastcall RunInDLL(AnsiString dll_File, AnsiString dll_Funcion);
bool TablaDeAcceso[10][10];
};
//---------------------------------------------------------------------------
extern TMenuInicio *MenuInicio;
//---------------------------------------------------------------------------
#endif