Have a look at this key [HKEY_CLASSES_ROOT\mailto\shell\open\command]
CubicDesign <[email protected]> Sent by: [email protected] 20/01/2009 14:28 Please respond to Delphi-Talk Discussion List <[email protected]> To Delphi-Talk Discussion List <[email protected]> cc Subject Re: Detecting a Default EMail Client Hi. There is something similar for Thunderbird? [email protected] wrote: > Try this I wrote it some years ago then we moved to Notes > > function GetEmailAddress : String; > var > registry: TRegistry; > begin > registry := TRegistry.Create; > try > try > registry.RootKey := HKEY_CURRENT_USER; > {False because we do not want to create it if it doesn't exist} > registry.OpenKey('Software\Microsoft\Internet Account > Manager\Accounts\00000001', > false); > Result := registry.ReadString('SMTP Email Address'); > except > Result := ''; > end; > > finally > registry.Free; > end; {Try Finally} > end; > > > > > > "Alan Colburn" <[email protected]> > Sent by: [email protected] > 17/01/2009 01:06 > Please respond to > Delphi-Talk Discussion List <[email protected]> > > > To > "Delphi-Talk Discussion List" <[email protected]> > cc > > Subject > Detecting a Default EMail Client > > > > > > > I'm looking for code that would detect whether or not a user has assigned > a > default email client. I have methods that send email using the default > program, and if the user has not assigned a default client then an error > is > created. (You often need to re-establish your default email program after > a > Windows update.) > > Any suggestions? ... As always, thanks for your help -- Al C. > > __________________________________________________ > Delphi-Talk mailing list -> [email protected] > http://lists.elists.org/cgi-bin/mailman/listinfo/delphi-talk > > > > *********************************************************************** > NOTICE: This e-mail transmission, and any documents, files or previous > e-mail messages attached to it, may contain confidential or privileged > information. If you are not the intended recipient, or a person > responsible for delivering it to the intended recipient, you are > hereby notified that any disclosure, copying, distribution or use of > any of the information contained in or attached to this message is > STRICTLY PROHIBITED. If you have received this transmission in error, > please immediately notify the sender and delete the e-mail and attached > documents. Thank you. > *********************************************************************** > __________________________________________________ > Delphi-Talk mailing list -> [email protected] > http://lists.elists.org/cgi-bin/mailman/listinfo/delphi-talk > __________________________________________________ Delphi-Talk mailing list -> [email protected] http://lists.elists.org/cgi-bin/mailman/listinfo/delphi-talk *********************************************************************** NOTICE: This e-mail transmission, and any documents, files or previous e-mail messages attached to it, may contain confidential or privileged information. If you are not the intended recipient, or a person responsible for delivering it to the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of any of the information contained in or attached to this message is STRICTLY PROHIBITED. If you have received this transmission in error, please immediately notify the sender and delete the e-mail and attached documents. Thank you. *********************************************************************** __________________________________________________ Delphi-Talk mailing list -> [email protected] http://lists.elists.org/cgi-bin/mailman/listinfo/delphi-talk
