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	// *** 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