IInterface Delphi vs VSC

[Uwe Raabe]

Zitat von EWeiss:

also brauch ich _AddRef und Konsorte in C++ nicht zu definieren.

Ich kenne jetzt den ganzen Zusammenhang nicht, aber wenn das Interface von C++ aus verwendet werden soll, dann müssen diese Methoden nicht nur definiert, sondern auch aufgerufen werden. Andernfalls könnte es passieren, daß die darunter liegende Instanz zu früh freigegeben wird.

[EWeiss]

Zitat von Uwe Raabe:

Zitat von EWeiss:

also brauch ich _AddRef und Konsorte in C++ nicht zu definieren.

Ich kenne jetzt den ganzen Zusammenhang nicht, aber wenn das Interface von C++ aus verwendet werden soll, dann müssen diese Methoden nicht nur definiert, sondern auch aufgerufen werden. Andernfalls könnte es passieren, daß die darunter liegende Instanz zu früh freigegeben wird.

Code:

struct TStreamInfo {
   TStreamType streamType;
   AM_MEDIA_TYPE ppmt; 
   unsigned int pdwFlags;
   unsigned int plcid;
   unsigned int pdwGroup;
   wchar_t* ppszName;
   IUnknown **ppObject;
   IUnknown **ppUnk;
 };

IUnknown wird von Delphi zurück gegeben.

Code:

BOOL KVIDEOPLAYERDEF(KVideo_GetStreamInfo)(TStreamType StreamType, DWORD index, TStreamInfo OUT StreamInfo);
// Gets informatio for the specified stream
// ( parameter )
//  - StreamType : type of stream (stAudio, stVideo, stMiscellaneous)
//  - index : number of rank (first stream = 0)
//  - StreamInfo : pointer to a TStreamInfo variable
// ( result 
//  - true on success, false on failure

gruss

[Uwe Raabe]

Die Frage ist: was machst du mit den beiden IUnknown-Feldern? Solange du die nicht verwendest, sollte es wohl egal sein.

[EWeiss]

Zitat von Uwe Raabe:

Die Frage ist: was machst du mit den beiden IUnknown-Feldern? Solange du die nicht verwendest, sollte es wohl egal sein.

Ich lese davon die Daten ein die von Delphi zurückgegeben werden.
Und das würde ich später zum vergleich auch in C++ tun.

Delphi-Quellcode:

    for i := 0 to aMediaProperty.NumVideoStream - 1 do
    begin
      KVideo_GetStreamInfo(stVideo, i, StreamInfo);
      menu := TMenuItem.Create(Self);
      menu.Caption := StreamInfo.ppszName;
      menu.RadioItem := true;
      if i = 0 then
        menu.Checked := true;
      menu.Tag := i;
      menu.OnClick := menuVideoStreamClick;
      menuSelectVideo.Add(menu);
    end;

Code:

   IUnknown **ppObject;
   IUnknown **ppUnk;

werden dabei aber nicht direkt angesprochen.

gruss

[Uwe Raabe]

Zitat von EWeiss:

Code:

   IUnknown **ppObject;
   IUnknown **ppUnk;

werden dabei aber nicht direkt angesprochen.

Ich denke, dann kannst du das so lassen.

[EWeiss]

Zitat von Uwe Raabe:

Zitat von EWeiss:

Code:

   IUnknown **ppObject;
   IUnknown **ppUnk;

werden dabei aber nicht direkt angesprochen.

Ich denke, dann kannst du das so lassen.

OK dann ist das geklärt.
Danke.

gruss

[EWeiss]

irgendwie will das immer noch nicht.

Code:

BOOL KVIDEOPLAYERDEF(KVideo_GetStreamInfo)(TStreamType StreamType, DWORD index, TStreamInfo OUT StreamInfo);

Die Rückgabe von..

Code:

struct TStreamInfo {
    TStreamType streamType;
    AM_MEDIA_TYPE ppmt; 
    unsigned int pdwFlags;
    unsigned int plcid;
    unsigned int pdwGroup;
    wchar_t* ppszName;
    IUnknown **ppObject;
    IUnknown **ppUnk;
  }; 
typedef TStreamInfo* pStreamInfo;

ist NULL

Hmmm...
Ob das mit den Interface doch nicht stimmt?

gruss