Seite 2 von 2
Re: Fehler
Verfasst: 28.02.2005 19:06
von Laurin
Green Snake hat geschrieben:also ich habe purebasic 3.30 (einige sgaen, es sie eine "verdammte" version)
kann es sein das es (wieder ) daran liegt?
Jep, es liegt daran. PB 3.3 ist uralt. Aktuell sind wir bei 3.93 Beta 3. Mach mal ein Update (gibts auf
www.purebasic.com)
Solltest du dein PB bei Topos gekauft haben, muss die erst eine Update-Berechtigung erwerben. Schau dazu am Besten auch mal auf
www.purebasic.com nach.
Mit dem Update dann kannst du dir hier gezeigten Beispiele und noch Vieles mehr dann ausführen.
Greetz Laurin
Verfasst: 28.02.2005 19:45
von Leo
Wtf? Bei mir gibts #PB_Window_ScreenCentered -_-" Ich arbeite aber auch noch mit PB 3.92
Verfasst: 28.02.2005 19:47
von DarkDragon
Leo hat geschrieben:Wtf? Bei mir gibts #PB_Window_ScreenCentered -_-" Ich arbeite aber auch noch mit PB 3.92
LOL, er hat aber die version 3.3(steinzeitalt) und nicht 3.92(noch ziemlich neu im vergleich zu 3.3)
Verfasst: 28.02.2005 19:48
von Leo
DarkDragon hat geschrieben:Leo hat geschrieben:Wtf? Bei mir gibts #PB_Window_ScreenCentered -_-" Ich arbeite aber auch noch mit PB 3.92
LOL, er hat aber die version 3.3(steinzeitalt) und nicht 3.92(noch ziemlich neu im vergleich zu 3.3)
Achso...
Verfasst: 28.02.2005 21:10
von MVXA
Diese Version gehört aus den Ladenregalen genommen -_-. Kann man nicht Topos dazu bringen ne neuere Version zu verkaufen o_O?
Klappt Fast
Verfasst: 07.03.2005 14:37
von Green Snake
Hallo
habe an dem code:
Code: Alles auswählen
InitMovie() ;Muss vor den Movie Befehlen aufgerufen werden ._.
hWnd = OpenWindow(0,0,0,640,480,#PB_Window_BorderLess,"") ;Öffnet ein Borderloses Fenster in der Mitte des Screens
deinegif.s = "earth_s.gif" ;Weg zu deiner Gif >_>
LoadMovie(0,"C:\nygfjgfyjffkmyfgk\bjhj.gif") ;laden
PlayMovie(0,hWnd) ;und auf dem Fenster abspielen
;ResizeMovie(0,0,640,480) ;Passt das Movie an die Fenstergröße an (längere Wartezeit..)
Repeat
WaitWindowEvent()
If GetAsyncKeyState_(#VK_ESCAPE) ;Wartet solange bis Escape gedrückt wird und setzt dann Quit auf True
Quit = #True
EndIf
Until Quit = #True
ein bischen rumgebastelt, er geht jetzt.
nur die funktion windowed screen centred ging bei mir nicht
aber jetzt will ich, des die animation im vollbild modus (1024,768,32)
abgespielt wird
wisst ihr da eine lösung?
Verfasst: 07.03.2005 16:38
von 125
Easy
Das 1024/768 muss durch die jeweilige Screenresolution dann ersetzt werden
Code: Alles auswählen
InitMovie() ;Muss vor den Movie Befehlen aufgerufen werden ._.
LoadMovie(0,"C:\Dokumente und Einstellungen\Alexander\Eigene Dateien\Ships.mpg") ;laden
hWnd = OpenWindow(0,0,0,1024,768,#PB_Window_BorderLess,"") ;Öffnet ein Borderloses
PlayMovie(0,hWnd) ;und auf dem Fenster abspielen
ResizeMovie(0,0,1024,768) ;Passt das Movie an die Fenstergröße an (längere Wartezeit..)
Repeat
Delay(1)
If GetAsyncKeyState_(#VK_ESCAPE) ;Wartet solange bis Escape gedrückt wird und setzt dann Quit auf True
Quit = #True
EndIf
Until Quit = #True
vollscreen
Verfasst: 07.03.2005 18:39
von Green Snake
hallo
danke, der code funktioniert einwandfrei, jedoch möchte ich das die gif auf dem openscreen(1024*768) abgespielt wird, und das ganze in der mitte des bildschirms.
geht das etwa nicht?