Je suis dans une unité.
Dans celle-ci j'ai une procédure dans laquelle je veux utiliser un tmemo mais je n'y arrive pas.
Le but en d'envoyé par mail le contenu de mon mémo. Les retours à la ligne sont importants pour moi (le fait d'avoir Nom sur la première ligne et Prénom sur la seconde).
J'ai le code suivant :
J'ai le message d'erreur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 var Memo:tMemo; begin Memo:=tMemo.create(nil); Memo.Lines[0]:='Nom'; Memo.Lines[1]:='Prénom'; .... end;
"Le contrôle '' n'a pas de fenêtre parente".
Je n'ai de message d'erreur quand je fais :
mais lorsque je consulte le mail envoyé j'ai
Code : Sélectionner tout - Visualiser dans une fenêtre à part Memo.text:='Nom'+chr(13)+'Prénom';
NomPrénom (sans retour à la ligne).
Merci de votre aide.![]()
Partager