[gast]

Hallo,

ich würde gerne die Funktion "DVMailItemFromEml" innerhalb einer
Delphi-Applikation verwenden. Leider ist diese Funktion nicht in der
Type Library enthalten, es gibt sie allerdings als Prozedureinsprungs-
punkt in der DVAPI32.DLL.

Ich habe es bisher wie folgt versucht, indem ich die Funktion als
function DVMailItemFromEml(AFileName: WideString; AnArchive: Archive):
MailItem; cdecl; external 'DVAPI32.DLL';
deklariert habe und wie folgt aufrufe:
oMailItem := DVMailItemFromEml(WideString(Filename), oArchive);
Leider ist oMailItem nach Aufruf der Funktion immer NIL.

Hat jemand dies schonmal gemacht und kann mir weiterhelfen?

Vielen Dank im Voraus,

Consuelo

[gast]

Hallo,

ich habe meinen eigenen Quellcode falsch rezitiert. Hier dir Korrektur:

function DVMailItemFromEml(AFileName: WideString; AnAccount: Account):
MailItem; cdecl; external 'DVAPI32.DLL';
oMailItem := DVMailItemFromEml(WideString(Filename), Account);

Das Problem besteht aber immer noch.


Gruß,
Consuelo

[gast]

Hallo,

zumindest in VB6 funktioniert's wie folgt:

Declare Function DVMailItemFromEml Lib "dvapi32.dll" (ByVal strFilename As
String, ByRef oAccount As Object) As Object

Dim oAccount As DvApi32.Account
Dim oMailItem As DvApi32.MailItem

Set oMailItem = DVMailItemFromEml("test.eml", oAccount)

Das oMailItem ist nach dem Aufruf gültig und "gefüllt".

Viele Grüße,
Martin

schrieb im Newsbeitrag
news:3664785111@news.tobit.com...

Hallo,

ich würde gerne die Funktion "DVMailItemFromEml" innerhalb einer
Delphi-Applikation verwenden. Leider ist diese Funktion nicht in der
Type Library enthalten, es gibt sie allerdings als Prozedureinsprungs-
punkt in der DVAPI32.DLL.

Ich habe es bisher wie folgt versucht, indem ich die Funktion als
function DVMailItemFromEml(AFileName: WideString; AnArchive: Archive):
MailItem; cdecl; external 'DVAPI32.DLL';
deklariert habe und wie folgt aufrufe:
oMailItem := DVMailItemFromEml(WideString(Filename), oArchive);
Leider ist oMailItem nach Aufruf der Funktion immer NIL.

Hat jemand dies schonmal gemacht und kann mir weiterhelfen?

Vielen Dank im Voraus,

Consuelo

[gast]

Hallo,

schrieb:

zumindest in VB6 funktioniert's wie folgt:

VB-Beispiele habe ich auch sehr viele gesehen, aber die helfen mir nicht mit
meinem Delphi-Problem!
Im Prinzip gehe ich genauso vor wie die Beispiele, aber es klappt trotzdem
nicht.


Trotzdem danke,
Consuelo