MS SQL DMO TLB Import

[mischerr]

Habe über den Typelib-Imported von D2007 die "Microsoft SQLDMO Object Library" (V8.5) importiert.
Die Unit "SQLDMO_TLB" wurde auch anstandslos erzeugt, allerdings meckert, D2007: "E2004 Bezeichner redefiniert: 'ID'".

Delphi-Quellcode:

// *********************************************************************//
// DispIntf:  _DistributionArticle2Disp
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10033116-E260-11CF-AE68-00AA004A34D5}
// *********************************************************************//
  _DistributionArticle2Disp = dispinterface
    ['{10033116-E260-11CF-AE68-00AA004A34D5}']
    property ID: Integer writeonly dispid 14;
    property Application: Application readonly dispid 1;
    property Parent: _IVSQLDMOStdObject readonly dispid 2;
    property UserData: Integer dispid 3;
    property TypeOf: SQLDMO_OBJECT_TYPE readonly dispid 4;
    property Properties: Properties readonly dispid 7;
    property Name: WideString dispid 9;
->    property ID: Integer readonly dispid 10;
    property SourceObjectOwner: WideString dispid 11;
    property SourceObjectName: WideString dispid 12;
    property Description: WideString dispid 13;
    procedure Remove; dispid 100;
    procedure BeginAlter; dispid 101;
    procedure DoAlter; dispid 102;
    procedure CancelAlter; dispid 103;
  end;

Natürlich kann ich den entsprechenden Abschnitt auskommentieren, da nicht benötigt, aber es wundert mich trotzdem etwas.

Weiss jemand wie der Import richtig lauten müsste?

[pemue]

ich habe genau das gleich problem! hat mittlerweile vielleicht ein netter jemand eine lösung für dieses Problem gefunden?

Danke

Gruß
Pemue

[shmia]

Vielleicht geht es so:
property ID: Integer readonly dispid 10 writeonly dispid 14; Normalerweise hat ist ja die dispid für den Getter und Setter gleich.
Man sieht aber was hier passiert sein muss:
der MS Programmierer hat im nachhinein entschieden, dass das Property ID auch beschreibbar sein sollte.
(bisher war ID nur readonly)
Nur hat dann Visual Studio automatisch für den Setter eine neue dispid vergeben

[generic]

Du kannst "ID" einfach umbennen, es wird via die DispID zugegriffen.

10 = ObjectID
14 = ArticleID

Code:

[id(0x0000000a), propget, helpstring("Object ID"), helpcontext(0x0001a522)]
long ID();

[id(0x0000000e), propput, helpstring("Use user defined distribution article ID which must be unique"), helpcontext(0x0001a526)]
void ID([in] long rhs);