Inno Setup - video file with relative path as splash screen -


hello dear community...

i saw topic video splash screen inno setup

video file (with alpha) splash-screen?

the sample code presented tlama ( author of inno media player ) great has little problem & thats : splash video file pointed in code has absolute path : d:\video.avi if want publish setup program other computers absolute path d:\video.avi not work anymore...

therefore asking author ( tlama ) revise script , make video file splash relative path : {src} or {tmp} .

the second revision want ask author :

i want implement closing of video playback clicking client area of window...that not available in above sample code...

so asking tlama ( author of inno media player ) implement 2 asked revisions following code :

    [setup] appname=media player project appversion=1.0 defaultdirname={pf}\media player project  [files] source: "mediaplayer.dll"; flags: dontcopy  [code] const   ec_complete = $01;  type   tdirectshoweventproc = procedure(eventcode, param1, param2: integer);  function dsplaymediafile: boolean;   external 'dsplaymediafile@files:mediaplayer.dll stdcall'; function dsstopmediaplay: boolean;   external 'dsstopmediaplay@files:mediaplayer.dll stdcall'; function dsinitializevideofile(filename: widestring; windowhandle: hwnd;   var width, height: integer; callbackproc: tdirectshoweventproc): boolean;   external 'dsinitializevideofile@files:mediaplayer.dll stdcall';  var   videoform: tsetupform;    procedure onmediaplayerevent(eventcode, param1, param2: integer);  begin   if eventcode = ec_complete     videoform.close;   end;  procedure onvideoformshow(sender: tobject); begin   dsplaymediafile; end;  procedure onvideoformclose(sender: tobject; var action: tcloseaction); begin   dsstopmediaplay; end;  procedure initializewizard; var   width: integer;   height: integer; begin   videoform := createcustomform;   videoform.caption := 'popup video window';   videoform.borderstyle := bsnone;   videoform.formstyle := fsstayontop;   videoform.position := poscreencenter;   videoform.onshow := @onvideoformshow;   videoform.onclose := @onvideoformclose;     if dsinitializevideofile('d:\video.avi', videoform.handle, width,      height, @onmediaplayerevent)     begin     videoform.clientwidth := width;     videoform.clientheight := height;          videoform.showmodal;   end;     end;  procedure deinitializesetup; begin   dsstopmediaplay; end;

just swap 'd:\video.avi' expandconstant('{tmp}\video.avi'), prior call extracttemporaryfile.

or if want distribute video alongside setup (eg. on dvd) rather embedded it, use {src} instead of {tmp}, , skip extracttemporaryfile.

to second question. there missing message drain allow ivideowindow forward keyboard , mouse messages window owner. in updated version of library messages dispatched owner, download latest version , add code close video window clicking on it:

[code] procedure onvideoformclick(sender: tobject);  begin    // it's enough close form owns ivideowindow   videoform.close; end;  procedure initializewizard; begin   videoform := createcustomform;   ...   videoform.onclick := @onvideoformclick;   ... end;

Comments

Post a Comment

Popular posts from this blog

ios - iPhone/iPad different view orientations in different views , and apple approval process -

i force app's home screen portrait , other views landscape. apple rejects app if this? if not , how force first screen launch in portrait mode? , force other screens launch in landscape. this not duplicate question search every possible answer in website. i force app's home screen portrait , other views landscape. apple rejects app if this? no apple not reject app this. have lot of apps doesn't support orientation. forcing on 1 screen won't cause app reject. if not , how force first screen launch in portrait mode? , force other screens launch in landscape. can on write : -(nsuinteger)supportedinterfaceorientations; function.
Read more

java Extracting Zip file -

i'm looking way extract zip file. far have tried java.util.zip , org.apache.commons.compress, both gave corrupted output. basically, input zip file contain 1 single .doc file. java.util.zip: output corrupted. org.apache.commons.compress: output blank file, 2 mb size. so far commercial software winrar work perfectly. there java library make use of this? this method using java.util library: public void extractzipnative(file filezip) { zipinputstream zis; stringbuilder sb; try { zis = new zipinputstream(new fileinputstream(filezip)); zipentry ze = zis.getnextentry(); byte[] buffer = new byte[(int) ze.getsize()]; fileoutputstream fos = new fileoutputstream(this.tempfolderpath+ze.getname()); int len; while ((len=zis.read(buffer))>0) { fos.write(buffer); } fos.flush(); fos.close(); } catch (filenotfoundexception e) { // todo auto-generated catch block ...
Read more

C# WinForm - loading screen -

i ask how make loading screen (just picture or something) appears while program being loaded, , disappears when program has finished loading. in fancier versions, have seen process bar (%) displayed. how can have that, , how calculate % show on it? i know there form_load() event, not see form_loaded() event, or % property / attribute anywhere. all need create 1 form splash screen , show before main start showing landing page , close splash once landing page loaded. class splashform { //delegate cross thread call close private delegate void closedelegate(); //the type of form displayed splash screen. private static splashform splashform; static public void showsplashscreen() { // make sure launched once. if (splashform != null) return; thread thread = new thread(new threadstart(splashform.showform)); thread.isbackground = true; thread.setapartmentstate(apartmentstate.sta); thread....
Read more