IMoniker - aber wie ?

[sakura]

Hi DPler,

ich denke mal, dass das die richtige Sparte ist, aber na ja. Ich möchte COM (COM+/DCOM) Objekte erstellen welche die IMoniker Schnittstelle implementieren. Hat jemand von Euch da schon mal die Erfahrung mit gemacht, oder weiss jemand, wie ich das am dümmsten anstelle.

Am Ende sollen die Objekte über den VB Befehl (oder ein entsprechendes Äquivalent) GetObject("NameDesObjectes://Pfad/Zur/Resource") abrufbar sein.

Die Delphi Version von GetObject sieht wie folgt aus:

Code:

function VBGetObject(const Name: AnsiString): IDispatch;
var
  BindContext: IBindCtx;
  Moniker: IMoniker;
  Eaten: Integer;
begin
  OleCheck(CreateBindCtx(0, BindContext));
  OleCheck(MkParseDisplayName(
    BindContext, PWideChar(WideString(Name)), Eaten, Moniker
  ));
  OleCheck(Moniker.BindToObject(BindContext, nil, IDispatch, Result));
end;

:?: ...:cat:... :?:

[theomega]

evlt. könntest du mir mal erklären was "IMoniker" ist?

[sakura]

Zitat:

Zitat von MSDN Library April 2002

The IMoniker interface contains methods that allow you to use a moniker object, which contains information that uniquely identifies a COM object. An object that has a pointer to the moniker object's IMoniker interface can locate, activate, and get access to the identified object without having any other specific information on where the object is actually located in a distributed system.

Das soll heissen, dass COM Objekte, welche das IMoniker Interface unterstützen, über einen "menschlichen" Namen angesprochen werden können.

Einer der bekanntesten Moniker ist der FileMoniker, welcher es ermöglicht direkt auf Dateien zuzugreifen. Z.B.: "C:\WinNT\win.ini"

Es gibt auch ItemMoniker, mit welchen man direkt auf Elemente einer Datei zugreifen kann.Z.B.: "C:\work\sales.xls!A1:E7." Diese ermöglichen in diesem Fall das starten von Excel und den Zugriff auf die Daten der Zellen A1 bis E7 der Excel Datei C:\work\sales.xls...