JPEG Dateien einfügen funktioniert nicht...

[Sandra686]

Hallo!
Ich muss gestehen, ich hab (noch) nicht so wahnsinnig viel Ahnung von PureBasic und wollte jetzt gern selber etwas programmieren, nachdem ich ein Toturial durchgemacht hab.
Aber wenn ich JPEG Dateien einfügen will und auch den UseJPEGImageDecoder() Befehl eingebe(wo genau sollte der stehen, am Anfang?) funktioniert das nicht...

Muss ich da noch etwas beachten?
Kann ich eigentlich mit Dateien im ".gif" Format arbeiten, wie?

MFG
Sandra686

[Kaeru Gaman]

als was willst du die JPEGs denn einfügen?

den UseJPEGIMageDecoder() musst du z.b. vor einem LoadSprite(Nr,"Name.jpg",0) angeben...
(bzw. LoadImage)

[Rubiko]

normalerweise gehen so weit ich weiß gif nicht aber ich weiß auch nicht obs userlibs dafür gibt

[Sandra686]

Sollte der Hintergrund ein.. Habs sowohl direkt for LoadSprite als am Anfang probiert, er schrieb immer, dass LoadJPEGSPrite sei kein gültiger Befehl...

[AndyX]

LoadJpegSprite ist ja auch kein Befehl...

Es muss ca. so aussehen:

Code: Alles auswählen

InitSprite()

OpenScreen(800,600,16,"Quark")

UseJPEGImageDecoder()

LoadSprite(123,"Käse.jpg",0)

Mfg,
AndyX

[Falko]

normalerweise gehen so weit ich weiß gif nicht aber ich weiß auch nicht obs userlibs dafür gibt

Laden kann man die auf jeden Fall hiermit. Mittels PauseMovie()
kann man eine laufende Gif-Animation anhalten und dann weiter bearbeiten.
Weiter kann man mit RenderMovieFrame(SpriteID)
direkt auf Sprites rendern.

Code: Alles auswählen

;
; ------------------------------------------------------------
;
;   PureBasic - Movie example file
;
;    (c) 2001 - Fantaisie Software
;
; ------------------------------------------------------------
;

If InitMovie() = 0
  MessageRequester("Error", "Can't initialize movie playback !", 0) 
  End
EndIf

MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie/Audio files|*.gif;*.avi;*.mpg;*.asf;*.mp3;*.wav|All Files|*.*", 0)
If MovieName$
  If LoadMovie(0, MovieName$)
  
    OpenWindow(0, 100, 150, MovieWidth(), MovieHeight(), #PB_Window_SystemMenu, "PureBasic - Movie")
    PlayMovie(0, WindowID())
      
    Repeat
    Until WaitWindowEvent() = #PB_EventCloseWindow
  Else
    MessageRequester("Error", "Can't load the movie...", 0)
  EndIf
EndIf
; ExecutableFormat=Windows
; UseIcon=C:\Programmation\PureBasic\Examples\MoviePlayer\Icons\MoviePlayer.ico
; Executable=E:\Documents and Settings\Administrateur\Bureau\MoviePlayer.exe
; EOF

MfG Falko