ADODB Recordset mit Delphi5

[BenjaminHelbig]

Hi liebe DP'ler,

ich habe folgendes Problem: Ich habe mein Programm an ein Com+ Objekt angebunden. Das hat auch wunderbar geklappt. Eine Funktion des Com Objekts liefert mir einen Recordset zurück. In VB kann ich das so lösen:

Set Versand = New ttDispatch.Dispatch
Dim RS As ADODB.Recordset

Set RS = Versand.CheckProject(128)

in Delphi habe ich:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Versand : TDispatch;
begin
MYRECORDSET := Versand.CheckProject(128);
end;

wie muss ich MYRECORDSET definieren, damit das funktioniert???

Grüße Benjamin

[shmia]

Zitat von BenjaminHelbig:

wie muss ich MYRECORDSET definieren, damit das funktioniert???

Als OleVariant.
In einem OleVariant hast du dann ein IDispatch Interface-Pointer.

[BenjaminHelbig]

Hi, danke für deine Hilfe, aber ich hab mit Records bisher noch nicht gearbeitet. Kannst du mir auf die Sprünge helfen.

    RS : Record as OleVariant; funktioniert nämlich nicht.

Und wenn ich

Delphi-Quellcode:

type RS = Record
     Test : OleVariant;

mache und dann eine Zuweisung über:
 RS.test := Versand.CheckProject(128); bringt er mir den Fehler "Objekt oder Klassentyp erforderlich". Was ja auch logisch ist.

Grüße Ben

[BenjaminHelbig]

Wenn ich Tomaten auf den Augen habe, dann richtig.
Also es klappt jetzt. Dank dir für die Hilfe.