FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
video
hola amigos mi codigo es este:
-------------------------------------------------------- procedure TForm1.FormCreate(Sender: TObject); begin form1.MediaPlayer1.DisplayRect:=form1.Panel1.ClientRect; form1.MediaPlayer1.Play; if form1.MediaPlayer1.position=form1.MediaPlayer1.length then begin form1.Edit1.Visible:=true; end; end; ---------------------------------------------------------------- Lo que se supone que deberia hacer es que aparezca un video nada mas abrirse el formulario,y cuando este llegase a su fin,que el edit se vea. no encuentro ninguna manera para hacer que cuando se acabe el video realize un accion.se que esto esta mal: if form1.MediaPlayer1.position=form1.MediaPlayer1.length then begin pero nose q poner. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Video TCP/IP | Onti | Redes | 0 | 13-02-2007 01:00:27 |
Insertar Video, o vista preeliminar de video | JuanErasmo | .NET | 0 | 10-01-2007 20:27:20 |
Streaming de Video | Rabata | Varios | 0 | 18-10-2005 12:06:21 |
Visualizar video | D@byt | Gráficos | 1 | 15-09-2005 06:43:26 |
Video Net | ramonibk | Varios | 0 | 23-12-2004 13:48:57 |
|