Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Splash con video flash. (https://www.clubdelphi.com/foros/showthread.php?t=67866)

escorpionrojo43 11-05-2010 15:33:32

Splash con video flash.
 
Saludos Companeros del club.
Estoy tratando de crear un splash el cual tiene un archivo swf. ya instale el componente shockwaveflash el punto esta en que cuando inserto el componente en una ventana y llamo dicha ventana todo va muy bien pero cuando esa misma ventana la pongo como un splash no funciona. alguien puede ayudarme a insertar un splash con un archivo flash. swf.

gracias.

Neftali [Germán.Estévez] 11-05-2010 18:51:06

¿Qué significa que no funciona?
¿Qué diferencia hay entre ambas ventanas?
¿Algo de código?

escorpionrojo43 11-05-2010 22:14:18

Nadie me pudo ayudar pero de igual manera si a alguien le interese lo pude solucionar de esta manera.


Lo primero es que hay que instalar el componente de shockwave flash.
en "Component>Import component. import ActiveX Control, next shockwave flash...."

una ves hecho esto crear el form del splash y agregarle el componente shockwave flash, en movie insertar la direccion del archivo swf.
lo pones a tu gusto.

una ves hecho lo anterior lo que sigue es esto.
Hacer click en Project> View Source.

//Cambiar la parte del codigo desde donde dice begin

begin
Application.Initialize;
SplashForm := TSplashForm.Create(nil);
try
SplashForm.FormStyle := fsStayOnTop;//splash en primer plano
SplashForm.Show;//Muestra el splash
Application.ProcessMessages;
Application.CreateForm(TFormPrincipal, FormPrincipal);
// Poner los demas Form que se van a crear aqui . . . .
Application.Run;
finally
if assigned(SplashForm) then
SplashForm.Release;
end;
end.


en el formulario Principal hay que poner esto en el evento OnShow
SplashForm.Close;
SplashForm.Release;
SplashForm := nil;


Espero que esto le pueda servir a alguien a mi me tardo 2 dias en conseguir esto.

movorack 11-05-2010 22:35:14

me alegro que lo hallas solucionado pero no es que nadie te pudo ayudar... es que no te hicistes "ayudar"

casimiro hubiera tenido que encender su bola magica... :D
roman hubiera dicho que la calidad de las respuestas es proporcional a lsa calidad de las preguntas...
neftali trato de indagar y no distes ms detalles.

pero bacano que hallas hallado la solución y las hallas posteado.

--Buena caza y buen remar

escorpionrojo43 12-05-2010 05:44:03

Cita:

Empezado por movorack (Mensaje 363636)
me alegro que lo hallas solucionado pero no es que nadie te pudo ayudar... es que no te hicistes "ayudar"

casimiro hubiera tenido que encender su bola magica...
roman hubiera dicho que la calidad de las respuestas es proporcional a lsa calidad de las preguntas...
neftali trato de indagar y no distes ms detalles.

pero bacano que hallas hallado la solución y las hallas posteado.

--Buena caza y buen remar


jajaja tienes razon no me di a entender con la pregunta pero gracias. ademas seguire haciendo mas preguntas, solo que tratare de formularla mejor.y a medida avance con mi proyecto publicare el codigo.


La franja horaria es GMT +2. Ahora son las 15:25:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi