1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
| void __fastcall TForm_Tab_Clients::Button_envoi_multipleClick(TObject *Sender)
{
String Mail = "mailto:";
String Text_Retour_Ligne = "%0A"; //text mime (format boite mail)
String Separateur_adress = "; ";
String EMail = "?subject=Information de mise à jour&body=";
String Text = "Votre version actuelle de Gin n'est pas la plus récente, vous êtes prié de faire une mise à jour" + Text_Retour_Ligne + "Merci";
String Text2 = "Cordialement," + Text_Retour_Ligne + "l'équipe de Logic Systems";
String Adresse1 = Memo_Adresses->Lines->operator [](1);
String Adresse2 = Memo_Adresses->Lines->operator [](2);
String Adresse3 = Memo_Adresses->Lines->operator [](3);
String Adresse4 = Memo_Adresses->Lines->operator [](4);
String Adresse5 = Memo_Adresses->Lines->operator [](5);
String Adresse6 = Memo_Adresses->Lines->operator [](6);
String Adresse7 = Memo_Adresses->Lines->operator [](7);
String Adresse8 = Memo_Adresses->Lines->operator [](8);
String Adresse9 = Memo_Adresses->Lines->operator [](9);
String Adresse10 = Memo_Adresses->Lines->operator [](10);
String Envoi = Mail + Adresse1 + Separateur_adress + Adresse2
+ Adresse3 + Separateur_adress + Adresse4
+ Separateur_adress + Adresse5 + Separateur_adress
+ Adresse6 + Separateur_adress + Adresse7
+ Separateur_adress + Adresse8 + Separateur_adress
+ Adresse9 + Separateur_adress + Adresse10
+ EMail + Text + Text_Retour_Ligne + Text2;
ShellExecute (Handle, "open", Envoi.c_str() , 0, 0, SW_SHOWNORMAL);
} |
Partager