Extended MAPI SendEMail Help

Hi,
I've been using SimpleMAPI for auto emailing with Outlook in my application, but we have move to outlookXP. Now those darn security messages come up when you try and send an email via Simple MAPI.

I have looked into third party solutions (including MSExchange disabling the warning), but prefer to use Extended MAPI. There is a set of tutorial notes and code on the web, but I have to pay like $100 AU to get a copy of those notes and can't afford it and I don't have the time to learn all that anymore.

At the moment I have worked out how to log on and off Exchange using ExMAPI, with a global object called Session : IMAPISession;

What I now need is a function that uses Extended MAPI as followed or similar.

type
  TEmail = record
       SenderName   : String;
       SenderEmail    : String;
       
       Recipients       : TStringList;
       CC                  : TStringList;
       BCC                : TStringList;
       
       Subject           : String;
       Body               : TStringList;
       Attachments    : TStringList;
       
       HTMLBody       : Boolean;
  end;

SendEmail(  Session             : IMAPISession,  //needed ??? I'm using it globally
                  anEmail             : TEmail,           //an email record
                  AutoSend           : boolean,         //auto send or display preview
                  DeleteAfterSend : boolean,          //delete msg after send
                  Encrypt              : boolean,          //encrypt the email
                  DigitalSign         : boolean)          //dig sign email


I know this sounds hard, but I got it all working under SimpleMAPI, the encryption, signin and delete after send.  

I offering 500 Points as this is a hard question - well for me anyway. If no one can answer the question fully I will award the points to who ever gets the closest, as long as (anEmail, autoSend) parts are answered.
                   
Thanks for peoples help

Kane