-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy patharchivoclientes.h
75 lines (67 loc) · 2.59 KB
/
archivoclientes.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
//---------------------------------------------------------------------------
#ifndef archivoclientesH
#define archivoclientesH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Menus.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <ComCtrls.hpp>
#include <ToolWin.hpp>
#include <ImgList.hpp>
#include <Dialogs.hpp>
#define FICHCLIENTES GetCurrentDir() + "\\clientes"
//---------------------------------------------------------------------------
class TFormArchivoClientes : public TForm
{
__published: // IDE-managed Components
TMainMenu *MainMenu;
TMenuItem *MenuItemArchivo;
TMenuItem *MenuItemCerrar;
TMenuItem *MenuItemCliente;
TMenuItem *MenuItemAgregar;
TMenuItem *MenuItemEditar;
TMenuItem *MenuItemEliminar;
TMenuItem *MenuItemVer;
TDBGrid *DBGrid;
TMenuItem *MenuItemOrdenar;
TMenuItem *MenuItemBuscar;
TImageList *ImageList;
TToolBar *ToolBar;
TToolButton *ToolButtonAgregar;
TToolButton *ToolButtonEliminar;
TToolButton *ToolButtonEditar;
TToolButton *ToolButton4;
TToolButton *ToolButtonBuscar;
TPopupMenu *PopupMenu;
TMenuItem *MenuItemAgregar2;
TMenuItem *MenuItemEditar2;
TMenuItem *MenuItemEliminar2;
void __fastcall MenuItemAgregarClick(TObject *Sender);
void __fastcall MenuItemEditarClick(TObject *Sender);
void __fastcall MenuItemEliminarClick(TObject *Sender);
void __fastcall MenuItemCerrarClick(TObject *Sender);
void __fastcall FormCreate(TObject *Sender);
void __fastcall MenuItemBuscarClick(TObject *Sender);
void __fastcall DBGridKeyPress(TObject *Sender, char &Key);
void __fastcall FormShow(TObject *Sender);
private: // User declarations
/* Mis declaraciones */
void __fastcall MenuItemOrdCol(TObject *Sender);
bool HayClientes();
void AgregarCliente();
void EditarCliente();
void EliminarCliente();
bool ConfirmarEliminacion();
public: // User declarations
__fastcall TFormArchivoClientes(TComponent* Owner);
/* Mis declaraciones */
void Mostrar();
};
//---------------------------------------------------------------------------
extern PACKAGE TFormArchivoClientes *FormArchivoClientes;
//---------------------------------------------------------------------------
#endif