Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
17
Добавлен:
17.04.2013
Размер:
2.03 Кб
Скачать
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <jpeg.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
   TBevel *Bevel1;
   TBevel *Bevel2;
   TTimer *Timer1;
   TLabel *Label1;
   TEdit *Edit1;
   TBevel *Bevel3;
   TBevel *Bevel4;
   TBevel *Bevel5;
   TLabel *Label2;
   TLabel *Label3;
   TLabel *Label4;
   TLabel *Label5;
   TEdit *Edit2;
   TEdit *Edit3;
   TLabel *Label6;
   TLabel *Label7;
   TEdit *Edit4;
   TEdit *Edit5;
   TLabel *Label8;
   TEdit *Edit6;
   TLabel *Label9;
   TEdit *Edit7;
   TLabel *Label10;
   TEdit *Edit8;
   TLabel *Label11;
   TEdit *Edit9;
        TImage *Image1;
   void __fastcall Timer1Timer(TObject *Sender);
   void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
   void __fastcall Edit1Change(TObject *Sender);
   void __fastcall Edit2Change(TObject *Sender);
   void __fastcall Edit4Change(TObject *Sender);
   void __fastcall Edit3Change(TObject *Sender);
   void __fastcall Edit5Change(TObject *Sender);
private:	// User declarations
   int      X,Y,oldX,oldY;
   int      Angle;
   float    SIN[360],COS[360];
   struct Samolet
   {
      float kx,Speed;
      float Xpos,Ypos,sx,sy;
      int TX,TY,count;
      void move()
      {
         Xpos+=sx*Speed*cos(kx*0.01745);
         Ypos+=sy*Speed*sin(kx*0.01745);
      }
   }Sam[2];
public:		// User declarations
   __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
Соседние файлы в папке KursachMP33 Copy
  • #
    17.04.2013876 б15Project1.res
  • #
    17.04.20131.11 Mб15Project1.tds
  • #
    17.04.2013283 б16README.txt
  • #
    17.04.20135.71 Кб15Unit1.cpp
  • #
    17.04.20132.19 Кб15Unit1.dfm
  • #
    17.04.20132.03 Кб17Unit1.h
  • #
    17.04.201357.21 Кб15Unit1.obj
  • #
    17.04.20135.71 Кб15Unit1.~cp
  • #
    17.04.20132.52 Кб15Unit1.~df
  • #
    17.04.20132.06 Кб15Unit1.~h
  • #
    17.04.201353.76 Кб22Zapiska5.doc