SÓ PARA COBRAS

:?:
Enviar email através do outlook express via ole.

Estou desenvolvendo um aplicativo para o envio de mala direta via email.
Utilizando o codigo abaixo consigo abrir o Outlook do office, eu gostaria de acessar o outlook express, alguem sabe o que devo fazer;

var outlook, nmspace, folder, mi : olevariant;
begin
outlook := createoleobject(´outlook.application´);
nmspace := outlook.getnamespace(´MAPI´);
nmspace.logon(emptyparam, emptyparam, false, true);
folder := nmspace.getdefaultfolder(olfolderinbox);

mi := outlook.createitem(0);
mi.recipients.add(´destinatario@teste.com.br´);
mi.subject := ´Assunto´;
mi.body := ´mensagem ´;


mi.display;

nmspace.logoff;
outlook := unassigned;



Porem se eu utilizo o codigo abaixo consigo abrir o outlook express mas tenho a limitação de tamanho da variavel ´email´.

var
email : string;
begin
email := ´mailto: teste@teste.com.br´;
shellexecute(getdesktopwindow, ´open´,pchar (email),nil,nil,sw_shownormal);