制作EMAIL地址的连接(没分了:(,多包涵)(100分)

  • 主题发起人 主题发起人 xmgx
  • 开始时间 开始时间
X

xmgx

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样在“关于”窗口中留下作者的EMAIL地址,要点击即可直接连接发送邮件
 
我用过,肯定可行的:
shellexecute(handle,'open',pchar('mailto:tigerwr@china.com'),nil,nil,SW_SHOW)
 
呵呵你的分基本是白花了,提供很过次了,
uses shellapi

再灌:

ShellExecute(Handle, 'open',
'mailto:delphi@email.com.cn' +
'?' +
'&bcc=''' +
'&subject=这样可以吗' +
'&body=:-)',
nil, nil, SW_NORMAL);
 
多人接受答案了。
 
后退
顶部