Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Webcam in Delphi?

    Delphi
    by Ultimator, 5. Feb 2005
  Naja, die Namen für die Windows-Messages sind eigentlich bloß "Merkhilfen", damit man die Messages einfacher verwenden und unterscheiden kann.
  Soweit ich weiß sind Messages bloß DWORD-Werte, aber ich denke mal, die Windows-Programmierer wollten sich keinen Wolf lernen, nur wegen den "paar tausend Messages" ;-)
  
  Wenn ich Blech labere, dann korrigiert mich ;-)
• Forum: Multimedia

  Re: Webcam in Delphi?

    Delphi
    by Ultimator, 11. Dez 2004
  So, bezogen auf diesen Thread, hab ich nun eine Header-Übersetzung der VfW.h gefunden, in der diese Funktionen enthalten sind; an dieser Stelle nochmal Dank an Luckie :-)
  
  Nun kann man nach Einbindung der Unit oben genannte und noch andere Funktionen benutzen, ohne das Ganze umständlich über Sendmessage zu machen :-)
  
  In Luckies "edit" findet ihr einen Link zu einer Seite, wo man ein...
• Forum: Multimedia

  Re: Webcam in Delphi?

    Delphi
    by Ultimator, 10. Dez 2004
  @Nicolai: Hast du die Unit ClipBrd eingebunden?
  
  @Den Rest :-)
  Es gibt anscheinend auch die Möglichkeit, das ganze per API-Funktionen zu erledigen, anstatt per Messages.
  Beispiel:
  SendMessage( handle, WM_CAP_EDIT_COPY, 1, 0 ); //Das wäre jetzt per Message
  capEditCopy(handle); //Müsste theoretisch auch gehen, macht das gleiche (erzählt mir zumindest das WinAPI-SDK :-)
  
  Allerdings mosert da...
• Forum: Multimedia

  Re: Webcam in Delphi?

    Delphi
    by Ultimator, 10. Dez 2004
  Also, in dem Beitrag im o.g. Forum hat er noch den Code für ein Bildschirmfoto gepostet, aber den hab ich nicht getestet :mrgreen:
  
  procedure TForm1.ButtonCamFoClick(Sender:TObkect);
  begin
  SendMessage( handle, WM_CAP_EDIT_COPY, 1, 0 );
  Image1.Picture.Bitmap.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
  end;
  
  Dan müsstest du halt die im oben genannten Code...
• Forum: Multimedia

  Re: Webcam in Delphi?

    Delphi
    by Ultimator, 10. Dez 2004
  Du brauchst das DSPack gar nicht.
  Ich habs nach einer im Forum des SDC geposteten Lösung gemacht, und es funktioniert.
  
  //Zuerst brauchst du folgende Konstanten
  const
  WM_CAP_DRIVER_CONNECT = WM_USER + 10;
  WM_CAP_EDIT_COPY = WM_USER + 30;
  WM_CAP_SET_PREVIEW = WM_USER + 50;
  WM_CAP_SET_OVERLAY = WM_USER + 51;
  WM_CAP_SET_PREVIEWRATE = WM_USER + 52;