forked from jose-g/solanum
-
Notifications
You must be signed in to change notification settings - Fork 0
/
UClimateAM.h
79 lines (78 loc) · 2.67 KB
/
UClimateAM.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
76
77
78
//---------------------------------------------------------------------------
#ifndef UClimateAMH
#define UClimateAMH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <Grids.hpp>
#include <Dialogs.hpp>
#include <ComCtrls.hpp>
#include "Climate.h"
#include "FileUtility.h"
//---------------------------------------------------------------------------
class TfrmClimateAM : public TForm
{
__published: // IDE-managed Components
TBitBtn *cmdCancel;
TBitBtn *cmdApply;
TEdit *Edit2;
TEdit *edPathFile;
TSpeedButton *cmdOpenClimate;
TStringGrid *sgClimate;
TEdit *Edit5;
TEdit *Edit6;
TEdit *Edit7;
TEdit *Edit8;
TEdit *edMinTemp;
TEdit *edMaxTemp;
TEdit *edPrecip;
TEdit *edRad;
TSpeedButton *cmdMinTemp;
TSpeedButton *cmdMaxTemp;
TSpeedButton *cmdPrecip;
TSpeedButton *cmdRadiation;
TOpenDialog *odClimate;
TEdit *Edit1;
TEdit *edET;
TSpeedButton *cmdET0;
TEdit *Edit4;
TEdit *edIrri;
TSpeedButton *cmdIrrigation;
TEdit *Edit10;
TEdit *edSoilTemp;
TSpeedButton *cmdSoil;
void __fastcall cmdApplyClick(TObject *Sender);
void __fastcall cmdCancelClick(TObject *Sender);
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
void __fastcall FormShow(TObject *Sender);
void __fastcall cmdOpenClimateClick(TObject *Sender);
void __fastcall cmdMinTempClick(TObject *Sender);
void __fastcall cmdMaxTempClick(TObject *Sender);
void __fastcall cmdPrecipClick(TObject *Sender);
void __fastcall cmdRadiationClick(TObject *Sender);
void __fastcall cmdET0Click(TObject *Sender);
void __fastcall cmdIrrigationClick(TObject *Sender);
void __fastcall cmdSoilClick(TObject *Sender);
private: // User declarations
bool Validate();
TEdit* FindDataError(int*);
void ShowMessageError(int);
void PutValuesOnForm();
void SaveData();
ClimateFile *cond;
ClimateFile *condTemp;
char* List[100];
char* ListTemp[100];
int num;
void CopyValuesToCondTemp();
public: // User declarations
__fastcall TfrmClimateAM(TComponent* Owner);
void EnterInformation(ClimateFile*);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmClimateAM *frmClimateAM;
//---------------------------------------------------------------------------
#endif