XProfan

Hier findeste eine komplette Include-Datei als Klasse: [...]

10.01.2006 ▲

Dietmar
Horn

Hallo Nico,

weil Du z.Z. noch mit Profan² 6.6 arbeitest, wird der Hinweis von Thomas für Dich und Dein aktuelles Projekt wahrscheinlich nicht der große Bringer sein.

Hier ein Code-Schnipsel aus meiner uralten PRF-Bastel-Kiste, der auch unter 6.6 noch klappert:
Kompilieren Markieren Separieren

window 0,0 - %MaxX,%MaxY

PROC PLAYMP3

    Parameters _____mp3$,_____loop%
    declare _____loop$

    if _____loop%

        _____loop$ = " REPEAT"

    endif

    MCISend$("CLOSE MEDIA")
    MCISend$(("OPEN " + _____mp3$ + " TYPE MPEGVIDEO ALIAS MEDIA"))
    MCISend$("PLAY MEDIA" + _____loop$)

ENDPROC

PLAYMP3 ShortName$("DEMO.MP3"),0
print "Beenden mit Taste oder Mausklick ..."
WaitInput
MCISend$("CLOSE MEDIA")
HINWEIS !!!
PLAYMP3 "Dateiname",Modus
Modus 0 -> Der Sound wird einmal abgespielt und dann beendet.
Modus 1 -> Der Sound wird in einer Endlos-Schleife abgespielt.

Falls Du damit nicht zurechtkommen solltest, könnten wir das ja dann entweder am kommenden Freitag in Lauta, oder am Montag im NATZ gemeinsam noch etwas verschlimmbessern.

Gruß
Dietmar

Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch: [...]

Nico
Madysa

Danke Dietmar, mir gings ja eben darum, was bei type stehen sollte.

Auch danke an Thomas für den Versuch.

Du konntest ja nicht wissen, was ich für eine Profan-Version habe.

Nico Madysa

Was da als Type stehen soll findeste in meinem Source ja auch

Nico
Madysa

Nunja ...

Als ich hier wieder rein geguckt hatte, waren schon beide Beiträge da.
Und da hab ich Dietmars Beitrag gesehn... der war halt irgendwie
verständlicher.
Ich hab nicht allzu viel Ahnung vom objektorientierten Programmmieren.
Tschuldigung, sei mir nicht böse!

Nico Madysa