MAPI aus einem Dienst ansprechen

[honda_magister]

Tag allerseits,

wie kann ich DP Funktion MapiSendMail aus einem Dienst heraus realisieren?
Ich benutze folgendes:

[delphi]
var lDesktop,lStationNew : cardinal;
//..

lStationNew:=OpenWindowStation('WinSta0',true,GENE RIC_ALL);
if (LStationNew<>0) then
begin
SetProcessWindowStation(LStationNew);
lDesktop:=OpenDesktop('Default',DF_ALLOWOTHERACCOU NTHOOK,true,GENERIC_ALL);
if (LDesktop&lt;&gt;0) then
begin
if SetThreadDesktop(lDesktop) then
begin

case MapiSendMail(MyService.ServiceThread.Handle,0,
mMessage, MAPI_LOGON_UI or MAPI_NEW_SESSION, 0) of

//..
Probiert auch so: case MapiSendMail(lStationNew,lDesktop,
mMessage, MAPI_LOGON_UI or MAPI_NEW_SESSION, 0) of


Funktion MapiSendMail liefert mir einen Leerwert zurück, trotzdem kommt an OutlookExpress nichts an.
Bitte um Hilfe.