examples/CBuilder/exenumfu.h

// ***** BEGIN LICENSE BLOCK *****
// * Version: MPL 1.1
// *
// * The contents of this file are subject to the Mozilla Public License Version
// * 1.1 (the "License"); you may not use this file except in compliance with
// * the License. You may obtain a copy of the License at
// * http://www.mozilla.org/MPL/
// *
// * Software distributed under the License is distributed on an "AS IS" basis,
// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
// * for the specific language governing rights and limitations under the
// * License.
// *
// * The Original Code is TurboPower SysTools
// *
// * The Initial Developer of the Original Code is
// * TurboPower Software
// *
// * Portions created by the Initial Developer are Copyright (C) 1996-2002
// * the Initial Developer. All Rights Reserved.
// *
// * Contributor(s):
// *
// * ***** END LICENSE BLOCK *****
//---------------------------------------------------------------------------
#ifndef exenumfuH
#define exenumfuH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>

#include "StSystem.hpp"
//---------------------------------------------------------------------------

bool StopIt;

class TForm1 : public TForm
{
__published:    // IDE-managed Components
   TLabel *Label1;
   TButton *Button1;
   TEdit *Edit1;
   TCheckBox *CheckBox1;
   TListBox *ListBox1;
   TCheckBox *CheckBox2;
   TButton *Button2;
   void __fastcall Button2Click(TObject *Sender);
   void __fastcall FormCreate(TObject *Sender);
   void __fastcall FormDestroy(TObject *Sender);
   void __fastcall Button1Click(TObject *Sender);
private:        // User declarations
public:         // User declarations
   __fastcall TForm1(TComponent* Owner);

  TStringList* AList;
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
1	torben	2671	// *** BEGIN LICENSE BLOCK ***
2			// * Version: MPL 1.1
3			// *
4			// * The contents of this file are subject to the Mozilla Public License Version
5			// * 1.1 (the "License"); you may not use this file except in compliance with
6			// * the License. You may obtain a copy of the License at
7			// * http://www.mozilla.org/MPL/
8			// *
9			// * Software distributed under the License is distributed on an "AS IS" basis,
10			// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
11			// * for the specific language governing rights and limitations under the
12			// * License.
13			// *
14			// * The Original Code is TurboPower SysTools
15			// *
16			// * The Initial Developer of the Original Code is
17			// * TurboPower Software
18			// *
19			// * Portions created by the Initial Developer are Copyright (C) 1996-2002
20			// * the Initial Developer. All Rights Reserved.
21			// *
22			// * Contributor(s):
23			// *
24			// * *** END LICENSE BLOCK ***
25			//---------------------------------------------------------------------------
26			#ifndef exenumfuH
27			#define exenumfuH
28			//---------------------------------------------------------------------------
29			#include <Classes.hpp>
30			#include <Controls.hpp>
31			#include <StdCtrls.hpp>
32			#include <Forms.hpp>
33
34			#include "StSystem.hpp"
35			//---------------------------------------------------------------------------
36
37			bool StopIt;
38
39			class TForm1 : public TForm
40			{
41			__published: // IDE-managed Components
42			TLabel *Label1;
43			TButton *Button1;
44			TEdit *Edit1;
45			TCheckBox *CheckBox1;
46			TListBox *ListBox1;
47			TCheckBox *CheckBox2;
48			TButton *Button2;
49			void __fastcall Button2Click(TObject *Sender);
50			void __fastcall FormCreate(TObject *Sender);
51			void __fastcall FormDestroy(TObject *Sender);
52			void __fastcall Button1Click(TObject *Sender);
53			private: // User declarations
54			public: // User declarations
55			__fastcall TForm1(TComponent* Owner);
56
57			TStringList* AList;
58			};
59			//---------------------------------------------------------------------------
60			extern PACKAGE TForm1 *Form1;
61			//---------------------------------------------------------------------------
62			#endif