[SOLVED]playsound

[MVD]

I am working in windows 10.
I wish to play two sounds one after the other. I do it with playsound but how can I know that the first sound is finished before starting the second.
his code is working but the second wav is starting directly.
playsound1.SoundFile:=('sound\' + diertekst + 'stem.wav');
playsound1.Execute;
playsound1.SoundFile:=('sound\' + diertekst + '.wav');
playsound1.Execute;

[Jurassic Pork]

hello,
if you use a TPlaysound  component, set the PlayStyle property to psSync
Friendly, J.P

[MVD]

hello,
if you use a TPlaysound  component, set the PlayStyle property to psSync
Friendly, J.P

Thanks, it helps but now I have an other question

procedure TForm1.CBExKies_DierChange(Sender: TObject);
VAR
  diertekst:string;
  positie:integer;

begin
positie := CBExKies_Dier.ItemIndex;
diertekst:= CBExKies_Dier.ItemsEx.ComboItems[positie].Caption    ;
afbeelding.Picture.LoadFromFile('image\' + diertekst + '.png');
playsound1.SoundFile:=('sound\' + diertekst + 'stem.wav');
playsound1.Execute;
playsound1.SoundFile:=('sound\' + diertekst + '.wav');
playsound1.Execute;
end;     
Why I can see the picture only after the playsound1 play the sounds?
Is it not possible to see the picture and then hear the sound?

[MVD]

This is working.

procedure TForm1.CBExKies_DierChange(Sender: TObject);
VAR

  positie:integer;

begin
positie := CBExKies_Dier.ItemIndex;
diertekst:= CBExKies_Dier.ItemsEx.ComboItems[positie].Caption    ;
afbeelding.Picture.LoadFromFile('image\' + diertekst + '.png');
Timer1.Enabled:=true;
start:=0;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
dec(start);
if start<0 then
Timer1.Enabled:=false;
playsound1.SoundFile:=('sound\' + diertekst + 'stem.wav');
  playsound1.Execute;
  playsound1.SoundFile:=('sound\' + diertekst + '.wav');
  playsound1.Execute;
end;     

[molly]

Why I can see the picture only after the playsound1 play the sounds?

If you look at your code then you can see that there are a couple of statements following each other one by one.

The problem however is that loading a picture will load the picture from disk, store the graphics data into memory, prepare the graphics to finally send a request to the GUI to update the control that displays the picture for you. This GUI update can happen only after the update request is received and being handled, but since your code is still running it will 'block' this request.

Is it not possible to see the picture and then hear the sound?

Yes. Make a call to application.processmessages directly after loading the picture and before playing the sound. With this call you do an explicit request to handle the (pending) messages, which would include the request to update your graphics control.

No need to complicate things with using a timer, although the effect is the same: you offer your application time to handle the update message so that the GUI has time to be able to update its graphics.

[MVD]

 everyday we are learning especially if we know so little.

Thank you for giving time to others.