You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
49 lines
1.5 KiB
49 lines
1.5 KiB
//--------------------------------------------------------------------------- |
|
|
|
#ifndef Unit1H |
|
#define Unit1H |
|
//--------------------------------------------------------------------------- |
|
#include <System.Classes.hpp> |
|
#include <FMX.Controls.hpp> |
|
#include <FMX.Forms.hpp> |
|
#include <FMX.Controls.Presentation.hpp> |
|
#include <FMX.Memo.hpp> |
|
#include <FMX.Memo.Types.hpp> |
|
#include <FMX.ScrollBox.hpp> |
|
#include <FMX.Types.hpp> |
|
#include <FMX.Platform.Win.hpp> |
|
#include <FMX.StdCtrls.hpp> |
|
#include <FMX.Objects.hpp> |
|
#include <FMX.Edit.hpp> |
|
|
|
//--------------------------------------------------------------------------- |
|
class TForm1 : public TForm |
|
{ |
|
__published: // IDE で管理されるコンポーネント |
|
TMemo *Memo1; |
|
TImage *Image1; |
|
TTrackBar *TrackBar1; |
|
TEdit *Edit1; |
|
TLabel *Label1; |
|
TLabel *Label2; |
|
TLabel *Label3; |
|
// void __fastcall FormDestroy(TObject *Sender); |
|
void __fastcall FormClose(TObject *Sender, TCloseAction &Action); |
|
void __fastcall TrackBar1Change(TObject *Sender); |
|
void __fastcall Edit1Exit(TObject *Sender); |
|
//void __fastcall Button1Click(TObject *Sender); |
|
private: // ユーザー宣言 |
|
|
|
|
|
public: |
|
|
|
//LRESULT __fastcall WndProc（HWND、hWnd、UINT Msg、WPARAM wParam、LPARAM lParam）; |
|
//LRESULT __fastcall WndProc(HWND hWnd,UINT Msg,WPARAM wParam,LPARAM lParam); |
|
|
|
public: // ユーザー宣言 |
|
__fastcall TForm1(TComponent* Owner); |
|
}; |
|
//--------------------------------------------------------------------------- |
|
extern PACKAGE TForm1 *Form1; |
|
//--------------------------------------------------------------------------- |
|
#endif
|
|
|