Hallo,
ich möchte ein kleines Programm schreiben, mit dem ich ein bestimmtes Frame aus einem Video (MPEG, AVI...) extrahieren kann.
Ich möchte das ganze mit DSPack machen (läuft auch
)
Hier auf der Seite hier habe ich folgenden Tipp gefunden:
http://www.delphipraxis.net/viewtopic.php?t=6728
Zitat:
Als Komponenten aus dem DSPack werden benötigt:
1. TFilterGraph
Die Standardeinstellungen können beibehalten werden
Die Ereignisse OnActivate und OnGraphPaused habe ich hier verwendet
2. TSampleGrabber
Die Eigenschaft FilterGraph muss gesetzt werden
Die Eigenschaft MediaType wird wie folgt gesetzt:
Major Type Video, Sub Type RGB24 und Format Type VideoInfo
3. TFilter
Die Eigenschaft FilterGraph muss gesetzt werden.
Als BaseFilter habe ich unter Selector\Filters\DirectShow Filters\SampleGrabber ausgewählt
(nicht wundern, wenn auf den [...] Button bei BaseFilter erst mal nichts passiert. Die Kompo sucht erst einmal die auf dem Rechner befindlichen Filter zusammen, und das kann dauern Wink)
4. TVideoWindow
Die Eigenschaft FilterGraph muss gesetzt werden.
Das habe ich dann auch gemacht, und folgenden Sourcecode übernommen.
Delphi-Quellcode:
rocedure TForm1.Button1Click(Sender: TObject);
begin
samplegrabber1.GetBitmap(image1.Picture.Bitmap);
end;
Wenn ich nun ein beliebiges Video abspiele, und auf Button1 Klicke erscheint aber kein Bild.
1. Wie kriege ich das zum laufen
2. Wie kann ich ein Frame einzelnes Frame ansteuern und wie bekomme ich die Anzahl aller Frames?
3. Wie rechne ich FilterGraph.Duration in Millisekunden/Frames um?
Danke im Voraus.