85 lines
2.5 KiB
C++
85 lines
2.5 KiB
C++
//---------------------------------------------------------------------------
|
|
#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
|