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



#include <vcl.h>

#include <Vcl.Imaging.Jpeg.hpp>

#pragma hdrstop



#include "Unit49_1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

	: TForm(Owner)

{

}

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





  const String PicNames[] = {

    "Beautifull-Summer-Desktop-Wallpaper.jpg",

    "Cool-Summer-Desktop-Wallpaper-HD.jpg",

    "Cool-Summer-Backgrounds.jpg",

    "Summer-Background-HD.jpg",

    "Cool-Summer-Wallpaper-HD-1.jpg",

    "Summer-Beach-Wallpaper-for-desktop.jpg",

    "Nice-Summer-Desktop-for-Windows.jpg",

    "Summer-Time-Background.jpg",

    "Summer-Blue-Sea-Wallpaper-HD.jpg",

    "Star-Fish-Summer-Desktop-Wallpaper-HD.jpg"};



  TJPEGImage *Pics[10];

  bool Stop = true;



void __fastcall TForm1::Button1Click(TObject *Sender)

{

  LARGE_INTEGER Freq, Ticks1, Ticks2;



  if (!(Stop = !Stop))

  {

    QueryPerformanceFrequency(&Freq);

    Image1->Picture->Bitmap->Assign(Pics[0]);

    while (!Stop)

    {

      QueryPerformanceCounter(&Ticks1);

      for (int i = 0; i < 10; i++)

      {

        Image1->Picture->Bitmap->Assign(Pics[i]);

        Application->ProcessMessages();

      }

      QueryPerformanceCounter(&Ticks2);

      Label1->Caption = Format("%0.3f fps", ARRAYOFCONST((

        Freq.QuadPart * 10.0 / (Ticks2.QuadPart - Ticks1.QuadPart))));

    }

  }

}

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



void __fastcall TForm1::FormCreate(TObject *Sender)

{

  for (int i = 0; i < 10; i++)

  {

    Pics[i] = new TJPEGImage;

    Pics[i]->LoadFromFile(PicNames[i]);

  }

}

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



void __fastcall TForm1::FormDestroy(TObject *Sender)

{

  for (int i = 0; i < 10; i++) delete Pics[i];

}

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