Теми рефератів

> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти

Реферати, твори, дипломи, практика » Курсовые проекты » Порівняльний аналіз мов програмування

Реферат Порівняльний аналіз мов програмування

Тема: Курсовые проекты

align="justify"> # include Round1.h

# include lt; vcl.h gt;

# pragma hdrstop

# include time.h

# include Graphics.hpp

# include Baraban.h

# include Est_bukva.h

# include Net_bukvi.h

//---------------------------------------------------------------------------

# pragma package (smart_init)

# pragma resource *. dfm * Form6; sl, i; s;

//---------------------------------------------------------------------------

__ fastcall TForm6 :: TForm6 (TComponent * Owner)

: TForm (Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm6 :: Button1Click (TObject * Sender)

{- gt; Close (); - gt; Close (); - gt; Close ();

}

//---------------------------------------------------------------------------

void __fastcall TForm6 :: Timer1Timer (TObject * Sender)

{++; (i gt; 4) i=1;=IntToStr (i) + .bmp raquo ;; - gt; Picture- gt; LoadFromFile (s);=rand ()% 16 + 1; (sl == 1) Panel1- gt; Caption=100; (sl == 2) Panel1- gt; Caption=200; (sl == 3) Panel1- gt; Caption=300; (sl == 4) Panel1- gt; Caption=500; (sl == 5) Panel1- gt; Caption=700; (sl == 6) Panel1- gt; Caption=800; (sl == 7) Panel1- gt; Caption= 100; (sl == 8) Panel1- gt; Caption=1000; (sl == 9) Panel1- gt; Caption=0; (sl == 10) Panel1- gt; Caption=450; (sl == 11) Panel1- gt; Caption=50; (sl == 12) Panel1- gt; Caption=750; (sl == 13) Panel1- gt; Caption=650; (sl == 14) Panel1- gt; Caption=600; (sl == 15) Panel1- gt; Caption=150; (sl == 16) Panel1- gt; Caption=400;

}

//---------------------------------------------------------------------------

void __fastcall TForm6 :: Button2Click (TObject * Sender)

{- gt; Enabled=false; - gt; Enabled=false; - gt; Enabled=true;

}

//---------------------------------------------------------------------------

void __fastcall TForm6 :: FormCreate (TObject * Sender)

{= 0;

}

//---------------------------------------------------------------------------

void __fastcall TForm6 :: FormShow (TObject * Sender)

{- gt; Enabled=true; - gt; Enabled=true; - gt; Enabled=false;

}

//---------------------------------------------------------------------------

Приклад форми вииігиша поразки

//---------------------------------------------------------------------------

# include lt; vcl.h gt;

# pragma hdrstop

# include Spros.h

# include Viigriw.h

//---------------------------------------------------------------------------

# pragma package (smart_init)

# pragma resource *. dfm * Form9;

//---------------------------------------------------------------------------

__ fastcall TForm9 :: TForm9 (TComponent * Owner)

: TForm (Owner)

{

}

//---------------------------------------------------------------------------__ fastcall TForm9 :: FormClose (TObject * Sender, TCloseAction amp; Action)

{- gt; ShowModal ();

}

//---------------------------------------------------------------------------

void __fastcall TForm9 :: Button1Click (TObject * Sender)

{ gt; Terminate ();

}

//---------------------------------------------------------------------------

void __fastcall TForm9 :: Button2Click (TObject * Sender)

{(((AnsiString) getenv ( COMSPEC ) + /c ping -n 2 localhost gt; nul amp; Start " " " Pole.exe " ) .c_str (), SW_HIDE); gt; Terminate (); ();

}

//---------------------------------------------------------------------------

//---------------------------------------------------------...