Ver Mensaje Individual
  #20  
Antiguo 12-11-2007
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 27
Delphius Va camino a la fama
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; // fin case
MediaPlayer1.Open;
MediaPlayer1.Play;

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita