🚀 go-pugleaf

Dear Remy and others

I am writing a program for a slideshow. It shows two different
pictures at once (stereo, yes).
The pictures appear very slowly.

Of course it takes time to load a picture, so that I used two pairs of
control elements, which are alternatively hidden.

The sequence is this:
screen becomes blank
after one second (or more) the left picture appears.
after another second (or more) the right picture appears.

Can anyone help me to get rid of those seconds?
-- 
Jos�

bool toggle;
void loadphotos()
{    fileL=.....
     fileR=.....

     TImage * ImageL;
     TImage * ImageR;

     if(toggle)
     {  ImageL=Form1->Image1L;  //Image1L, 1R, 2L, 2R are 
        ImageR=Form1->Image1R;  //elements on the form
     }
     else
     {  ImageL=Form1->Image2L;
        ImageR=Form1->Image2R;
     }

     if(ImageL->Visible || ImageR->Visible)
       error("error in program"); //does not occur

     ImageL->Picture->LoadFromFile(fileL);
     ImageR->Picture->LoadFromFile(fileR);
}
//------------------

void exchange(void)
{
   Form1->Image1R->Visible=toggle;
   Form1->Image1L->Visible=toggle;
   Form1->Image2R->Visible=!toggle;     
   Form1->Image2L->Visible=!toggle;

   toggle=!toggle;
}

static   int semafoor=0;
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   exchange();             //display new pics
   loadphotos(Sender);     //load new pics and wait for Timer
}