Karen08,
Por favor emplea las etiquetas [delphi] y [/delphi]
Para que el código delphi quede resaltado y se entienda mejor.
Con respecto al problema se soluciona dentro del mismo case. La estructura debe repetirse para cada valor, tu sólo lo haz hecho para el UNO.
Código Delphi
[-]case combobox1.ItemIndex of
0: begin
Label1.Caption := ...
MediaPlayer1.FileName := ....
end;
1: begin
Label1.Caption := ...
MediaPlayer1.FileName := ....
end;
...
10: begin
Label1.Caption := ...
MediaPlayer1.FileName := ....
end;
end; MediaPlayer1.Open;
MediaPlayer1.Play;
Saludos,