First commit 26/10/1998

TPropiedades.h

@@ -0,0 +1,52 @@
+//---------------------------------------------------------------------------
+#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 "DigitNum.h"
+//---------------------------------------------------------------------------
+class TPropiedades : public TForm
+{
+__published:	// IDE-managed Components
+    TSpeedButton *BorrarHistorial;
+    TPageControl *PageControl1;
+    TTabSheet *TabSheet1;
+    TTabSheet *TabSheet2;
+    TTabSheet *TabSheet3;
+    TStatusBar *StatusBar1;
+    TBevel *Bevel4;
+    TDigitNum *DigitNum1;
+    TPaintBox *HCalor;
+    TTimer *Cuanto;
+    TMemo *mHistorial;
+    TCheckBox *Historial;
+    TButton *bAceptar;
+    TButton *bCancelar;
+    TButton *bAplicar;
+    
+    void __fastcall BorrarHistorialClick(TObject *Sender);
+    void __fastcall FormDestroy(TObject *Sender);
+    void __fastcall mHistorialChange(TObject *Sender);
+    
+    void __fastcall FormKeyPress(TObject *Sender, char &Key);
+    void __fastcall ProcesarCuanto(TObject *Sender);
+    void __fastcall HCalorPaint(TObject *Sender);
+private:	// User declarations
+    int PosHistorica;
+    int Temp, Tmin, Tmax;
+    int *HCalorValues;
+public:		// User declarations
+    __fastcall TPropiedades(TComponent* Owner);
+    void __fastcall PintaLinea(int x, int y);
+
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TPropiedades *Propiedades;
+//---------------------------------------------------------------------------
+#endif