Coding the "Splash" form

You then need to add the corresponding routines; here is the code for clicking the email:

procedure TFormSplash.MailClick(Sender: TObject);
begin
ShellExecute(Handle,'open','mailto:julien_foyard@hotmail.com',nil,'',SW_SHOWNORMAL);
end;

Here is the code for clicking the website:

procedure TFormSplash.websiteClick(Sender: TObject);
begin
ShellExecute(Handle,'open','http://chokocat.chez-alice.fr',nil,'',SW_SHOWNORMAL);
end;

Here is the code for clicking the start button:

procedure TFormSplash.ButtonStartClick(Sender: TObject);
begin
Close;
FormGame.Position:=poScreenCenter;
end;