Einzelnen Beitrag anzeigen

QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.919 Beiträge
 
Delphi 12 Athens
 
#14

AW: FMX TCameracomponent geht auf Windows nicht ?

  Alt 27. Apr 2023, 11:43
Der Spelt fügt andere VideoFilter hinzu als Embarcadero! Cheeky basterd!

Und die Error description ist ja auch
"Error Description: VFW_E_CANNOT_CONNECT. No combination of intermediate filters could be found to make the connection."

Delphi-Quellcode:
    // Add Capture filter to our graph.
    Result := pIGraphBuilder.AddFilter(pIBFVideoSource, Widestring('Video Capture'));
    if (FAILED(Result)) then
      begin
        // Couldn''t add the capture filter to the graph!
        exit;
      end;

    Result := pIGraphBuilder.AddFilter(piBFSampleGrabber, Widestring('Sample Grabber'));
    if (FAILED(Result)) then
      EXIT;

    if not(Visible) then
      begin
        Result := pIGraphBuilder.AddFilter(pIBFNullRenderer, WideString('Null Renderer'));
        if (FAILED(Result)) then
          EXIT;
      end;

    // Render the preview pin on the video capture filter
    // Use this instead of pIGraphBuilder->RenderFile
    New(pCut);
    New(pTyp);
    //pCut^ := PIN_CATEGORY_PREVIEW;
    pCut^ := PIN_CATEGORY_CAPTURE;
    pTyp^ := MEDIATYPE_Video;
    try
      if Visible
        then Result := pICapGraphBuild2.RenderStream (pCut, pTyp,
                                    //Addr(PIN_CATEGORY_PREVIEW), Addr(MEDIATYPE_Video),
                                    pIBFVideoSource, piBFSampleGrabber, nil)

        else Result := pICapGraphBuild2.RenderStream (pCut, pTyp,
                                    //Addr(PIN_CATEGORY_PREVIEW), Addr(MEDIATYPE_Video),
                                    pIBFVideoSource, piBFSampleGrabber, pIBFNullRenderer);
    except
      Result := -1;
    end;
Spelt benutzt als Filter 'Video Capture','Sample Grabber' und 'Null Renderer'(???)
Embarcaderod benutzt nur 'Capture' als Filter...

hm
Und meine Kamera macht wohl einen Jpeg stream....als vermutlich ne folge standbilder...
Andreas
Monads? Wtf are Monads?
  Mit Zitat antworten Zitat