先在unit中包含ShellApi单元,然后:ShellExecute(handle,'open','mailto:[email protected]','','',SW_SHOWNORMAL);