Initial commit

ChartFormUnit.h

@@ -0,0 +1,48 @@
+//---------------------------------------------------------------------------
+
+#ifndef ChartFormUnitH
+#define ChartFormUnitH
+//---------------------------------------------------------------------------
+#include <System.Classes.hpp>
+#include <Vcl.Controls.hpp>
+#include <Vcl.StdCtrls.hpp>
+#include <Vcl.Forms.hpp>
+#include <Vcl.TitleBarCtrls.hpp>
+
+#include "ContentPanel.h"
+#include <Vcl.Tabs.hpp>
+#include <Vcl.ExtCtrls.hpp>
+
+//---------------------------------------------------------------------------
+class TChartForm : public TForm
+{
+__published:	// IDE-managed Components
+	TTabSet *m_tsTop;
+	TLabel *Label1;
+	TPanel *m_panTU;
+	TLabel *m_lblRunTime;
+	void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
+	void __fastcall FormCreate(TObject *Sender);
+	void __fastcall TopDrawTab(TObject *Sender, TCanvas *TabCanvas, TRect &R, int Index, bool Selected);
+	void __fastcall TopMeasureTab(TObject *Sender, int Index, int &TabWidth);
+	void __fastcall FormResize(TObject *Sender);
+	void __fastcall TopChange(TObject *Sender, int NewTab, bool &AllowChange);
+	void __fastcall FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift);
+private:	// User declarations
+	TPanel* m_panChart;
+
+    void __fastcall ShowRunTime();
+	MESSAGE void __fastcall UMRunTime(TMessage &msg);
+    MESSAGE void __fastcall UMChartUpdate(TMessage &msg);
+
+	BEGIN_MESSAGE_MAP
+		MESSAGE_HANDLER(UM_RUN_TIME, TMessage, UMRunTime)
+        MESSAGE_HANDLER(UM_CHART_UPDATE, TMessage, UMChartUpdate)
+	END_MESSAGE_MAP(TForm)
+public:		// User declarations
+	__fastcall TChartForm(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TChartForm *ChartForm;
+//---------------------------------------------------------------------------
+#endif