Daten schneller übers Internet austauschen

Anfängerfragen zum Programmieren mit PureBasic.
RaVeN99
Beiträge: 310
Registriert: 29.08.2004 15:26
Wohnort: Weiden i.d.OPF
Kontaktdaten:

Beitrag von RaVeN99 »

Ich vermute mal er will sich an video streaming ranmachen und hierzu eine datei erstellen welche er quasi zur laufzeit komprimiert und im selben atemzug zum gegenüber verschickt.
So lese ich das zumindest raus *schulterzuck*
Aber selbst wenn ich mich noch nicht mit Live-video-streaming beschäftigt habe, tippe ich ganz schwer drauf, dass dies nicht so ganz der probate weg sein dürfte ^^
Zumal ne webcam ne recht geringe Auflösung bietet und man auch nicht ~25 Bilder/s verschickt.


Mfg
RaVeN
AMD Athlon64 3000+, 1024MB DDR-RAM, Geforce 8600GT, WinXP SP2, DirectX 9.0c, PureBasic 3.94
Benutzeravatar
Joel
Beiträge: 851
Registriert: 21.04.2006 19:22

Beitrag von Joel »

:D Wabspace, nein!

Ich möchte ganz einfach eine Datei mit SendnetworkFile verschicken.

Dass soll schneller gehen wenn man den Video umwandelt.

Aber bis der Video von zb*.Avi zu *.wmv umgewandelt ist dauert dass sehr lange. Desswegen wollte ich bei der Umwandlung schonmal die datei versenden, und ob das geht weiß ich halt nicht.

Und erstmal wollte ich wissen was an dem beispiel (Siehe Seite 1) falsch ist, ich hab da schon eine heiße Verutung?
Benutzeravatar
Laurin
Beiträge: 1639
Registriert: 23.09.2004 18:04
Wohnort: /dev/eth0

Beitrag von Laurin »

*.avi brauchst du nicht umwandeln. Normalerweise ist da der Film schon komprimiert drin gespeichert (zB mit DivX, Xvid und wie sie nicht alle heißen).
Now these points of data make a beautiful line.
And we're out of beta. We're releasing on time.
Benutzeravatar
Joel
Beiträge: 851
Registriert: 21.04.2006 19:22

Beitrag von Joel »

Ich schätze mal an dem Code auf Seite 2 hab ich ServerEvent()In der falschen reihenfolge aber ob das so ist weiß ich nicht.
Benutzeravatar
AndyX
Beiträge: 1272
Registriert: 17.12.2004 20:10
Wohnort: Niederösterreich
Kontaktdaten:

Beitrag von AndyX »

Also wenn ich das richtig verstanden habe willst du eine AVI-Datei in eine WMV-Datei umwandeln und gleichzeitig verschicken. Wenn das so ist, sieh dir den Befehl SendNetworkData() an.
Benutzeravatar
hardfalcon
Beiträge: 3447
Registriert: 29.08.2004 20:46

Beitrag von hardfalcon »

Ums mal etwas abstrakter zu erklären: er will offenbar irgendwelche Daten (binäre, bereits komprimierte Daten) als komprimierten Stream übers Netz schicken...
Benutzeravatar
Alves
Beiträge: 1208
Registriert: 19.04.2006 18:24
Kontaktdaten:

Beitrag von Alves »

Also afaik ist .avi nicht komprimiert, da 28minuten schon mal locker 6 GB auf den Stick hauen können....
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

> er will offenbar irgendwelche Daten (binäre, bereits komprimierte Daten)
> als komprimierten Stream übers Netz schicken...

ich glaube nicht, dass er einen Stream erzeugen will. Ich glaube sogar, dass
er selber nicht weiss, was er will.

@Joel: Filmchen vorher mit ZIP oder den PB-eigenen Komprimierungs-
befehlen packen, rüberschicken und dort wieder entpacken. Dann leidet auch
die Filmchen-Qualität nicht so sehr.

Grüße ... Kiffi
a²+b²=mc²
Benutzeravatar
Alves
Beiträge: 1208
Registriert: 19.04.2006 18:24
Kontaktdaten:

Beitrag von Alves »

Also afaiu will er mit einem Prog (zB Pinnacle Studio 9, Schleichwerbung#) das Video komprimen und gleichzeitig versenden, das was bereits komprimiert ist.

@ topic

Da müssttest du schon die .part Dateien (glaube dass sie so ißen) lesen und versenden.

Also schlag dir das mal ausm Kopf.

Oder dir auf den Kopf :D
Benutzeravatar
mk-soft
Beiträge: 3855
Registriert: 24.11.2004 13:12
Wohnort: Germany

Beitrag von mk-soft »

Daten erst Packen und dann Senden. Funktioniert aber nur mit Daten die nicht schon Komprimiert sind wie MPEG oder ZIP.

Code: Alles auswählen

Datei.s = OpenFileRequester(Datei, "", "", 0)
If OpenFile(0, Datei) = 0
  Debug "Error: OpenFile!"
  End
EndIf

lenFile = Lof(0)
*buffer = AllocateMemory(lenFile)
*pack = AllocateMemory(lenFile + 8)
ReadData(0, *buffer, lenFile)
lenPack = PackMemory(*buffer, *pack, lenFile, 7)
If lenPack
  MessageRequester("Info", "Ratio: " + StrF(lenPack/lenFile))
Else
  MessageRequester("Info", "Weitere Komprimierung nicht möglich")
EndIf

; *pack -> Daten zu senden
FF :wink:
Alles ist möglich, fragt sich nur wie...
Projekte ThreadToGUI / EventDesigner V3 / OOP-BaseClass-Modul
Downloads auf MyWebspace / OneDrive
Antworten