hellweg2d/MainUnit.h at master · matsievskiysv/hellweg2d · GitHub

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
79
80
81
82
83
84
85
86
87
88
89
//---------------------------------------------------------------------------

#ifndef MainUnitH
#define MainUnitH
//---------------------------------------------------------------------------

#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.ExtCtrls.hpp>
#include <Vcl.ComCtrls.hpp>
#include <Vcl.Dialogs.hpp>

#include "Types.h"
#include "BeamSolver.h"
#include "GeometryForm.h"
#include "ResultsForm.h"
#include "OptimizerUnit.h"

//---------------------------------------------------------------------------
class TMainForm : public TForm
{
__published:	// IDE-managed Components
	TButton *SelectFileButton;
	TButton *SolveButton;
	TButton *ExitButton;
	TOpenDialog *InputDialog;
	TGroupBox *InputGroup;
	TLabel *Label_P0;
	TLabel *Label_I0;
	TLabel *Label_F0;
	TLabel *Label_Np;
	TLabel *Label_B0;
	TLabel *Label_Length;
	TLabel *Label_Position;
	TLabel *Label_W0;
	TLabel *Label_Phi0;
	TLabel *Label_dW;
	TLabel *Label_dPhi;
	TLabel *Label1;
	TLabel *Label_Alpha;
	TLabel *Label_Betta;
	TLabel *Label_Emittance;
	TLabel *Label2;
	TLabel *Label_Coulomb;
	TLabel *Label_Wave;
	TLabel *Label_WDist;
	TLabel *Label_PhiDist;
	TLabel *Label_Cells;
	TButton *ViewGeometryButton;
	TButton *ViewBeamButton;
	TGroupBox *SolverGroup;
	TGroupBox *ResultsGroup;
	TButton *AbortButton;
	TGroupBox *ControlGroup;
	TMemo *ResultsMemo;
	TPanel *MemoPanel;
	TPanel *ActPanel;
	TButton *ViewButton;
	TButton *LoadResultsButton;
	TButton *OptButton;
	void __fastcall ExitButtonClick(TObject *Sender);
	void __fastcall FormCreate(TObject *Sender);
	void __fastcall FormDestroy(TObject *Sender);
	void __fastcall SelectFileButtonClick(TObject *Sender);
	void __fastcall FormCanResize(TObject *Sender, int &NewWidth, int &NewHeight,
          bool &Resize);
	void __fastcall SolveButtonClick(TObject *Sender);
	void __fastcall ViewBeamButtonClick(TObject *Sender);
	void __fastcall ViewGeometryButtonClick(TObject *Sender);
	void __fastcall AbortButtonClick(TObject *Sender);
	void __fastcall ViewButtonClick(TObject *Sender);
	void __fastcall LoadResultsButtonClick(TObject *Sender);
	void __fastcall OptButtonClick(TObject *Sender);
private:	// User declarations
	TBeamSolver *Solver;
	void DisplayError();
	void DisplayInputData();
	bool LoadInputData(bool display_err);
	TError ERR;
	AnsiString InputFileName;
public:		// User declarations
	__fastcall TMainForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif