D
delphiyesterday
Unregistered / Unconfirmed
GUEST, unregistred user!
调用OUTLOOK发EMAIL时,如何把richedit1里的内容按原格式调入OUTLOOK里的内容框?
我的调用代码是这样,但格式全乱:
ShellExecute(Handle,'open',pchar( 'mailto:'+trim(edit11.Text)+
'?cc='+''+
'&bcc='+''+
'&Subject='+''+
'&body='+richedit1.Text) ,nil,nil,SW_SHOW);
我的调用代码是这样,但格式全乱:
ShellExecute(Handle,'open',pchar( 'mailto:'+trim(edit11.Text)+
'?cc='+''+
'&bcc='+''+
'&Subject='+''+
'&body='+richedit1.Text) ,nil,nil,SW_SHOW);