
Videos schützen
-
- Beiträge: 250
- Registriert: 25.11.2004 19:51
- Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS
Videos schützen
Hallo zusammen, bräuchte einen Tipp wie man am besten eine Video Datei schützen kann um diese nur aus dem eigenen PB Programm heraus zu benutzen, jemand ne idee? Ich dachte mir evtl schneide ich den Header raus und füge ihn dann zur laufzeit hinzu - allerdings hab ich hier mangels programmiererfahrung und dateizugriffe irgendwie noch keine guten ergebnisse erziehlen können
- vielleicht fällt jemanden ja was hierzu ein, merci schon mal im vorraus.

PB 4.6 / 32 Bit / 64 Bit
- vonTurnundTaxis
- Beiträge: 2130
- Registriert: 06.10.2004 20:38
- Wohnort: Bayreuth
- Kontaktdaten:
Verwende einfach ein PB-Paket:
So packst du den Film:
Und so verwendest du es im Programm:
So packst du den Film:
Code: Alles auswählen
CreatePack("dein_film.pkg")
AddPackFile("/pfad/zu/deinem/film.ogg")
ClosePack()
Code: Alles auswählen
OpenPack("dein_film-pkg")
CreateFile(1, "tmp")
Memory = NextPackFile()
Size = PackFileSize()
WriteData(1, Memory , Size)
CloseFile(1)
-
- Beiträge: 17389
- Registriert: 10.11.2004 03:22
- vonTurnundTaxis
- Beiträge: 2130
- Registriert: 06.10.2004 20:38
- Wohnort: Bayreuth
- Kontaktdaten:
Geht das nicht aus meinem Code hervor?
Und wozu gibt es GetTemporaryDirectory()?
Hier nochmal:
Und wozu gibt es GetTemporaryDirectory()?

Hier nochmal:
Code: Alles auswählen
OpenPack("dein_film-pkg")
CreateFile(1, GetTemporaryDirectory() + "tmp")
Memory = NextPackFile()
Size = PackFileSize()
WriteData(1, Memory , Size)
CloseFile(1)
OpenMovie(1, GetTemporaryDirectory() + "tmp")
;Film abspielen
FreeMovie(1)
DeleteFile(GetTemporaryDirectory() + "tmp")
-
- Beiträge: 17389
- Registriert: 10.11.2004 03:22
doch, aus dem zweiten snippet geht es hervor, sorry.
aber:
von sicherheit möchte ich in dem zusammenhang nicht sprechen.
ein bißchen mehr sicherheit gäbe es so:
1) sofort nach dem entpacken laden
2) sofort nach dem laden löschen
dann hat man ne chance, dass der film kurz genug als normales
Moviefile auf der Platte ist, um nicht gerippt werden zu können.
aber:
von sicherheit möchte ich in dem zusammenhang nicht sprechen.
ein bißchen mehr sicherheit gäbe es so:
Code: Alles auswählen
LoadMovie(1, GetTemporaryDirectory() + "tmp")
DeleteFile(GetTemporaryDirectory() + "tmp")
;Film abspielen
FreeMovie(1)
2) sofort nach dem laden löschen
dann hat man ne chance, dass der film kurz genug als normales
Moviefile auf der Platte ist, um nicht gerippt werden zu können.
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Der Weise weiß, dass er ein Narr ist.
- Fluid Byte
- Beiträge: 3110
- Registriert: 27.09.2006 22:06
- Wohnort: Berlin, Mitte
Code: Alles auswählen
LoadMovie(1, GetTemporaryDirectory() + "tmp")
DeleteFile(GetTemporaryDirectory() + "tmp")
;Film abspielen
FreeMovie(1)
- vonTurnundTaxis
- Beiträge: 2130
- Registriert: 06.10.2004 20:38
- Wohnort: Bayreuth
- Kontaktdaten:
-
- Beiträge: 17389
- Registriert: 10.11.2004 03:22
-
- Beiträge: 250
- Registriert: 25.11.2004 19:51
- Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS
Ganz genau - hier gehts um 0815 - User, vorallem in dem Sinne - Schulungsvideos zu schützen, dass nur der Kunde die entsprechenden Videos angucken kann - kombiniert auch noch in einzelne Lektionen die er einzeln Freischalten muß etc. - aber - merci für alle die sich beteiligt haben, hat mir sehr weitergeholfen.
PB 4.6 / 32 Bit / 64 Bit
Code: Alles auswählen
LoadMovie(1, GetTemporaryDirectory() + "tmp")
DeleteFile(GetTemporaryDirectory() + "tmp")
;Film abspielen
FreeMovie(1)
Wenn aber DShow die Datei geöffnet hat, kann man sie nicht löschen oder aber das Abspielen geht schief.
Man ist nie zu alt zum lernen, auch wenn man dabei manchmal alt aussieht!