WindowedScreen bewegen?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Re: WindowedScreen bewegen?

Beitrag von Fluid Byte »

Codusa hat geschrieben:Thx, der Code funzt prima, aber ich kann den Movie dann nicht bewegen ...
Ach Schnucki, ResizeMovie() ist dein Freund. :wink:
Codusa hat geschrieben:... und der movie ist auch transparent...
Der Film mit dem ich es gestestet habe wurde nicht transparent angezeigt. Ich probiers aber zuhause nochmal mit einem anderen.
Windows 10 Pro, 64-Bit / Outtakes | Derek
Benutzeravatar
Codusa
Beiträge: 92
Registriert: 11.07.2009 09:44

Re: WindowedScreen bewegen?

Beitrag von Codusa »

Fluid Byte hat geschrieben: Ach Schnucki, ResizeMovie() ist dein Freund. :wink:
"Schnucki" ( :? ) ignorier jetzt einfach mal.

Thx das funktioniert schonmal gut, nur halt der Movie ist transparent...

Welches Format hast du denn benutzt? Ich habe avi und wmv getestet
"I became insane, with long intervals of horrible sanity." - Edgar A. Poe
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Re: WindowedScreen bewegen?

Beitrag von Fluid Byte »

Ist tatsächlich transparent. Du kannst aber einfach ein zweites Fenster öffnen:

Code: Alles auswählen

InitMovie()

OpenWindow(0,0,0,320,240,"void",#PB_Window_BorderLess)
SetWindowColor(0,0)
SetWindowState(0,#PB_Window_Maximize)

SetWindowLongPtr_(WindowID(0),#GWL_EXSTYLE,#WS_EX_LAYERED)

SetLayeredWindowAttributes_(WindowID(0),0,220,#LWA_ALPHA)

LoadMovie(0,"**DEIN FILMCHEN **")

OpenWindow(1,WindowWidth(0)/2-MovieWidth(0)/2,WindowHeight(0)/2-MovieHeight(0)/2,MovieWidth(0),MovieHeight(0),"",#PB_Window_BorderLess)

PlayMovie(0,WindowID(1))

While WaitWindowEvent() ! #PB_Event_CloseWindow : Wend
Windows 10 Pro, 64-Bit / Outtakes | Derek
Benutzeravatar
Codusa
Beiträge: 92
Registriert: 11.07.2009 09:44

Re: WindowedScreen bewegen?

Beitrag von Codusa »

Das arbeitet dann aber nicht mehr so gut mit dem Verschieben zusammen...
-EDIT-

Code: Alles auswählen

RisizeWindow()
gefunden :mrgreen:

Man muss allerdings darauf achten, dass

Code: Alles auswählen

SetActiveWindow(1)
in der MainLoop drin ist, weil
sonst das schwarze Fenster den Movie abdunkelt^^

THX :bounce:
"I became insane, with long intervals of horrible sanity." - Edgar A. Poe
Antworten