Discussion :

[Maglight]

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 :

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;

J'ai le message d'erreur
"Le contrôle '' n'a pas de fenêtre parente".
Je n'ai de message d'erreur quand je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Memo.text:='Nom'+chr(13)+'Prénom';

mais lorsque je consulte le mail envoyé j'ai
NomPrénom (sans retour à la ligne).
Merci de votre aide.

[shell13010]

deja Salut

le mieux est d'utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Memo1.text:='Nom'+#13#10+'Prénom';

[Maglight]

Merci beaucoup.
Super

[Andnotor]

Memo.Lines[0] n'existe pas encore à ce moment là. Pour ajouter une ligne, Add.

Et si tu ne veux pas afficher tes données, utilise plutôt une StringList (La propriété Lines du memo est de type TStringList):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
var List :TStringList;
begin
List := TStringList.create;
List.Add('Nom');
List.Add('Prénom');
....
end;

Et ne pas oublier List.Free;

[shell13010]

Salut,

@Andnotor: pourquoi utiliser StringList alors que je penser que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Memo1.Lines.add('Nom'+#13#10+'Prénom');

revener au meme es que je me trompe?

[Andnotor]

Le memo est orienté GUI et est par conséquent plus lourd. (Demande plus de ressource, est plus long à créer, etc.)
Tu aurais tout aussi bien pu passer par un ListeBox, un ComboBox ou ce que tu veux qui gère une propriété dérivée de... TStrings.

Il s'agit simplement de trouver le bonne outil pour la bonne opération. Et en programmation, Le plus léger est toujours le meilleur .

Maintenant, je n'ai pas dis que ça ne marchait pas avec un TMemo...

[shell13010]

non je ne t'es pas contredit loin de la

c'etais juste pour m'instruire et comprendre...

merci pour ton explication car j'utiliser cette maniere jusqu'a aujourdhui,donc je vais faire quelque retouche a mon projet