Levantar nuevo e-mail en outlook express

[__cadetill]

Algo así?

  ShellExecute(GetDesktopWindow(),
               nil,
               pChar('mailto:'+
               DbEdit1.Text),
               nil,
               nil,
               SW_SHOWNORMAL);