First commit 25/10/1998

2021-09-12 22:21:22 +02:00
commit ce9a6b7473
22 changed files with 1236 additions and 0 deletions
--- a/TPropiedades.h
+++ b/TPropiedades.h
@ -0,0 +1,98 @@
+//---------------------------------------------------------------------------
+#ifndef TPropiedadesH
+#define TPropiedadesH
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include <ComCtrls.hpp>
+#include <ExtCtrls.hpp>
+#include <Buttons.hpp>
+#include "DialUp.h"
+//---------------------------------------------------------------------------
+class TPropiedades : public TForm
+{
+__published:	// IDE-managed Components
+    TStatusBar *StatusBar1;
+    TPageControl *PageControl1;
+    TTabSheet *TabSheet1;
+    TBevel *Bevel1;
+    TLabel *Label1;
+    TComboBox *ConexionesDisponibles;
+    TDateTimePicker *HoraL;
+    TDateTimePicker *HoraU;
+    TLabel *Label2;
+    TLabel *Label3;
+    TLabel *Label4;
+    TDateTimePicker *HoraD;
+    TBitBtn *RefrescarConexiones;
+    TDialUp *DialUp1;
+    TTimer *TimerDialUp;
+    TCheckBox *Reconectar;
+    TEdit *NumReconexiones;
+    TUpDown *bReintentos;
+    TLabel *Label5;
+    TDateTimePicker *HoraR;
+    TTabSheet *TabSheet2;
+    TBevel *Bevel2;
+    TMemo *mHistorial;
+    TSpeedButton *BorrarHistorial;
+    TCheckBox *Historial;
+    TTabSheet *TabSheet3;
+    TBevel *Bevel3;
+    TCheckBox *OnExit;
+    TCheckBox *AutoRun;
+    TCheckBox *ShutDown;
+    TDateTimePicker *HoraS;
+    TButton *bAceptar;
+    TButton *bCancelar;
+    TButton *bAplicar;
+    TBevel *Bevel4;
+    void __fastcall HoraLChange(TObject *Sender);
+    void __fastcall HoraDChange(TObject *Sender);
+    void __fastcall HoraUChange(TObject *Sender);
+    
+    void __fastcall RefrescarConexionesClick(TObject *Sender);
+    
+     
+    
+
+    void __fastcall DialUp1EntryGet(TObject *Sender, AnsiString EntryName);
+    void __fastcall TimerDialUpTimer(TObject *Sender);
+    
+    void __fastcall HoraRChange(TObject *Sender);
+    void __fastcall DialUp1Error(TObject *Sender, int ErrorCode,
+          AnsiString ErrorMessage);
+    void __fastcall ConexionesDisponiblesChange(TObject *Sender);
+    void __fastcall FormDestroy(TObject *Sender);
+    void __fastcall OnExitClick(TObject *Sender);
+    void __fastcall BorrarHistorialClick(TObject *Sender);
+    void __fastcall mHistorialChange(TObject *Sender);
+    void __fastcall ReconectarClick(TObject *Sender);
+    void __fastcall NumReconexionesChange(TObject *Sender);
+    void __fastcall HistorialClick(TObject *Sender);
+    void __fastcall bReintentosClick(TObject *Sender, TUDBtnType Button);
+    void __fastcall AutoRunClick(TObject *Sender);
+    void __fastcall ShutDownClick(TObject *Sender);
+    void __fastcall bAceptarClick(TObject *Sender);
+    void __fastcall bCancelarClick(TObject *Sender);
+    void __fastcall bAplicarClick(TObject *Sender);
+    void __fastcall DialUp1Dialing(TObject *Sender);
+    void __fastcall DialUp1AsyncEvent(TObject *Sender, int State,
+          int Error, AnsiString MessageText);
+private:	// User declarations
+    void __fastcall ResetEstados(void);
+    void __fastcall CargaEstados(void);
+    void __fastcall SalvaEstados(void);
+
+    bool connected;
+    bool DesconectarSalir;
+    short int intentos;
+public:		// User declarations
+    __fastcall TPropiedades(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TPropiedades *Propiedades;
+//---------------------------------------------------------------------------
+#endif