Código Delphi [-] ShellExecute(GetDesktopWindow(), nil, pChar('mailto:' + TLabel(Sender).Caption+'?subject=Asunto...'), nil, nil, SW_SHOWNORMAL);
ShellExecute(GetDesktopWindow(), nil, pChar('mailto:' + TLabel(Sender).Caption+'?subject=Asunto...'), nil, nil, SW_SHOWNORMAL);